• [risolto]macro in excel

Inviato: **mer 06 mag 2009 6:41 pm**

se mi mandi la tua email ti mando il file excel che ho elaborato.
penso di aver risolto il tuo problema, ma fai prima te a capirlo guardando il file che io a spiegartelo, cmq ho utilizzato sia la formattazione condizionale che la colonna nascosta.

ciao fammi sapere

Inviato: **mer 06 mag 2009 8:31 pm**

Questo potrebbe essere il risultato come vedi
quando premi sul bottone ti colora tutte le celle
del foglio col valore corrispondente che protrai
personalizzare, valuta quale tra le proposte postate
è quella che fa al caso tuo.

Inviato: **gio 07 mag 2009 12:05 pm**

perfetto grazie a tutti sono riuscito in questo modo:

Codice: Seleziona tutto

Sub Colore()
Dim r As Long
Dim myId
Dim myLastId
Dim Colore

myLastId = ""
For r = 2 To Cells(65536, 1).End(xlUp).Row
    myId = Cells(r, 1).Value
    If r > 1 Then myLastId = Cells(r - 1, 1).Value
   
    If myId <> myLastId Or r = 1 Then
        If Colore = 36 Then
            Colore = 34 'azzurro
        Else
            Colore = 36 'giallo
        End If
    End If
   
    Range(Cells(r, 1), Cells(r, 15)).Interior.ColorIndex = Colore
Next r

End Sub