"Excel VBA" uždarymo ir atidarymo metodas

The Uždaryti ir Atviras metodas in Excel VBA gali būti naudojama norint uždaryti ir atidaryti darbaknygius. Atminkite, kad "Workbooks" rinkinyje yra visi "Workbook" objektai, kurie šiuo metu yra atidaryti.

Įdėkite komandų mygtuką į savo darbalapį ir pridėkite šias kodo eilutes:

1. Kodinė linija žemiau uždaro open-workbooks.xls.

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

2. Žemiau pateiktoje kodinėje eilutėje uždaromas pirmasis atidarytas / sukurtas darbaknygis.

Workbooks(1).Close

3. Toliau pateikiama kodinė eilutė uždaro aktyvų darbo knygą.

ActiveWorkbook.Close

4. Toliau pateikiama kodinė eilutė uždaro visus šiuo metu atidarytus darbus.

Workbooks.Close

5. Kodinė linija apačioje atidaro sales.xls.

Workbooks.Open ("sales.xls")

Pastaba: galite atidaryti tik sales.xls, nenurodydami failo kelio, jei jis saugomas numatytoje failo vietoje. Numatytoji failo vieta yra aplankas, kurį matote atidarius arba išsaugoję failą.

6. Taip pat galite naudoti "Application" objekto metodą "GetOpenFilename", kad būtų rodomas standartinis atidarytas dialogo langas, ir pasirinkite failą (be faktinio failo atidarymo).

Dim MyFile As String
MyFile = Application.GetOpenFilename()

Rezultatas:

7. Tada galite atidaryti darbaknygę kaip įprasta.

Workbooks.Open (MyFile)