Note: The other languages of the website are Google-translated. Back to English

Cum se șterge conținutul celulei specificat la deschidere și ieșire din registrul de lucru Excel?

Acest articol vorbește despre ștergerea conținutului specificat al celulei la deschiderea sau închiderea unui registru de lucru Excel.

Ștergeți conținutul celulei specificat din registrul de lucru deschideți și ieșiți


Ștergeți conținutul celulei specificat din registrul de lucru deschideți și ieșiți

Vă rugăm să procedați după cum urmează pentru a șterge conținutul celulei specificat din registrul de lucru deschideți și ieșiți.

În primul rând, trebuie să salvați registrul de lucru de care aveți nevoie pentru a șterge conținutul celulei specificat la deschidere sau la ieșire ca un registru de lucru activat pentru Macro Excel.

1. Vă rugăm să faceți clic pe Fișier > Salvare ca > Naviga. Vedeți captura de ecran:

2. În Salvare ca caseta de dialog, selectați un folder pentru a salva registrul de lucru, introduceți un nume nou în Nume de fișier selectați caseta după cum aveți nevoie Cartea de lucru Excel Macro-Enabled de la Sava ca tip lista verticală, apoi faceți clic pe Economisiți butonul.

3. În fereastra pop-up Microsoft Excel caseta de dialog, faceți clic pe OK ca în imaginea de mai jos.

4. Deschideți registrul de lucru Macro-Enabled pe care l-ați salvat chiar acum, apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

5. În Microsoft Visual Basic pentru aplicații fereastră, faceți dublu clic Acest manual de lucru în panoul din stânga, apoi copiați mai jos codul VBA în fereastra Cod.

Cod VBA 1: Ștergeți conținutul celulei specificat în registrul de lucru deschis

Private Sub Workbook_Open()
'Updated by Extendoffice 20190712
    Application.EnableEvents = False
        Worksheets("test").Range("A1:A11").Value = ""
    Application.EnableEvents = True
End Sub

Cod VBA 2: Ștergeți conținutul celulei specificat la ieșirea din registrul de lucru

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20190712
    Worksheets("test").Range("A1:A11").Value = ""
End Sub

notițe: În codurile de mai sus, testați și A1: A11 este numele foii de lucru și intervalul de celule din care veți șterge conținutul. Vă rugăm să le schimbați după cum aveți nevoie.

6. apasă pe Alt + Q tastele pentru a ieși din Microsoft Visual Basic pentru aplicații fereastră.

De acum înainte, la deschiderea sau închiderea registrului de lucru, conținutul celulei specificat în anumite foi de lucru va fi șters automat.


Legate de articole:


Cele mai bune instrumente de productivitate Office

Kutools pentru Excel vă rezolvă majoritatea problemelor și vă crește productivitatea cu 80%

  • reutilizarea: Introduceți rapid formule complexe, diagrame și orice ai folosit anterior; Criptați celulele cu parola; Creați o listă de corespondență și trimiteți e-mailuri ...
  • Super Formula Bar (editați cu ușurință mai multe linii de text și formulă); Layout de citire (citiți și editați cu ușurință un număr mare de celule); Lipiți la interval filtrat...
  • Merge celule / rânduri / coloane fără a pierde date; Conținut de celule divizate; Combinați rânduri / coloane duplicate... Prevenirea celulelor duplicate; Comparați gamele...
  • Selectați Duplicat sau Unic Rânduri; Selectați Rânduri goale (toate celulele sunt goale); Super Find și Fuzzy Find în multe cărți de lucru; Selectare aleatorie ...
  • Copie exactă Mai multe celule fără modificarea referinței formulelor; Creați automat referințe la foi multiple; Introduceți gloanțe, Casete de selectare și multe altele ...
  • Extrageți textul, Adăugați text, eliminați după poziție, Eliminați spațiul; Creați și imprimați subtotaluri de paginare; Convertiți conținutul dintre celule și comentarii...
  • Super Filtru (salvați și aplicați scheme de filtrare altor foi); Sortare avansată după lună / săptămână / zi, frecvență și multe altele; Filtru special cu bold, italic ...
  • Combinați cărți de lucru și foi de lucru; Merge Tables pe baza coloanelor cheie; Împărțiți datele în mai multe foi; Conversia în loturi xls, xlsx și PDF...
  • Peste 300 de funcții puternice. Suportă Office / Excel 2007-2021 și 365. Acceptă toate limbile. Implementare ușoară în întreprinderea sau organizația dvs. Funcții complete Probă gratuită de 30 de zile. Garanție de returnare a banilor de 60 de zile.
fila kte 201905

Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară

  • Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
  • Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ​​ferestrele noi.
  • Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
fundul officetab
Comentarii (9)
Încă nu există evaluări. Fii primul care evaluează!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Stimate domn/doamnă, foaia mea este protejată și numai celula specificată (pentru ștergerea datelor) nu este protejată, dar când introduc valoarea în fișierul specificat și apoi redeschid fișierul Excel, valoarea este ștearsă de codul VBA, dar celula specificată este protejat, trebuie să deprotejez celula dezprotejând foaia, editați din nou și din nou intervalul editabil, așa că vă rugăm să remediați.
Multumesc anticipat
Acest comentariu a fost redus la minimum de moderatorul de pe site
Bună Sanjay Sharma,
Scuze pentru neplăceri. Vă rugăm să aplicați codurile VBA de mai jos și nu uitați să înlocuiți numele foii și intervalul în funcție de nevoile dvs. Multumesc pentru comentariu.

Cod VBA 1:
Private Sub Workbook_Open()
Application.EnableEvents = Fals
Foi de lucru ("Sheet1").Range ("A1:A11").Value = ""
Application.EnableEvents = Adevărat
End Sub

Cod VBA 2:
Private Sub Workbook_BeforeClose(Anulați ca boolean)
Foi de lucru ("Sheet1").Range ("A1:A11").Value = ""
End Sub
Acest comentariu a fost redus la minimum de moderatorul de pe site
Bună ziua, pentru interval, cum aș introduce codul dacă vreau să selectez mai multe intervale sau celule?
Acest comentariu a fost redus la minimum de moderatorul de pe site
Poate cineva să mă ajute cum să șterg celulele unei foi (doar într-un rând și nu întreaga foaie). Codul de mai jos elimină conținutul din toate rândurile foii. Dar vreau ca conținutul să fie șters doar în rândul 9

Private Sub Workbook_Open()

„Actualizat de Extendoffice 20190712

Application.EnableEvents = Fals

Fișe de lucru ("test").Range ("A1:A11").Value = ""

Application.EnableEvents = Adevărat

End Sub
Acest comentariu a fost redus la minimum de moderatorul de pe site
Poate cineva să mă ajute cum să șterg celulele unei foi (doar într-un rând și nu întreaga foaie). Codul de mai jos elimină conținutul din toate rândurile foii. Dar vreau ca conținutul să fie șters doar în rândul 9



Private Sub Workbook_Open()

„Actualizat de Extendoffice 20190712

Application.EnableEvents = Fals

Fișe de lucru ("test").Range ("A1:A11").Value = ""

Application.EnableEvents = Adevărat

End Sub
Acest comentariu a fost redus la minimum de moderatorul de pe site
Bună,
VBA de mai sus șterge doar valoarea celulei din intervalul A1:A11. Dacă doriți să ștergeți numai valorile din rândul 9, puteți înlocui A1:A11 cu 9:9. Vezi codul de mai jos.

Private Sub Workbook_Open()

„Actualizat de Extendoffice 20200522

Application.EnableEvents = Fals

Foi de lucru ("test").Range ("9:9").Value = ""

Application.EnableEvents = Adevărat

End Sub
Acest comentariu a fost redus la minimum de moderatorul de pe site
Dragi prieteni, am încercat codul sugerat fără niciun efect la deschidere>

Private Sub Workbook_Open()


Application.EnableEvents = Fals

Foi de lucru ("Client").Range ("A9:K900").Value = ""

Application.EnableEvents = Adevărat

End Sub


Macrocomanda funcționează din registrul de lucru, dar nu atunci când se deschide registrul de lucru.

Orice ajutor ar fi foarte apreciat!
Acest comentariu a fost redus la minimum de moderatorul de pe site
Bună TUDOSE GELU,
Codul funcționează bine în cazul meu.
Nu uitați să puneți codul în ThisWorkbook (Cod) fereastră și salvați registrul de lucru ca un Excel Macro-activat Caiet de lucru.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/2022-oct/oct-2.png
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/2022-oct/oct-1.png
Acest comentariu a fost redus la minimum de moderatorul de pe site
Multumesc Crystal! Funcționează.

G
Nu există comentarii postate aici încă
Lăsa comentarii
Postare ca invitat
×
Evaluează această postare:
0   Caractere
Locații sugerate

Urmărește-ne

Copyright © 2009 - www.extendoffice.com. | Toate drepturile rezervate. Cu sprijinul ExtendOffice. | Harta site-ului
Microsoft și sigla Office sunt mărci comerciale sau mărci comerciale înregistrate ale Microsoft Corporation în Statele Unite și / sau în alte țări.
Protejat de Sectigo SSL