V programe Excel pri príprave správ pre šéfa/manažment zvyčajne vkladáme komentáre, aby druhá osoba mohla informovať o stave úlohy. Komentáre sa v zásade používajú na interné účely. V tomto článku sa naučíme, ako odstrániť všetky komentáre v programe Excel pomocou makier.
Otázka): Chcel by som použiť kód VBA, ktorý odstráni všetky komentáre zo zošita.
Používam verziu Excel 2003 doma a verziu Excel 2010 v kancelárii. Mám kód, ktorý perfektne beží pri odstraňovaní komentárov programu Excel 2010, ale nedokáže odstrániť komentáre programu Excel 2003.
Musíme postupovať podľa nasledujúcich krokov:
- Kliknite na kartu Vývojár
- V skupine Kód vyberte položku Visual Basic
- Kliknite na Vložiť a potom na Modul
- Tým sa vytvorí nový modul
- Do štandardného modulu zadajte nasledujúci kód
Nasledujúci kód je kompatibilný s verziami Excel 2007, Excel 2010 a Excel 2013
Sub Remove_Comments_After2007 ()
„Odstráňte komentáre zo zošita programu Excel 2007
ActiveWorkbook.RemoveDocumentInformation (xlRDIComments)
Koniec pod
Nasledujúci kód je kompatibilný s verziou programu Excel 2003
Sub Remove_Comments_2003 ()
„Odstráňte komentáre zo zošita programu Excel 2003
Dim wksAs pracovný list
Dim cmnt Ako komentár
Pre každý wksInActiveWorkbook.Sheets
Pre každého cmntInwks.Comments
cmnt.Delete
Ďalší cmnt
Ďalšie
Koniec pod
- Na spustenie makra stlačíme ALT + F8 klávesovou skratkou otvoríte okno Makro a vyberiete makro.
- Všetky komentáre budú vymazané.
Týmto spôsobom môžeme odstrániť komentáre programu Excel v závislosti od verzií, ktoré používame.
