Formattazione condi...
 
Notifiche
Cancella tutti

La consultazione del forum è libera per tutti.

Per poter porre un quesito è invece necessario essere un utente registrato (clicca qui se non lo sei).

Tutti gli utenti che richiedono un supporto, come da REGOLAMENTO, sono caldamente invitati ad allegare un file di esempio con l'indicazione di quello che si desidera ottenere.

[Risolto] Formattazione condizionale di testo

 
Forum 1
(@fabio)
Nuovo utente

Buongiorno,
sono nuovo di questo forum e vi ringrazo anticipatamente per l'attenzione e la collaborazione.
Desidero porvi questo problema:
ho una tabella dove sono elencati per ogni singola cella uno o più nomi di persona.
Al momento sono riuscito, utilizzando la formattazione condizionale, ad attribuire un colore specifico a ogni singolo nome e un colore di sfondo a un nome in particolare. Quando però, come nelle celle della colonna D della tabella allegata, compaiono più nomi all'interno della singola cella, questi non prendono il colore che vorrei.
Come posso risolvere il problema?
Se potete darmi una spiegazione dettagliata ve ne sarei grato poiché le mie conoscenze di excel sono limitate.
Vi ringrazio.

Versione di Excel
Excel 2013
Sistema operativo
Windows
Questa discussione è stata modificata 2 settimane fa 3 tempo da FABIO
Quota
Avviatore di Topic Postato : 06/04/2021 15:09
cromagno
(@cromagno)
Excel Guru Moderatore

Ciao,

se ho capito bene quel che chiedi, non puoi farlo con la formattazione condizionale.
Per colorare una parte di testo all'interno di una cella  bisogna utilizzare il VBA.
Fai sapere se sei interessato (in tal caso allega un file che sia quanto più possibile uguale all'originale, strutturalmente parlando), nel frattempo la discussione viene spostata nella sezione Macro e VBA.

"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

RispondiQuota
Postato : 06/04/2021 18:12
Forum 1
(@fabio)
Nuovo utente

Ciao,

grazie, ci provo.
Allego un file simile all'originale.

RispondiQuota
Avviatore di Topic Postato : 06/04/2021 21:30
cromagno
(@cromagno)
Excel Guru Moderatore

Ciao,
come prima cosa ti dovrai creare una "tabella di riferimento" (che poi potrai anche nascondere)
dove avrai la lista delle persone con i propri colori:

a mio parere ti conviene distinguere le persone solo per colore del font e non dello sfondo cella (come hai fatto per Laura ).

Il codice (nel modulo di classe del Foglio1) partirà non appena verrà modificata una cella nelle colonne da A a I.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim PeopleRng As Range
    Dim LRow As Long
    Dim OneCellTarget As Range
    Dim OneCellRng As Range
    Dim iText As Integer
    
    If Not Intersect(Target, Range("A:I")) Is Nothing Then
        Target.Font.ColorIndex = xlAutomatic
        LRow = Range("L1").End(xlDown).Row
        If LRow > 1 Then
            Set PeopleRng = Range("L2:L" & LRow)
            
            For Each OneCellTarget In Target
                For Each OneCellRng In PeopleRng
                    iText = InStr(1, OneCellTarget.Value, OneCellRng.Value)
                    If iText > 0 Then
                        OneCellTarget.Characters(iText, Len(OneCellRng.Value)).Font.Color = OneCellRng.Font.Color
                    End If
                Next OneCellRng
            Next OneCellTarget
        End If
    End If
    
    Set PeopleRng = Nothing
    Set OneCellTarget = Nothing
    Set OneCellRng = Nothing
End Sub

 

 

"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

RispondiQuota
Postato : 08/04/2021 15:26
Forum 1
(@fabio)
Nuovo utente

Problema sistemato.

Grazie cromagno!

 

RispondiQuota
Avviatore di Topic Postato : 08/04/2021 18:35
cromagno
(@cromagno)
Excel Guru Moderatore
Postato da: @fabio

Problema sistemato.

Per segnare la discussione come risolta leggi qui:
https://excelacademy.it/supporto/regolamento-e-informazioni-utili/segnare-la-propria-discussione-come-risolta/#post-394

"Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

RispondiQuota
Postato : 09/04/2021 15:37
Condividi:

[]
×