Excel Forum Per condividere esperienze su Microsoft Excel

Dividere elenco

  • Messaggi
  • OFFLINE
    Cristian Ferrazzano
    Post: 49
    Registrato il: 07/12/2015
    Utente Junior
    2010
    00 06/08/2022 11:20
    Salve, mi chiedevo se da un determinato elenco è possibile dividere le celle in base alla loro iniziale, o evidenziarle in base alla loro iniziale, ho provato con la formattazione condizionale ma se tipo indico le celle che iniziano con la P me ne se segnala un casino che iniziano con altre lettere
  • OFFLINE
    alfrimpa
    Post: 4.840
    Registrato il: 21/06/2013
    Città: NAPOLI
    Età: 70
    Utente Master
    Excel 365
    00 06/08/2022 11:31
    Allega file di esempio con dati e risultato desiderato inserito a mano

    Alfredo
  • OFFLINE
    elliswalker
    Post: 0
    Registrato il: 26/09/2022
    Età: 27
    Utente Junior
    00 26/09/2022 10:05
    Allegare un file di esempio con i dati e i risultati desiderati inseriti manualmente
    [Modificato da elliswalker 26/09/2022 10:06]
  • OFFLINE
    federico460
    Post: 2.693
    Registrato il: 10/10/2013
    Città: VICENZA
    Età: 69
    Utente Veteran
    365
    00 26/09/2022 12:01
    ciao
    =SINISTRA($A2;1)="b"
    oppure
    =RICERCA("P";$A2)=1

    si applica a
    $A$2:$A$1000


    ma ogni lettera un colore è un lavoraccio

    pensa al VBA
    [Modificato da federico460 26/09/2022 12:05]
  • OFFLINE
    tanimon
    Post: 1.532
    Registrato il: 27/06/2011
    Utente Veteran
    excel 2007
    00 27/09/2022 18:52
    per evidenziare il primo carattere di ogni cella, in questo caso in colonna A,
    consultando la tabella dei colori per imputarne uno diverso per ogni lettera,

    in un modulo standard prova

    vb
    Sub a()

Dim ur As Long
Dim car As String



ur = 1
car = Left(Cells(ur, 1), 1)

Do Until ur > 22

Select Case car
'===================================================================
'CREA 21 Case PER OGNI LETTERA
'=====================================================================
    Case "a"
    Cells(ur, 1).Characters(1, 1).Font.ColorIndex = 3 ' modifica il ColorIndex
End Select
    


ur = ur + 1

Loop

End Sub








    Stretta la foglia, larga la via, dite la vostra che ho detto la mia.
    Excel 2007 forse anche 2013 ... 2021 ... 365 e future...
  • OFFLINE
    tanimon
    Post: 1.533
    Registrato il: 27/06/2011
    Utente Veteran
    excel 2007
    00 28/09/2022 09:29
    probabilmente così è meglio:

    trova i colori sfondo e carattere al caso tuo
    vb
    Sub a()

Dim ur As Long
Dim car As String



ur = 1


Do Until ur > 21
    car = Left(Cells(ur, 1), 1)

    Select Case car
'===================================================================
'CREA 21 Case PER OGNI LETTERA
'=====================================================================
        Case "a"
        Cells(ur, 1).Characters(1, 1).Font.ColorIndex = 3 ' modifica il ColorIndex
        Cells(ur, 1).Characters(1, 1).Font.Bold = True
        Cells(ur, 1).Interior.ColorIndex = 8 ' modifica il ColorIndex
        
    
        Case "b"
        Cells(ur, 1).Characters(1, 1).Font.ColorIndex = 25 ' modifica il ColorIndex
        Cells(ur, 1).Characters(1, 1).Font.Bold = True
        Cells(ur, 1).Interior.ColorIndex = 6 ' modifica il ColorIndex
        
        Case "c"
        Cells(ur, 1).Characters(1, 1).Font.ColorIndex = 21 ' modifica il ColorIndex
        Cells(ur, 1).Characters(1, 1).Font.Bold = True
        Cells(ur, 1).Interior.ColorIndex = 15 ' modifica il ColorIndex
        
    End Select
    


ur = ur + 1

Loop

End Sub







    Stretta la foglia, larga la via, dite la vostra che ho detto la mia.
    Excel 2007 forse anche 2013 ... 2021 ... 365 e future...
  • OFFLINE
    dodo47
    Post: 3.350
    Registrato il: 06/04/2013
    Utente Master
    2010
    00 28/09/2022 10:45
    Re:
    Cristian Ferrazzano, 06/08/2022 11:20:
    Salve, mi chiedevo se da un determinato elenco è possibile dividere le celle in base alla loro iniziale, o evidenziarle in base alla loro iniziale, ho provato con la formattazione condizionale ma se tipo indico le celle che iniziano con la P me ne se segnala un casino che iniziano con altre lettere

    Ciao
    ma se fai un ordinamento, non le hai già raggruppate per iniziale?

    A che ti serve una specie di albero di natale che potrebbe confondere?

    saluti
    [Modificato da dodo47 28/09/2022 10:45]
    Domenico
    Win 10 - Excel 2016
Soluzioni Excel Domande e Risposte
Passa alla versione desktop

  • Anteprima