SAYFA ADINI A1 A2 A3 VB OTOMATİK AÇTIRMAK

[ertuer]

SAYFA ADINI A1 A2 A3 VB OTOMATÝK AÇTIRMAK

Sn Arkadaşlar excel de sayfa1 ,sayfa2 diye açılan sayfaları örneğin
A1 A2 A3 gibi,tek tek girmeden otomatik olarak seri olarak mesela 30 adet açtırabilirmiyiz ? Böyle bir özellik var mı dır ? A1 A2 A3......A30 gibi

 

[xxrt]

Sayın ertuer,
Biraz daha açarmısın konuyu?

 

[ertuer]

Sn xxrt , örneğin bir ekcel çalışma kitabınada 1 aylık her aya bir gin düşecek şekilde, 30 adet sayfa açmak istiyorum.otomatik 30 adet sayfa açtırmak kolay bunu biliyorum.Ancak excel bu sayfaları : sayfa1 sayfa2.....sayfa30 olarak açıyor.
Ben istiyorum ki sekme adlarını yani sayfaları örnrğin 1A,2A,3A......30A olarak açsın istiyorum. selamlar

 

[zafer]

Merhaba


Sub sayfaekle()
On Error Resume Next
For i = 1 To 30
Sheets.Add After:=Sheets(Sheets.Count)
Sheets(i).Name = i & "a"
Next
End Sub

 

[osmantelci]

Sub Sayfalar()
For i = 1 To 30 - Sheets.Count: Sheets.Add After:=Sheets(Sheets.Count): Next
For i = 1 To 30: Sheets(i).Name = i & "A": Next
End Sub

 

[ertuer]

sn zafer ve osmantelci ilgi ve yardımlarınıza çok teşekkür ederim.sorunum çözüldü.emeğinize saygı ile selamlar hoşça kalın