Problema da Risolvere: Creare una macro VBA che chiede all’utente di inserire un valore. La macro poi cerca questo valore in un range specificato e evidenzia tutte le celle che contengono quel valore.

Codice Commentato:

vbaCopy codeSub EvidenziaValori()
    ' Questa macro cerca un valore fornito dall'utente in un range e evidenzia le celle corrispondenti.

    Dim valoreRicercato As Variant
    Dim cella As Range
    Dim rangeDiRicerca As Range

    ' Chiede all'utente di inserire il valore da cercare
    valoreRicercato = InputBox("Inserisci il valore da cercare e evidenziare:")

    ' Imposta il range di ricerca (ad esempio, da A1 a D10)
    Set rangeDiRicerca = ThisWorkbook.Sheets("Foglio1").Range("A1:D10")

    ' Ciclo attraverso ogni cella nel range di ricerca
    For Each cella In rangeDiRicerca
        If cella.Value = valoreRicercato Then
            ' Se il valore corrisponde, cambia il colore di sfondo in giallo
            cella.Interior.Color = RGB(255, 255, 0)
        End If
    Next cella
End Sub

Istruzioni:

  1. Apri Excel e un nuovo Foglio di lavoro.
  2. Assicurati di avere dei dati nel range A1:D10.
  3. Premi ALT + F11 per aprire l’editor VBA.
  4. Nel menu, vai su Inserisci > Modulo per creare un nuovo modulo.
  5. Copia e incolla il codice sopra nel modulo.
  6. Premi F5 per eseguire la macro.
  7. Quando richiesto, inserisci il valore che vuoi cercare e premi OK.
  8. Le celle che contengono il valore inserito saranno evidenziate in giallo.

Questo esempio introduce concetti intermedi come l’interazione con l’utente, la ricerca di valori in un range e l’uso di cicli per iterare attraverso le celle di un foglio di lavoro. È un buon esempio per coloro che hanno già una conoscenza di base di VBA e vogliono esplorare funzionalità più avanzate.

Leave A Comment

Recommended Posts

Il Bitcoin è uno schema Ponzi?

In questo articolo, esaminiamo come funziona il Bitcoin, lo paragoniamo a quello che si sa degli schemi Ponzi e proviamo a rispondere a questa domanda.

Sei Libri Essenziali per Amanti della Fisica

Oggi, vi porto in un viaggio attraverso sei opere che non solo spiegano la fisica, ma la rendono vivace e affascinante. Questi libri non sono soltanto testi, ma finestre aperte sulle meraviglie dell’universo, scritti da alcune delle più brillanti menti del nostro tempo.