Hücreye Eklenen Not

[kemalgs]

Herkese Slm ;

Hücreye ekledigim notu yazıcıdan cıktı aldıgımda göremiyorum, bir yolu var mı ? Tesekkürler .

RGDS

 

[Necdet]

Merhaba,

Eğer hücre açıklamalarını da listelemek istiyorsanız,

Dosya
Sayfa Yapısı
Sayfa Sekmesinde Açıklamaların Nasıl olması gerektiğini belirtmelisiniz.

 

[kemalgs]

YArdımınız için tesekkürler ama malesef olmadı . Bnm yapmak istdgm mesela a10 hücresine 1 not ekledim bu notu yazıcıdan cıkarırken görmek istiyorum .

RGDS

 

[Necdet]

Merhaba,

Sayfanın sonuna yazdır dediğimde notu yazdırdı.

 

[ismailmuhcu]

Hücredeki açıklamayı yan hücreye yazarak çıktı almak isterseniz eğer;
(Burada hücre açıklamasının A1 de olduğu, açıklamanın ekleneceği hücre de B1 olduğu varsayılmıştır.)

Sub aciklamaekle()
Sheets("Sayfa1").Range("B1") = Sheets("Sayfa1").Range("A1").Comment.Text
End Sub