Med pripravo poročil za vodjo/vodstvo v Excelu ponavadi vstavljamo komentarje, da bi drugi osebi sporočili stanje naloge. Komentarji se v bistvu uporabljajo za notranje namene. V tem članku se bomo naučili, kako odstraniti vse komentarje v Excelu z uporabo makrov.
Vprašanje): Rad bi uporabil kodo VBA, ki bo odstranila vse komentarje iz delovnega zvezka.
Doma uporabljam različico Excel 2003, v pisarni pa različico Excel 2010. Imam kodo, ki odlično deluje pri brisanju komentarjev programa Excel 2010, vendar ne more izbrisati komentarjev programa Excel 2003.
Slediti moramo naslednjim korakom:
- Kliknite zavihek Razvijalec
- V skupini Koda izberite Visual Basic
- Kliknite Vstavi in nato Modul
- To bo ustvarilo nov modul
- V standardni modul vnesite naslednjo kodo
Naslednja koda je združljiva z različicami Excel 2007, Excel 2010 in Excel 2013
Sub Remove_Comments_After2007 ()
'Odstrani komentarje iz delovnega zvezka programa Excel 2007
ActiveWorkbook.RemoveDocumentInformation (xlRDIComments)
End Sub
Naslednja koda je združljiva z različico Excel 2003
Sub Remove_Comments_2003 ()
'Odstrani komentarje iz delovnega zvezka programa Excel 2003
Dim wksAs delovni list
Dim cmnt Kot komentar
Za vsak wksInActiveWorkbook.Sheets
Za vsak cmntInwks.Comments
cmnt.Izbriši
Naslednji cmnt
Naslednji
End Sub
- Za zagon makra pritisnemo ALT + F8 bližnjica, da odprete okno makra in izberete makro.
- Vsi komentarji bodo izbrisani.
Na ta način lahko izbrišemo komentarje programa Excel glede na različice, ki jih uporabljamo.