Sayfa adı değişince kodlar çalışmıyor

[vurkan]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

Arkadaşlar merhaba. Sizlerin yardımıyla oluşturduğumuz kodlarda sayfa adları değişince sorun yaşıyorum. Örneğin;

Set s1 = ThisWorkbook.Worksheets("LİSTE") Bu sayfa vba da Sayfa2
Set s2 = ThisWorkbook.Worksheets("OKUL") Bu sayfa vba da Sayfa46 olarak gözüküyor.

Burada Örneğin OKUL isimli sayfayı SINIF yapsam kodlardaki bütün OKUL yazılarını sınıfla değiştirmek zorunda kalıyorum.

VBA da kod yazarken ("OKUL") yerine Sayfa46 yazsak bu düzelir mi?
Şayet bu mümkün ise yukarıdaki kod satırını nası yazmalıyım? Saygılar.

 

Otomatik kod ve koşula göre verileri kaydetme

Boş Hücrelerdeki Açıklamaları Bulma

[okutkan]

Aşağıdaki şekilde deneyin.

Görüntülemek için giriş yapmanız gerekmektedir.
(3 satır)

 

[vurkan]

Çok teşekkür ederim üstadım. Saygılar.