Nazdar.
Potřebuji poradit.
V proměnné "m" mám názem příslušného listu a potřebuji zjistit jestli se tento list s tímto názvem v souboru existuje.
Aby řádek Worksheets(m).Cells .... neskončil chybou.
Díky.
VB - Excel, otestování existence listu
Udělej to takhle:
Anebo ho nech skončit s chybou, ale využij ji:
Kód: Vybrat vše
check = False
For i = 1 To Worksheets.Count
If m = Worksheets(i).Name Then check = True
Next i
If check Then Worksheets(m).Cells ...
Anebo ho nech skončit s chybou, ale využij ji:
Kód: Vybrat vše
...
On Error GoTo NOLIST
Worksheets(m).Cells ...
...
Exit Sub
NOLIST:
MsgBox "Tento list neexistuje"
End Sub
Znáte pravidla?
Tipy a triky ve Windows XP
Návody: HijackThis, MWAV, CCleaner (THX to mijaja)
Problémy, které chcete vyřešit pište sem do fóra. Neposílejte je emailem ani po ICQ!
Tipy a triky ve Windows XP
Návody: HijackThis, MWAV, CCleaner (THX to mijaja)
Problémy, které chcete vyřešit pište sem do fóra. Neposílejte je emailem ani po ICQ!
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
-
Excel - automatický export listů xls do pdf včetně pojmenování Příloha(y)
od kalosek » 28 čer 2023 20:31 » v Kancelářské balíky - 2
- 2022
-
od kalosek
Zobrazit poslední příspěvek
29 čer 2023 19:39
-
-
- 16
- 6239
-
od mirekol
Zobrazit poslední příspěvek
20 říj 2023 08:31
-
-
Excel komparacedvou soborů Příloha(y)
od teichmann.ondrej » 15 dub 2024 17:26 » v Kancelářské balíky - 4
- 1514
-
od elninoslov
Zobrazit poslední příspěvek
dnes, 00:29
-
-
- 1
- 375
-
od Grimm
Zobrazit poslední příspěvek
12 bře 2024 21:43
-
- 3
- 1967
-
od Story-Long
Zobrazit poslední příspěvek
14 srp 2023 10:11
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 2 hosti