copiaincolla immagini



  • copia/incolla immagini
    di beu (utente non iscritto) data: 09/06/2016 17:39:48

    ciao a tutti
    utilizzo un comando preso da un altro forum di questo sito, scritto da MAURO per fare copia/incolla di immagini tra fogli di lavoro.

    con excel 2010 tutto ok
    il problema mi sorge quando il file viene aperto da un excel 2007
    la sub non funziona, non viene riconosciuta l'immagine e mi copia e incolla il primo commandbutton che trova.

    sapete aiutarmi??
     
    Private Sub CommandButton1_Click()
    Worksheets("Foglio2").Select
    Worksheets("Foglio1").Shapes("Picture 1").Copy
    ActiveSheet.Paste Destination:=Worksheets("Foglio2").Range("B3")
    Worksheets("Foglio1").Range("B5").Copy
    ActiveSheet.Paste Destination:=Worksheets("Foglio2").Range("B5")
    End Sub
    



  • di patel data: 09/06/2016 18:03:36

    fai l'operazione manualmente dopo aver attivato il registratore di macro e cambia il codice di conseguenza