Mauro Luigi, 09/11/2021 12:29:Ma a me puo'anche bastare una funzione che mi dica se per una provincia ho + regioni .In sostanza i valori doppi sono oggetto di check.Se il risultato è univoco è tutto ok.Grazie mille
Sub cerca() Dim r, c, d1, d2, x, y, t, Reg Reg = Sheets("Regioni").Range("A2:C111") Sheets("Foglio2").Select Columns("A:B").Interior.Color = xlNone For x = 2 To Cells(Rows.Count, 1).End(xlUp).Row d1 = Cells(x, 1) d2 = Cells(x, 2) t = 0 For y = 1 To UBound(Reg) If d1 = Reg(y, 1) And d2 = Reg(y, 3) Then t = 1 Next y If t = 0 Then Cells(x, 2).Interior.ColorIndex = 3 Next x End Sub