Ülemusele/juhtkonnale aruannete ettevalmistamisel kipume Excelis Excelis kommentaare sisestama, et lasta teisel inimesel ülesande olekut teavitada. Kommentaare kasutatakse sisemiselt. Selles artiklis õpime, kuidas eemaldada kõik kommentaarid Excelist, kasutades makrosid.
Küsimus): Soovin rakendada VBA -koodi, mis eemaldab töövihikust kõik kommentaarid.
Kasutan kodus Excel 2003 versiooni ja kontoris Excel 2010 versiooni. Mul on kood, mis töötab suurepäraselt Excel 2010 kommentaaride kustutamisel, kuid ei saa Excel 2003 kommentaare kustutada.
Peame järgima järgmisi samme:
- Klõpsake vahekaarti Arendaja
- Valige koodirühmas Visual Basic
- Klõpsake nuppu Sisesta ja seejärel Moodul
- See loob uue mooduli
- Sisestage standardmoodulisse järgmine kood
Järgmine kood ühildub versioonidega Excel 2007, Excel 2010 ja Excel 2013
Sub Remove_Comments_After2007 ()
'Eemalda kommentaarid Excel 2007 töövihikust
ActiveWorkbook.RemoveDocumentInformation (xlRDIComments)
End Sub
Järgmine kood ühildub Excel 2003 versiooniga
Sub Remove_Comments_2003 ()
'Eemalda kommentaarid Excel 2003 töövihikust
Dim wksAs tööleht
Dim cmnt kommentaarina
Iga wksInActiveWorkbook.Sheets jaoks
Iga cmntInwksi jaoks. Kommentaarid
cmnt. Kustuta
Järgmine cmnt
Edasi
End Sub
- Makro käivitamiseks vajutame ALT + F8 kiirklahv Makroakna avamiseks ja makro valimiseks.
- Kõik kommentaarid kustutatakse.
Sel viisil saame Exceli kommentaarid kustutada sõltuvalt kasutatavast versioonist.
