excell sayfasında a1 hücresinde sayfa numarasının görünmesi

[MES_ELE]

arkadaşlar excell sayfasında a1 hücresinde sayfa numarasının görünmesini istiyorum mesela sayfa1 'de a1 hücresinde "sayfa3" yazsın istiyorum bir formülle.. teşekkür ederim kolay gelsin

 

[uzmanamele]

merhaba
doğru mu anladım bilmiyorum. bu mudur?

kod ile

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
[a1] = ActiveSheet.Name
End Sub

fonksiyon ile

=SAĞDAN(HÜCRE("DosyaAdı");UZUNLUK(HÜCRE("DosyaAdı"))-BUL("]";HÜCRE("DosyaAdı")))