Colorare cella

Versione Completa Stampa Cerca Utenti Iscriviti Condividi :

Excel Forum » Excel Forum » » Soluzioni Excel Domande e Risposte

lucky5667

00domenica 10 maggio 2020 12:11

colorare cella

salve, ho una tabella con migliaia di nomi, è possibile che usando il pulsante Cerca per trovare un nome in una cella della tabella, la cella che contiene il risultato cambi colore di sfondo? Di default rimane bianca e faccio fatica a vederla subito. Ho Office 365
grazie

rollis13

00domenica 10 maggio 2020 15:01

Metti questa macro nel modulo del Foglio interessato. Se non hai celle colorate autonomamente dovrebbe soddisfare la tua necessità.

Option Explicit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.Interior.ColorIndex = xlNone     'cancella colore
    Target.Interior.ColorIndex = 35     'colore verde
    
End Sub

ABCDEF@Excel

00domenica 10 maggio 2020 15:17

Un saluto a rollis13

Non saprei col 365, in teoria sulla linguetta del foglio, visualizza codice ed incolli sulla destra.
Ammettiamo che hai 1000 nomi in colonna A, se fossero di più aumenti 1000.
Fossero in colonna B cambia in Range("B1:B1000")
Unico fastidio se col mouse selezioni le celle in A

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A1000")) Is Nothing Then
    Range("A1:A1000").Interior.ColorIndex = xlNone
    Cells(Target.Row, 1).Interior.ColorIndex = 8
End If
End Sub

Questa è la versione 'lo-fi' del Forum Per visualizzare la versione completa clicca qui
Tutti gli orari sono GMT+01:00. Adesso sono le 20:49.