sayfaya göre yilin haftalari

[arivo]

selam arkadaslar ben her sayfaya yilin haftalarini eklemek istiyorum,kisaca
sayfa birde 1.hafta,sayfa2 de 2. hafta ... gibi
makroda ilk hafta söyle oldu
Sub Makro4()
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "KW.1" ,KW1 1. hafta demek
End Sub
digerlerini kisaca yazmanin imkani varmi yardimci olursaniz sevinirim

 

[Necdet]

Merhaba,

Sub SayfaAdiDegistir()
For i = 1 To Sheets.Count
    Sheets(i).Select
    Sheets(i).Name = "KW." & i
Next i
End Sub

 

[arivo]

Usta cok sagol,sizlerin ve bu boardin sayesinde cok seyler ögreniyor benim gibi acemiler.