Sayfa Adını İstenen Şekilde Sabitleme

  • Konuyu başlatan Konuyu başlatan keremd
  • Başlangıç tarihi Başlangıç tarihi
Katılım
10 Nis 2023
Mesajlar
27
Excel Versiyonu
Excel 2021
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Sn. [B]AhmetRasim[/B] Bey iyi günler
kod şuan sayfa ismi FATURA olursa Set sh = Worksheets("FATURA") seçili alanları pdf dönüştürüyor.
Ben de diyorum ki sayfa ismine bağlı kalmasın sürekli değişir bugün FATURA olur yarın başka bir şey. umarım anlatabilmişimdir. Saygılarımla. iyi çalışmalar
 
Bu kodu, sayfa üzerinde bulunan CommandButton1 den çalıştırıyorsanız,
Set sh = Worksheets("FATURA") satırını Set sh = ActiveSheet olarak değiştirmeniz yeterli.

Ancak UserForm'dan çalıştırıyorsanız, şu şekilde yapabilirsiniz.
-- Örnek olarak 2. sekmeye Fatura yazdım.
1703770614570.webp


-- VBA Penceresini açın.
1703770568895.webp

Burada parantez içerisinde yazanlar sekme üzerinde görünen ismidir.
Kod içerisinde Set sh = Sayfa2 olarak kullanabilirsiniz.

Daha sonradan sekme üzerindeki ismi değiştirdiniz diyelim.
Örnek Fatura123 yazdım.
1703770788524.webp


Tekrar VBA ekranını açalım.
1703770837258.webp

Gördüğünüz gibi Sayfa2 sabit, parantez içerisindeki yazan isim değişti ama sh değişkenine yapılan tanımlama yine Sayfa2 olarak devam eder.
 
Sn. Ahmet Bey tekrar hayırlı işler
kod hata verdi ilgili dosyamı ekliyorum size zahmet düzenlemeyi yapıp deneyebilirmisiniz nerde hata yaptım. İlginiz için şimdiden teşekkürler.
 

Ekli dosyalar

1703830606291.webp

Resimde belirttiğim Sayfa3 ün kod bölümünde bulunan Private Sub Workbook_BeforeClose(Cancel As Boolean) kodlarını ThisWorkbook bölümüne taşıyın.
 
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt