Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

formattazione condizionale bloccata

Ultimo Aggiornamento: 05/09/2017 23:25
Post: 416
Registrato il: 24/06/2015
Città: CATANIA
Età: 80
Utente Senior
Excel2019
OFFLINE
26/08/2017 09:05

Ciao
Prova con questa macro
Sub prova()
ur = Cells(Rows.Count, 1).End(xlUp).Row
Range("N2:N" & ur).Interior.ColorIndex = xlNone
For i = 2 To ur - 1
    For j = i + 1 To ur
        If Cells(i, 1).Value = Cells(j, 1).Value Then
            If Cells(i, 3).Value <> Cells(j, 3).Value And _
                Cells(i, 3).Value <> "" And Cells(j, 3).Value <> "" Then
                If Cells(i, 10).Value = Cells(j, 10).Value Then
                    Cells(i, 14).Interior.ColorIndex = 3
                    Cells(j, 14).Interior.ColorIndex = 3
                End If
            End If
        End If
    Next j
Next i
End Sub

T'avverto, però, che c'è un doppio errore.
Uno mio: la macro colora la riga 23 (e non dovrebbe)
Uno tuo: dici che sono vere le condizioni in riga 25 e, a mio parere, dovrebbe essere Falso

Ci sentiamo. Ciao,
Mario

PS - Ho colorato le celle della colonna N (al caso, poi, cambia)
Vota:
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Formattazione condizionale (5 messaggi, agg.: 03/09/2019 10:35)
[RISOLTO] Formattazione Condizionale 2 criteri (5 messaggi, agg.: 29/05/2020 12:38)
Formattazione condizionale riferimenti relativi (3 messaggi, agg.: 19/07/2020 20:03)
Formattazione Condizionale (5 messaggi, agg.: 03/08/2020 16:43)
formattazione condizionale (?) (2 messaggi, agg.: 08/09/2020 20:28)
FORMATTAZIONE CONDIZIONALE - PROBLEMINO (6 messaggi, agg.: 21/01/2021 14:07)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 10:29. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com