Satura rādītājs
Saglabājot Makro failu tieši tajā pašā vietā, kur iepriekš, tas vienmēr ar brīdinājuma ziņojumu aicina nomainīt failu. Tas var būt neērti, ja dati ir jāglabā bieži un tam ir ierobežots laiks. Tāpēc mēs izmantosim VBA kodu, lai atrisinātu problēmu. Šajā pamācībā tiks parādīts, kā saglabāt darbgrāmatu bez uzaicinājuma ar Excel VBA .
Lejupielādēt Practice Workbook
Lejupielādējiet šo prakses darba burtnīcu, lai vingrinātos, kamēr lasāt šo rakstu.
Saglabāt bez Prompt.xlsm7 vienkārši soļi, kā saglabāt darbgrāmatu bez uzaicinājuma, izmantojot Excel VBA
Tālāk attēlā esam pievienojuši datu kopas paraugu, lai parādītu atšķirību pēc tam, kad ir palaista VBA kodi lai pārtrauktu uzaicinājumu. Saglabājot failu, mēs izmantosim VBA kodi lai atspējotu displeja brīdinājuma ziņojumu.
1. solis: Izveidojiet moduli, lai rakstītu VBA kodu
- Vispirms nospiediet Alt + F11 lai atvērtu VBA makro programma .
- Noklikšķiniet uz Ievietot cilne.
- No iespējām izvēlieties Modulis lai izveidotu jaunu Modulis .
2. solis: Ievietojiet SaveAs funkciju kodā
- Lai izmantotu funkcija SaveAs šajā darbgrāmatā ierakstiet ( ) un Saglabātkā vai izvēlieties Saglabātkā no pieejamo funkciju saraksta.
3. solis: Failu adreses un nosaukuma pievienošana VBA kodā
- Lai ievietotu faila adresi, ejiet uz uz faila atrašanās vietu.
- Noklikšķiniet uz mape ikona un kopēt adresi.
- Paste adresi zem Datnes nosaukums arguments Funkcija SaveAs .
- Pēc ievadīšanas adrese , ievadiet faila nosaukums .
- Visbeidzot, aizvērt adresi un faila nosaukums ar pēdiņām (" ") .
- Pēc adreses pievienošanas ievadiet a komats un rakstiet 52 par Failu formāts arguments.
- Šādi tiks parādīti galīgie kodi.
Sub Without_Prompt() ThisWorkbook.SaveAs "C:\Users\Admin\Desktop\Bhubon\Exceldemy\3875_420093_Bhubon_excel vba saglabāt darbgrāmatu bez uzaicinājuma\Save Without Prompt", 52 End Sub
4. solis: Palaist VBA kodu un pārbaudīt, vai nav kļūdas
- Parādīsies uzvednis, jo mēs neesam atslēguši Brīdinājumi ziņojums.
- Pēc tam noklikšķiniet uz Nē .
- Visbeidzot noklikšķiniet uz Izbeigt .
5. solis: uzrakstiet kodu, lai atspējotu uzvedinošo ziņojumu
- Lai atspējotu uzveduma ziņojumu, mums ir jāatslēdz DisplayAlerts ziņojums.
- Dodiet man DisplayAlerts. opcijas paziņojumu kā Viltus lai atspējotu uzvedinošo vai trauksmes ziņojumu.
- Ierakstiet šādus kodus Modulis lai apturētu uzaicinājumu.
Sub Without_Prompt() 'Komanda, lai nerādītu uzvedni Application.DisplayAlerts = False 'Piemērot komandu, lai saglabātu failu 'Faila nosaukuma argumentā norādiet faila nosaukumu un adresi ThisWorkbook.SaveAs "C:\Users\Admin\Desktop\Bhubon\Exceldemy\3875_420093_Bhubon_excel vba save workbook without prompt\Save Without Prompt", 52 Application.DisplayAlerts = True End Sub
6. solis: Palaist VBA kodu pēc DisplayAlerts komandas atspējošanas
- Šoreiz noklikšķiniet uz pogas palaist vai nospiediet F5 lai palaistu VBA kodi .
- Taču tagad netiks parādīts brīdinājuma ziņojums.
7. solis: Pārbaudiet galīgo atbildi rezultātos
- Mūsu parauga datu kopā mainiet saņēmēja vārds un uzvārds no Sāls šķīdums uz Bhubon .
- Preses F5 lai palaistu programmu, un uz ekrāna neparādīsies neviens ziņojums.
- Aizveriet darblapu bez saglabāšanas.
- Atveriet failu un pārliecinieties, ka fails ir saglabāts ar jaunāko pašreizējo redakciju, ko esat izveidojis.
Secinājums
Es ceru, ka šis raksts ir sniedzis jums pamācību par to, kā saglabāt darbgrāmatas bez uzaicinājuma ar Excel VBA . Visas šīs procedūras ir jāapgūst un jāpielieto jūsu datu kopai. Apskatiet praktisko darbgrāmatu un pārbaudiet šīs prasmes. Jūsu vērtīgā atbalsta dēļ mēs esam motivēti turpināt veidot šādas pamācības.
Lūdzu, sazinieties ar mums, ja jums ir kādi jautājumi. Tāpat varat atstāt komentārus zemāk esošajā sadaļā.
Mēs, mēs. Exceldemy komanda vienmēr atsaucīgi atbild uz jūsu jautājumiem.
Palieciet kopā ar mums un turpiniet mācīties.