You are here:---Rispondi a: [RISOLTO] AutoFill in base a condizioni
Rispondi a: [RISOLTO] AutoFill in base a condizioni2019-05-01T15:43:34+01:00

Home Forum Domande su Excel VBA e MACRO [RISOLTO] AutoFill in base a condizioni Rispondi a: [RISOLTO] AutoFill in base a condizioni

AvatarKris_9951
Partecipante
    Post totali: 110

    Ho rimediato il controllo dippioni con questa macro:-)

    Private Sub Worksheet_Change(ByVal Target As Range)
    With ActiveSheet.ListObjects(“Tabella2”)
    For i = 2 To .Range.Rows.Count
    For j = i + 1 To .Range.Rows.Count
    confronto1 = .ListColumns(4).Range(i) & .ListColumns(5).Range(i)
    confronto2 = .ListColumns(4).Range(j) & .ListColumns(5).Range(j)
    If confronto1 = confronto2 Then
    MsgBox “Duplicato: ” & confronto1, vbInformation, “VERIFICA DUPLICATI”
    End If
    Next
    Next
    End With
    End Sub

     

    Grazie mille!!! :-)

    Utilizzando il sito, accetti l'utilizzo dei cookie da parte nostra. maggiori informazioni

    Questo sito utilizza i cookie per fornire la migliore esperienza di navigazione possibile. Continuando a utilizzare questo sito senza modificare le impostazioni dei cookie o cliccando su "Accetta" permetti il loro utilizzo.

    Chiudi