Inserimento immagini dinamiche in Excel 2007

Anonimo
2013-05-14T13:43:39+00:00

Ciao, vorrei sapere come fare per inserire un campo immagine il cui contenuto sia variabile al variare del contenuto di una determinata cella dello stesso foglio di lavoro. Ho provato con controllo immagine ActiveX ma non riesco, come posso fare?

Grazie mille

Microsoft 365 e Office | Excel | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento
Risposta accettata dall'autore della domanda
Anonimo
2013-05-14T14:05:56+00:00

Ciao, vorrei sapere come fare per inserire un campo immagine il cui contenuto sia variabile al variare del contenuto di una determinata cella dello stesso foglio di lavoro. Ho provato con controllo immagine ActiveX ma non riesco, come posso fare?

Grazie mille

Se le immagini non sono molte, puoi partire da qui:

http://www.maurogsc.eu/esempiforum10/cambiaimmagini.zip

Se le immagini sono molte, meglio non tenerle nel foglio. Puoi partire da qui:

http://www.maurogsc.eu/esempiforum13/cambiaimmagini2.zip

La risposta è stata utile?

10+ persone hanno trovato utile questa risposta.
0 commenti Nessun commento

64 risposte aggiuntive

Ordina per: Più utili
  1. Anonimo
    2014-03-05T16:13:23+00:00

    ...

    Posso in alternativa mandarti tutta la cartella con i file?

    Fammi sapere,

    Grazie,

    Alessio.

    Ciao Alessio,

    questa mi pare la soluzione migliore. Elimina tutti i dati sensibili e lascia solo il foglio incriminato e naturalmente l'immagine.

    Come pubblicare file e immagini, oppure adopera tu altro metodo.

    Andrea.

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Anonimo
    2014-03-05T15:52:09+00:00

    Ciao Andrea,

    ho fatto quanto mi hai detto e confermo che il tuo file funziona benissimo, anche con altre immagini. L'immagine che ho inserito viene ridimensionata ma non tagliata. Invece il mio codice non fa la stessa cosa. Ti copio qui sotto il codice che sto usando:

    Private Sub Worksheet_Change(ByVal Target As Range)

    Dim s As String, LarghezzaInCentimetri As Single

      s = ThisWorkbook.Path & ""

      With Target

        If .Address = "$A$7" Then

          If .Value <> "" Then

              Me.Image1.Picture = LoadPicture(s & .Value & ".jpg")

              Me.Image1.AutoSize = True

              Me.Image1.Top = Me.Range("B25").Top

              Me.Image1.Left = Me.Range("B25").Left

              LarghezzaInCentimetri = 10

              Me.Image1.ShapeRange.LockAspectRatio = msoTrue

              Me.Image1.Width = Application.CentimetersToPoints(LarghezzaInCentimetri)

          End If

        ElseIf .Address = "$AJ$27" Then

          If .Value <> "" Then

              Me.Image2.Picture = LoadPicture(s & .Value & ".jpg")

              Me.Image2.AutoSize = True

              Me.Image2.Top = Me.Range("Z25").Top

              Me.Image2.Left = Me.Range("Z25").Left

              LarghezzaInCentimetri = 10

              Me.Image2.ShapeRange.LockAspectRatio = msoTrue

              Me.Image2.Width = Application.CentimetersToPoints(LarghezzaInCentimetri)

          End If

        End If

      End With

    End Sub

    Posso in alternativa mandarti tutta la cartella con i file?

    Fammi sapere,

    Grazie,

    Alessio.

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2014-02-26T10:00:09+00:00

    Ciao Andrea,

    ho visto il tuo ridimensionaImmagini e funziona molto bene. Forse allora potrebbe essere un problema, piuttosto che di codice, di qualche impostazione delle proprietà di image1 e image2?

    Alessio.

    E come potrei saperlo senza vedere?

    Cancella dal mio file l'immagine del fiore ed incolla dal tuo l'immagine che viene tagliata, chiamala PicC2 e fai girare il codice.

    Andrea.

    La risposta è stata utile?

    0 commenti Nessun commento
  4. Anonimo
    2014-02-26T09:26:32+00:00

    Ciao Andrea,

    ho visto il tuo ridimensionaImmagini e funziona molto bene. Forse allora potrebbe essere un problema, piuttosto che di codice, di qualche impostazione delle proprietà di image1 e image2?

    Alessio.

    La risposta è stata utile?

    0 commenti Nessun commento