sayfa2'de oluşturulan şekli sayfa1'e bir makro yardımı ile oluşturmakk??

[udentr2002]

merhaba sayın hocalarım ekli dosyada da anlatmaya çalıştım sayfa2'de oluşturduğum bir şekli sayfa1'e yada herhangi bir sayfada ve benim seçtiğim aktif olan bir hücrewden başlamak koşulu ile nasıl oluşturabilirim yardımcı olursanız sevinirim. şimdiden teşekkür ederim saygılarımla

 

[udentr2002]

sayın hocalarım

lütfen bilen bir arkadaşım varsa cevap verirse çok memnun olurum

 

[Merhum İdris SERDAR]

Şekliniz Sayfa2'de olmak, kitabınızda Sayfa1 bulunmas1 koşuluyla, bu macroyu çalıştırdığınızda şekli dilediğiniz sayfadaki yer ve yerlere yapıştırabilirsiniz.

Sub Makro1()
Sheets("Sayfa2").Select
Range("B3:J8").Select
Selection.Copy
Sheets("Sayfa1").Select
End Sub