A sütunundaki 60 isim için sayfa yaratma

[assenucler]

Değerli dostlar merhabalar..


Excel Sayfa1 A sütununda "A01 Ahmet Soylu" şeklinde 60 farklı hane kayıtlı, bu isimler için makro ile sayfa yaratmak istiyorum.

Sayfa2'den başlayan sonraki 60 sayfanın A2:H2 aralığına "AY, HANE NO, AİDAT ADI, BORÇLU, DENETİM, BORÇ TUTARI, ÖDENEN, KALAN

başlıklarının yer alması için, Makro kodu nasıl olmalıdır?

Teşekkürler.

 

[Muhammet Okumuş]

Merhaba,
Sayfaların nasıl olmasını istiyorsanız, bir tane Şablon Sayfası hazırlayınız.
Daha sonra döngü ile sayfaları çoğaltınız

 

[Muhammet Okumuş]

Bir tane Data ve Şablon sayfası oluşturunuz. Data sayfasının A1:A3 aralığına sayfa isimlerini yazınız.

Sub Kopya()
For i = 1 To 3
Sheets("Şablon").Copy after:=Sheets(Sheets.Count)
ActiveSheet.Name = Sheets("Data").Cells(i, 1).Value
Next
End Sub

 

[Merhum İdris SERDAR]

Değerli dostlar merhabalar..


Excel Sayfa1 A sütununda "A01 Ahmet Soylu" şeklinde 60 farklı hane kayıtlı, bu isimler için makro ile sayfa yaratmak istiyorum.

Sayfa2'den başlayan sonraki 60 sayfanın A2:H2 aralığına "AY, HANE NO, AİDAT ADI, BORÇLU, DENETİM, BORÇ TUTARI, ÖDENEN, KALAN

başlıklarının yer alması için, Makro kodu nasıl olmalıdır?

Teşekkürler.

.

Burada bir çözüm verdim.

http://www.excel.web.tr/f48/veriler-suzuldukten-sonra-sayfaya-makroyla-aktarma-t123426.html


.

 

[assenucler]

Teşekkürler.

Sayın Muhammet Okumuş,


İlginiz ve yanıtınız için içten teşekkürler.

Yeni yılınızı kutlar. Sağlık, huzur, mutluluk ve bol kazançlı nice yıllar dilerim.

Sevgi ve saygılar.

 

[assenucler]

Değerli üstadım yurttas,


Bir kez daha teşekkürlerimi, sevgi ve saygılarımı sunarım.

 

[Muhammet Okumuş]

Sayın Muhammet Okumuş,


İlginiz ve yanıtınız için içten teşekkürler.

Yeni yılınızı kutlar. Sağlık, huzur, mutluluk ve bol kazançlı nice yıllar dilerim.

Sevgi ve saygılar.

Aynı dileklerimle.
İyi çalışmalar...