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
- 3575
-
od luko02420
Zobrazit poslední příspěvek
16 kvě 2023 11:27
-
- 0
- 809
-
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
-
- 2
- 33
-
od atari
Zobrazit poslední příspěvek
před 39 minutami
-
- 1
- 1810
-
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 8 hostů