Sayfayı diğer sayfaya kopyalama

[samuelsaw]

ekteki dosyada reçete_copy sayfasında oluşturduğum reçeteyi kopyala butonuyla sayfa 1 de belirrtiğim alanlara aktarmak istiyorum...300 den fazla reçete var bunları alt alta sayfa1 de nasıl aktarabilirim?

 

[samuelsaw]

acaba yeterli bilgi veremedim mi? yoksa yapılamıycak bişey mi?

 

[Levent Menteşoğlu]

Dosyanızdaki ilgili koddaki "b" değişkenini içeren satırı aşağıdaki ile değiştirin.

b = Sheets("sayfa1").[a65536].End(3).Row + 1

 

[samuelsaw]

Dosyanızdaki ilgili kodddaki "b" değişkenini içeren satırı aşağıdaki ile değiştirin.

b = Sheets("sayfa1").[a65536].End(3).Row + 1

levent bey çok teşekkür ederim...iki gündür uğraşıyodum...ezbere gidince böyle oluyo işte...tekrar teşekkür ederim...