Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako uporabljati funkcijo Save As, da samodejno prepiše obstoječo datoteko v Excelu?

Pri shranjevanju delovnega zvezka Excel v novo mapo dobite potrditveno polje, kot je prikazano spodaj, če obstaja ista delovna knjiga z imenom in se nahaja v mapi. Kako samodejno prepiše obstoječo datoteko brez hitrega opozorilnega sporočila? Metoda v tem članku vam lahko pomaga.

Shrani kot funkcija, da samodejno prepiše obstoječo datoteko s kodo VBA


puščica modra desno mehurčekShrani kot funkcija, da samodejno prepiše obstoječo datoteko s kodo VBA


Če želite shraniti delovni zvezek z novim imenom in samodejno prepišite obstoječo datoteko v Excelu. Prosimo, naredite na naslednji način.

1. Najprej ustvarite gumb za ukaze, da sprožite funkcijo Shrani kot na vašem delovnem listu. Prosimo, kliknite Razvojni > Vstavi > Gumb za urejanje (aktivna kontrola X). Prikaz slike:

2. Nariši gumb na vašem delovnem listu. Nato z desno miškino tipko kliknite in izberite Ogled kode iz kontekstnega menija.

3. V Ljubljani Microsoft Visual Basic za aplikacije okno, kopirajte spodnjo kodo VBA in prilepite med Private Sub in End Sub linije v Koda okno.

VBA koda: Shrani kot funkcija za samodejno prepisovanje obstoječe datoteke

Dim xFileName As String
Application.DisplayAlerts = False
If Right(ActiveWorkbook.Name, 4) = "xlsm" Then
  xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Macro-Enabled Workbook (*.xlsm),*.xlsm")
Else
  xFileName = Application.GetSaveAsFilename(ActiveWorkbook.Name, "Excel Workbook (*.xlsx),*.xlsx")
End If
If (xFileName <> "") Or (xFileName <> "False") Then
  ActiveWorkbook.SaveAs Filename:=xFileName
End If
Application.DisplayAlerts = True

4. Pritisnite druga + Q tipke za izhod iz Microsoft Visual Basic za aplikacije okno. In izklopite Način oblikovanja pod Razvojni tab.

5. Kliknite gumb Ukaz, potem pa Shrani kot prikaže se pogovorno okno, izberite mapo, ki jo želite shraniti, in kliknite Shrani gumb.

Če v ciljni mapi obstajata ista imenska delovna knjiga, se bo samodejno prepišala s trenutnim delovnim zvezkom brez takojšnjega zagona.


puščica modra desno mehurčekSorodni članki:



Priporočena orodja za produktivnost za Excel

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.