Atunci când se salvează un Macro în locația exactă ca înainte, vă solicită întotdeauna să înlocuiți fișierul cu un mesaj de alertă. Acest lucru poate fi incomod atunci când trebuie să salvați datele frecvent și aveți timp limitat pentru a face acest lucru. Ca urmare, vom folosi un fișier VBA pentru a rezolva problema. Acest tutorial vă va arăta cum să salvați un registru de lucru fără un prompt cu Excel VBA .

Descărcați caietul de practică

Descărcați acest caiet de exerciții pentru a vă exercita în timp ce citiți acest articol.

7 pași simpli pentru a salva un registru de lucru fără prompt cu Excel VBA

Am inclus un set de date de probă în imaginea de mai jos pentru a demonstra diferența după rularea aplicației Coduri VBA pentru a opri solicitarea. În timpul salvării fișierului, vom utiliza Coduri VBA pentru a dezactiva afișarea mesajului de alertă.

Pasul 1: Creați un modul pentru a scrie cod VBA

• În primul rând, apăsați Alt + F11 pentru a deschide fereastra Macro VBA .
• Faceți clic pe butonul Introduceți tab.
• Dintre opțiuni, selectați Modul pentru a crea un nou Modul .

Pasul 2: Introduceți funcția SaveAs în cod

• Pentru a utiliza funcția SaveAs în acest registru de lucru, tastați ( ) și Salvează ca , sau selectați Salvează ca din lista de funcții disponibile.

Pasul 3: Adăugați adresa și numele fișierului în codul VBA

• Pentru a introduce adresa fișierului, du-te la locația fișierului.
• Faceți clic pe butonul dosar pictograma și copie adresa.

• Paste adresa de la rubrica Numele fișierului argument al Funcția SaveAs .
• După ce a fost introdus adresa , tastați numele fișierului .
• În cele din urmă, închideți adresa și adresa numele fișierului cu ghilimele (" ") .

• După adăugarea adresei, tastați un virgulă și scrie 52 pentru Formatul fișierului argument.

• Acesta este modul în care vor apărea codurile finale.

 Sub Without_Prompt() ThisWorkbook.SaveAs "C:\Users\Admin\Desktop\Bhubon\Exceldemy\3875_420093_Bhubon_excel vba save workbook without prompt\Save Without Prompt", 52 End Sub 

Pasul 4: Rulați codul VBA și verificați dacă există erori

• Va apărea un mesaj de promptitudine deoarece nu am dezactivat Alerte mesaj.
• Apoi, faceți clic pe Nu .

• În cele din urmă, faceți clic pe Sfârșitul .

Pasul 5: Scrieți un cod pentru a dezactiva mesajul Prompt

• Pentru a dezactiva mesajul prompt, trebuie să dezactivăm opțiunea AfișareAlerte mesaj.
• Dă-mi AfișareAlerte. declarație de opțiune ca Fals pentru a dezactiva mesajul de invitație sau de alarmă.
• Scrieți următoarele coduri în Modul pentru a opri solicitarea.

 Sub Without_Prompt() 'Comanda de a nu afișa Prompt Application.DisplayAlerts = False 'Aplicați comanda pentru a salva fișierul 'În argumentul File Name dați numele și adresa fișierului 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 

Pasul 6: Rulați codul VBA după dezactivarea comenzii DisplayAlerts

• De data aceasta, faceți clic pe butonul de execuție sau apăsați F5 pentru a rula Coduri VBA .
• Dar acum nu va fi afișat niciun mesaj de alertă.

Pasul 7: Verificați răspunsul final în Rezultat

• În setul nostru de date de probă, modificați valoarea numele destinatarului de la Saramură la Bhubon .

• Apăsați F5 pentru a rula programul și nu va apărea niciun mesaj.
• Închideți foaia de lucru fără a o salva.

• Deschideți fișierul și vedeți că acesta a fost salvat cu ultima ediție curentă pe care ați făcut-o.

Concluzie

Sper că acest articol v-a oferit un tutorial despre cum să salvați registrele de lucru fără o solicitare cu Excel VBA Toate aceste proceduri ar trebui învățate și aplicate la setul dvs. de date. Aruncați o privire la caietul de exerciții practice și puneți aceste abilități la încercare. Suntem motivați să continuăm să realizăm tutoriale ca acesta datorită sprijinului dvs. valoros.

Vă rugăm să ne contactați dacă aveți întrebări și să ne lăsați comentarii în secțiunea de mai jos.

Noi, cei Exceldemy Team, sunt întotdeauna receptivi la întrebările dumneavoastră.

Rămâneți alături de noi și continuați să învățați.