- Codice: Seleziona tutto
Dim Foto As String
Foto = Range("ay7")
Range("AD14").Select
ActiveSheet.Pictures.Delete
ActiveSheet.Pictures.Insert(Foto).Select
Selection.ShapeRange.ScaleWidth 0.355, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 0.355, msoFalse, msoScaleFromTopLeft
Range("a1:A1").Select
End Sub
Nella cella 'AY7' ho l'indirizzo della foto sceta di volta in volta con un menù a tendina; nella cella 'AD14' mi compare la foto in oggetto (ovviamente quella scelta dal menù a tendina).
Tutto funzionava perfettamente con una precedente versione di Excel; con l'ultima versione mi compare la foto giusta, ma non in 'AD14'. Perchè? Cosa devo modificare? Grazie