Sayfa 1 deki resmi diğer sayfalara aktarma

[karamelek_fx]

Ekte örneğini vermiş olduğum dosyada sayfa 1 A1 hücresinde bulunan resmi diğer sayfalarda belirleyeceğim hücrelere kopyalamak istiyorum. Sayfa 1 deki resim değiştiği zaman diğer sayfalardaki resimlerinde değişmesini nasıl sağlayabilirim. Konuyu daha önce yeni başlayanlar bölümüne açmıştım. Tekrar konu açtığım için kusura bakmayın.

Formdaki örneklere baktım ama (acemilikten olacak) fazla birşey anlamadım. Yardımda bulunacak arkadaşlar işin mantığını ve nasıl yapılacağını kısada olsa açıklarsa memnun olurum.

Teşekkürler..

 

[hamitcan]

Sub ResimEkle()
sil
Sheets("Sayfa1").Shapes(1).Select
Selection.Copy
[a1].Select
Sheets("Sayfa2").Select
[c8].Select
ActiveSheet.Paste
End Sub

Sub sil()
On Error Resume Next
Sheets("Sayfa2").Select
ActiveSheet.Shapes.SelectAll
Selection.Delete
Sheets("Sayfa1").Select
End Sub

 

[karamelek_fx]

Arkadaşlar yardımlarınız için teşekkürler. Yine olmadı. Artık kopyala yapıştır yaparım.
Kolay gelsin