Bilgi Çubuğuna Yazı Yazdırma

[fatihkonac]

Arkadaşlar excelde bilgi çubuğuna yazı yazdırmak istiyorum. Yardımcı olursanız sevinirim.

 

[Levent Menteşoğlu]

Bilgi çubuğundan kastınız durum çubuğu ise aşağıdaki kodu deneyin. Sol alt köşeye yazılacaktır.

Sub yaz()
Application.StatusBar = "www.excel.web.tr"
End Sub

 

[fatihkonac]

Bilgi Çubuğuna

Çok Teşekkür Ederim. Kastettiğim buydu. İyi Çalışmalar Dilerim.

 

[cahan1962]

Bu kodu şöyle bir şekilde olabilirmi: yine alt kısmında dosya yolunu yazabilirmi: c:\ahmet\test.htm gibi bu mümkünmü

 

[Levent Menteşoğlu]

Aşağıdaki kodu uygularsanız, aktif dosyanın yolunu yazdırabilirsiniz.

Sub yaz()
Application.StatusBar = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
End Sub

 

[aliakgul]

Merhaba arkadaşlar,
Bu kodları nereye uyarlıyoruz?
(Modüle ve çalışma kitabı kod alanına uyguladım olmadı.)

 

[Korhan Ayhan]

Selamlar,

Sn. aliakgul,

Levent beyin önerdiği kodu boş bir modüle aşağıdaki şekilde uygulayıp çalıştırın.

Sub YAZ()
Application.StatusBar = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
End Sub