Sayfa ekleme ve sayfa adını sistem tarihi ile değiştirmek.

[freespirit]

Merhaba,

Vb hakkında pek bir bilgim yok. Yapmak istediğim;
Sayfa ekleyip eklediğim sayfanın adını tarih ile değiştirmek istiyorum.
Mesela
14.04.2012 değilde "140412" sonucunu nasıl döndürebilirim. Sonuna ayrıca bir harf ekleyebilir miyim ?

Aşağıdaki gibi bir kod kullanmam gerekiyor sanırım ama istediğimi elde edemedim.

Sub Sayfa_Ekle()

ThisWorkbook.Sheets.Add

Sheets(ActiveSheet.Name).Name = ...................

End Sub

 

[Orion1]

Buyurunuz.

Sub sayfaekle59()
Sheets.Add After:=Sheets(Sheets.Count)
ActiveSheet.Name = Format(Date, "ddmmyyyy") & "e"
End Sub

 

[freespirit]

Süpersin.
Tam istediğim gibi.
Süper hızlı cevap..

Teşekkürler.