Comment selectionner les 00:00 dans une colonne

Sub Bouton4_QuandClic()
Dim c As Range
Dim t As Byte
Dim cellule

For Each c In Range('t1:t' & Range('t65536').End(xlUp).Row)
    If c = 0 Then
        If t = 0 Then
            cellule = c.Address
            t = 1
        Else
            cellule = cellule & ',' & c.Address
        End If
    End If
Next c

Range(cellule).Select

End Sub

Cliquez pour agrandir...