Una famiglia di software per fogli di calcolo Microsoft con strumenti per l'analisi, la creazione di grafici e la comunicazione dei dati.
Ciao Christian,
Oltre al suggerimento di Paolo, che saluto, prova anche qualcosa del genere:
Poniamo che la cella della convalida dati sia la cella A2.
- Crea una tabella, miaTabella, elencando i nomi delle nazione nella prima colonna e i nomi delle immagini nella seconda colonna.
- In una cella che sarà coperta dalle bandiere, ad esempio la cella D1,immetti la formula =CERCA.VERT(A2; MiaTabella; 2; FALSO)
- Fai clic dx sulla linguetta del foglio
- Seleziona l'opzione Visualizza Codice
- Incolla il seguente codice:
'=========>>
Option Explicit
'--------->>
Private Sub Worksheet_Calculate()
Const sCellaFormula As String = "D1" '<<==== Modifica
Dim oPic As Picture
Me.Pictures.Visible = False
With Range(sCellaFormula)
For Each oPic In Me.Pictures
If oPic.Name = .Text Then
oPic.Visible = True
oPic.Top = .Top
oPic.Left = .Left
Exit For
End If
Next oPic
End With
End Sub
'<<=========
- Alt-Q per chiudere l'editor di VBA e tornare a Excel.
Salva il file selezionandi il tipo xlsm.
Ora la bandiera richiesta verrà visualizzata in risposta alla selezione di una nazione dall'elenco a discesa in A2.
Potresti scaricare il mio file di prova Christian20150826.xlsm a:
===
Regards,
Norman