Sayfalarızın İsimlerini Gizleyin Online Eğitimler sadece 49,99 TL. Hem de ikinci eğitim ücretsiz! Makroyu Kopyala 'Excel Makro (VBA) online eğitimleri için: https://www.excelsizeyeter.com/excelsizeyeter.com/udemy_giris.php adresine tıklayınız. Bir eğitim alana bir eğitim bedavadır. İkinci eğitim olarak Excel, Excel pratik çözümler, finans eğitimleri vb. alabilirsiniz. Module bölümüne; Global WCnt Global Sh(1 To 100) As Worksheet Global ShNames(1 To 100) As String 'workbook'un code una; Public Sub Workbook_Open() Dim i As Integer WCnt = Worksheets.Count For i = 1 To WCnt ShNames(i) = Sheets(i).Name Set Sh(i) = Sheets(ShNames(i)) Next i End Sub Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Dim z As Integer For z = 1 To WCnt Sh(z).Name = ShNames(z) Next z End Sub Bu makro ile ilgili sorun bildir Bu makro çalışmıyor. Kodlarda bir hata var. Diğer Hata ile ilgili görüşlerinizi aşağıdaki kutuya yazabilirsiniz. Hata bildir TÜM MAKROLAR Youtube Kanalımız Aşağıdaki makrolar işinize yarayabilir. Benzer Sonuçlar NoMakro Adı 1 sayfalarızın isimlerini gizleyin 2 sayfalara şifre koymak 3 aktif sayfa ve hücreden itibaren tüm sayfaların isimlerini yazar ve sayfalara link ekler 4 Excel dosyasındaki sayfa isimlerini görünmez yapma 5 istediğiniz sayfa hariç sayfadaki verileri temizler 6 süzlü aktarma 7 comboboxa göre kayıt 8 bir kitaptaki sayfalara başka bir kitaba taşımak 9 çalışma sayfalarinizin isimleri değiştirme 10 sayfa isimlerini comboboxa aktarma 11 sayfa isimlerini listelemek 1 12 sayfa isimlerini listelemek 2 13 sayfa isimlerini z den a ya sıralama 14 sayfa isimlerini büyük harfe çevirme 15 sayfa isimlerini sayfanın a sütununa yazdırma 16 sayfa isimlerini toptan değiştirme 17 sayfa isimlerini olduğu gibi sıralar 18 sayfa isimlerini sırayla mesaj vererek sayar 19 sayfa isimlerini a1 den itibaren listele 20 listbox'a sayfa isimlerini alma