not defteri

[recep]

ben sayfa 1 daki a1 hücresindeki yazının not defterine yazılmasını istiyorum nasıl yapılır

 

[Tarkan VURAL]

SendKeys

Selam;
Sayfanıza bir commandbutton ekleyip aşağıdaki kodu yazınız

Private Sub CommandButton1_Click()
Shell ("C:\WINDOWS\NOTEPAD.EXE"), vbNormalFocus
SendKeys Range("A1").Value
End Sub

Kolay gelsin

 

[ildizim]

bu kod uzun zamandır aradığım koddu. teşekkürler yanlız.
aynı işlemi a1 hücrsinden başlayarak a8 hüsresine kadar notepad'te alt alta nasıl yazdırabilirim.