Hvis tid er ens vis popup

og fjer den ene af de to tider som er ens

Forklar nærmere "Hvis tid er ens"

Hvis Det er to ens tider i den kolonne som eks 08:00 skal det komme en msg box from og sige "der kan ikke være to af samme tid" hvor man skal trykke ok der efter skal den slette den ene af de to tider som er end...

Frem* :S

Må der bruges VBA?

Meget gerne

Lav en løkke, der looper over I2:I24
Sammenlign med I2.
Kør løkken igen - sammen lign med I3

..
...
osv.

til du får sammenlignet allesammen

Koden:

    Dim i As Long
    Dim j As Long
    i = 1
    j = i
    For i = 1 To 19
      For j = i + 1 To 20
        If Cells(j, 9).Value = Cells(i, 9).Value Then
          MsgBox "Række " & i & " og " & j & " indeholder samme værdi"
        End If
      Next j
    Next i
    MsgBox "test slut"

Hov - jeg kører kun til række 20 - ret selv til 24

Version 0.0000001 Beta


    Dim i As Long
    Dim j As Long
    Dim lngAnswer As Long
    Const MaxRow = 24
    i = 1
    j = i
    For i = 1 To MaxRow - 1
      For j = i + 1 To MaxRow
        If Len(Cells(j, 9).Value) > 0 Then
          If Cells(j, 9).Value = Cells(i, 9).Value Then
            lngAnswer = MsgBox("Række " & i & " og " & j & " indeholder samme værdi. Vil du afbryde og slette (ja) eller fortsætte (nej)", vbYesNo)
            If vbYes = lngAnswer Then
              MsgBox "Program sluttes. "
              Exit Sub
            End If
          End If
        End If
      Next j
    Next i
    MsgBox "test slut"

det skal kun være en (ok) og så slette de tider der er ens

Så ret det til selv