Excel VBA Închideți și deschideți metoda

În Închide și Metodă deschisă în Excel VBA poate fi folosit pentru a închide şi deschide registre de lucru. Amintiţi-vă, colecţia registre de lucru conţine toate obiectele de registru de lucru care sunt în prezent deschise.

Plasați un buton de comandă pe foaia dvs. de lucru și adăugați următoarele linii de cod:

1. linia de cod de mai jos se închide închidere-deschidere-workbooks.xls.

Workbooks("close-open-workbooks.xls").Close

2. linia de cod de mai jos se închide primul deschis/creat registrul de lucru.

Workbooks(1).Close

3. linia de cod de mai jos se închide registrului de lucru activ.

ActiveWorkbook.Close

4. la linia de cod de mai jos se închide toate registrele de lucru deschise în prezent.

Workbooks.Close

5. linia de cod de mai jos se deschide sales.xls.

Workbooks.Open ("sales.xls")

Notă: se poate deschide doar sales.xls fără a specifica fişierul "calea s dacă acesta" s stocată în locaţia de fişierul implicit.Locația fișierului implicită este folderul Vedeţi atunci când deschideţi sau salvaţi un fişier.

6. puteţi utiliza metoda de GetOpenFilename a obiectului aplicaţie pentru a afişa caseta de Dialog deschidere standard şi selectaţi fişierul ( fără fapt deschide fişierul ).

Dim MyFile As String
MyFile = Application.GetOpenFilename()

Rezultat:

7. apoi, puteţi deschide registrul de lucru ca de obicei.

Workbooks.Open (MyFile)