hücredeki resmi makro ile taşıma

[enderuzuner]

Arkadaşlar,excelde bir hücredeki(örneğin a5) yazıyı makro ile bir başka sayfadaki hücreye taşıyabiliyorum.Ancak hücreye eklediğim resmi bir başka hücreye makro ile taşıyamıyorum.Çözüm konusunda yardımcı olursanız sevinirim.Şimdiden teşekkürler.

 

[Civan Jack]

Kopyalamak için;

Sub FotoCopy()
    Sheets("Sayfa1").Shapes("1 Resim").Copy
    Sheets("Sayfa1").Range("H1").PasteSpecial
End Sub

Taşımak için;

Sub FotoMove()
    Sheets("Sayfa1").Shapes("1 Resim").Cut
    Sheets("Sayfa1").Range("H1").PasteSpecial
End Sub

 

[enderuzuner]

Deneyeceğim,teşekkürler.