Sayfa isminin sayfa içinde yazdırılması

[welqmx]

Merhaba Arkadaşlar

Excel çalışma kitabında sayfa ismini (örneğin "sayfa1" - "sheet1" ) sayfanın herhangi bir hücresine nasıl yazdırabilirim

 

[İhsan Tank]

merhaba
bu kodu çalışma kitabınızın Thisworkbook Sayfanıza yapıştırınız.

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Range("a2") = ActiveSheet.Name
End Sub

kod : uzmanamele uzman'dan Alıntıdır.
Hocama teşekkür ederim
eki inceleyiniz

 

[mustafaine1]

alternatif olsun..

=MID(CELL("filename"),(FIND("]",CELL("filename"))+1),50)

 

[welqmx]

yardımlarınız için çok teşekkür ederim

 

[İhsan Tank]

yardımlarınız için çok teşekkür ederim

rica ederim iyi çalışmalar

 

[tahsinanarat]

=MID(CELL("filename"),(FIND("]",CELL("filename"))+1),50)
formülünü Türkçe olarak nasıl yazmalıyız

 

[İhsan Tank]

=MID(CELL("filename"),(FIND("]",CELL("filename"))+1),50)
formülünü Türkçe olarak nasıl yazmalıyız

mıd = ortadan
cell = hücre
fınd = bul