Sayfadaki Bütün Açıklamaları Gizlemek

[mustafa1205]

Herkese hayırlı sabahlar. Excel çalışma sayfamda binlerce hücrelerde açıklama mevcut. Hepsi de görünür durumda. Bunları kod yardımıyla hepsini nasıl gizleyebiliriz?

 

[askm]

Aşağıdaki kodlar ile yapabilirsiniz.

Sub gizle()

Cells.Select
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Range("A1").Select
End Sub

 

[YUSUF44]

Sayın İdris Serdar'dan alıntıdır:

Sub gizle()

Cells.Select
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Range("A1").Select
End Sub

Kaynak:

http://www.excel.web.tr/f48/acyklama-gizle-goster-t34860/sayfa2.html

 

[Emir Hüseyin Çoban]

. . .

Makroya gerek var mı. Şu şekilde deneyiniz.

Ekran Görüntüsü (GİF):


. . .

 

[askm]

Sayfadan çok faydalanıyorum. Güzel gördüğüm kodları da kod arşivime ekliyorum. Ama linkini ve paylaşan kişiyi yazmıyorum. Kodları İdris Serdar Bey yazmış olabilir. Kendisine saygılarımı ve selamlarımı sunarım.

 

[YUSUF44]

Sayfadan çok faydalanıyorum. Güzel gördüğüm kodları da kod arşivime ekliyorum. Ama linkini ve paylaşan kişiyi yazmıyorum. Kodları İdris Serdar Bey yazmış olabilir. Kendisine saygılarımı ve selamlarımı sunarım.

Sanıyorum bu mesaj bana yönelik. MEsajlarımızın üstüste gelmesi tamamen tesadüf, sizin mesajı görmeden cevap yazdım. Kaynağımı belirtmemin kesinlikle sizinle bir ilgisi yok. Kendim çözemeyince arama yaptım ve bulduğum sonucu paylaştım.

 

[mustafa1205]

Hocalarıma çok teşekkür ediyorum. Hüseyin Hocam işyerinde office 2003 olduğu için koda ihtiyacım oldu. Kodlar gayet işime yaradı. Çok teşekkür ederim