Dobrý den, potřeboval bych makro, které vymaže data z listu mimo prvního řádku, ale s ověřením, (hláškou) "Chcete opravdu provést smazání dat? ANO, NE
Poradíte?
Makro na vymazání dat
Re: Makro na vymazání dat
Toto je primitivní a nejjednodušší způsob. Vymaže aktivní list. To je ten, který je otevřený.
Platí pro Excel 2007 a výše, kde je 16 384 sloupů a 1 048 576 řádků. V případě jiného počtu jenom upravíš hodnotu RANGE.
Platí pro Excel 2007 a výše, kde je 16 384 sloupů a 1 048 576 řádků. V případě jiného počtu jenom upravíš hodnotu RANGE.
Kód: Vybrat vše
Sub vymaz()
i = MsgBox("Chcete vymazat list kromě prvního řádku?", vbYesNo)
If i = vbYes Then Range("a2:xfd1048576").ClearContents
End Sub
Re: Makro na vymazání dat
Funguje supr.
Děkuji
Děkuji
-
- Mohlo by vás zajímat
- Odpovědi
- Zobrazení
- Poslední příspěvek
-
- 9
- 1361
-
od mmmartin
Zobrazit poslední příspěvek
29 srp 2023 16:47
Kdo je online
Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 18 hostů