Alternativne otvorenie zošitu excelu
Alternativne otvorenie zošitu excelu
Mám taký problem. Potrebujem do makra pomocou ktorého otváram iný zošit zapísať formuláciu, ktorá by uvedený zošit ovárala ale iba v prípade, že nie je už otvorený. Ak je už otvorený, tak by sa využil príkaz "Windows("iný zošit.xls").Activate". Dá sa to vôbec?
Samozřejmě, že dá. Existuje kolekce otevřených sešitů. Mrkni do ní a když tam není tak otevři jinak aktivuj okno. Dej si někam na list tlačítko a přiřaď mu tento kód, zobrazí ti názvy všech korektně otevřených sešitů.
Pavel
Kód: Vybrat vše
Private Sub CommandButton1_Click()
Dim I As Integer
For I = 1 To Application.Workbooks.Count
MsgBox Application.Workbooks(I).Name
Next I
End Sub
Pavel
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 18
- 3579
-
od luko02420
Zobrazit poslední příspěvek
16 kvě 2023 11:27
-
- 0
- 814
-
od Jsimi
Zobrazit poslední příspěvek
06 úno 2024 22:43
-
- 2
- 1316
-
od X
Zobrazit poslední příspěvek
02 čer 2023 18:06
-
- 4
- 149
-
od atari
Zobrazit poslední příspěvek
včera, 13:28
-
- 1
- 1815
-
od atari
Zobrazit poslední příspěvek
28 dub 2023 12:08
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 6 hostů