• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

sayfa ismini yazdırma hk.

zetkatamet

Altın Üye
Katılım
13 Mart 2008
Mesajlar
1,424
Excel Vers. ve Dili
Office 365 Türkçe
Arkadaslar,
Sayfa isimlerini örnegin a1 e yazdırabilirmiyiz, sayfa adını değiştirdiğimde a1 de degisecek. Cevaplariniz icin tesekkurler.
 

Ekli dosyalar

Merhaba,

Kod:
=SAĞDAN(HÜCRE("DosyaAdı";A1);UZUNLUK(HÜCRE("DosyaAdı";A1))-MBUL("]";HÜCRE("DosyaAdı";A1);1))

.
 
Merhaba Ömer bey,
Cok isime yaradı. Tekrar tesekkurler.
 
peki ömer bey,
=SAĞDAN(HÜCRE("DosyaAdı";A1);UZUNLUK(HÜCRE("DosyaAdı";A1))-MBUL("]";HÜCRE("DosyaAdı";A1);1))

koddaki A1 in cok onemi var mi? ayni kodu ornegin b5 hucresine yazdim yine ismi verdi.
 
Hayır yok. Burada bir hücre başvurusu kullanılmasındaki amaç şudur. Çalışma açıkken farklı bir excel dosyası açarsanız formül yeni açtığınız çalışma sayfasındaki adı verir. Bu yüzden çalıştığınız sayfadaki bir hücreyi formüle ilave ederek bu kontrolü yapmış oluruz.

.
 
merhaba
alternatif olsun

Kod:
Private Sub Worksheet_Activate()
[a1] = ActiveSheet.Name
End Sub

isterseniz Worksheet_SelectionChange altında yazabilirsiniz.
 
Neden çalışmıyor artık. Önceden çalışıyordu =SAĞDAN(HÜCRE("DosyaAdı";A1);UZUNLUK(HÜCRE("DosyaAdı";A1))-MBUL("]";HÜCRE("DosyaAdı";A1);1)) bu formül...
 
Neden çalışmıyor artık. Önceden çalışıyordu =SAĞDAN(HÜCRE("DosyaAdı";A1);UZUNLUK(HÜCRE("DosyaAdı";A1))-MBUL("]";HÜCRE("DosyaAdı";A1);1)) bu formül...

İki tahminim var:
1. Formülün çalışması için dosyanızı kaydetmeniz gerekiyor.
2. Tamamında büyük harf kullanmayı deneyiniz.
Kod:
=SAĞDAN(HÜCRE("[COLOR="Red"]DOSYAADI[/COLOR]";A1);UZUNLUK(HÜCRE("[COLOR="red"]DOSYAADI[/COLOR]";A1))-MBUL("]";HÜCRE("[COLOR="red"]DOSYAADI[/COLOR]";A1);1))
 
Aktif sayfa açıkken bile kendini unutuyor ve sık sık yinele (F9) istiyor.
Saygılarımla
Tevfik Kurşun
 
Teşekkür ederim, ama başka işlemler için otomatik kalmalı. O nedenle kullanımdan vazgeçtim.
Tekrar ilginize teşekkür ederim.
Saygılarımla
Tevfik Kurşun
 
Geri
Üst