Recherche date VBA colonne A

Bonjour à tous,

je butte donc je vous demande de l'aide, voila mon problème.

je recherche des dates se trouvant dans une colonne sur une feuille et je voudrais me position sur ces mêmes dates se trouvant sur une autre feuille.

Ceci pour que je, puisse me déplacer et inscrit quelque chose après chaque date

D'avance merci

Daniel

Bonjour daniel1965, le forum,

Vois si le fichier joint peut t'aider...

4classeur1.xlsm (20.63 Ko)

Cordialement,

Re

Je regarde depuis tout à l'heure mais je n'arrive pas a le modifier comme je le souhaiterais, je te le renvoi modifié pour que tu comprenne.

Merci

2classeur1-2.xlsm (29.14 Ko)

Re,

Une tentative....

Option Explicit

Dim f1 As Worksheet, f2 As Worksheet, cell As Range
Dim i As Long

Sub Compare()

    Set f1 = Sheets("Critères")
    Set f2 = Sheets("Dates")

    f2.Cells.Rows.Interior.Color = xlNone                     'supprime les couleurs
    f2.Columns(2).ClearContents                                  'vide la colonne B

    For i = 1 To Range("A" & Rows.Count).End(xlUp).Row
        Set cell = f2.Range("A:A").Find(f1.Range("A" & i), lookat:=xlWhole)
        If Not cell Is Nothing Then
            f2.Rows(cell.Row & ":" & cell.Row).Interior.Color = RGB(255, 255, 64)
            f2.Cells(cell.Row, 2) = f1.Cells(i, 2)
        End If
    Next i
End Sub
6classeur1.xlsm (22.34 Ko)

Cordialement,

Oui c'est ca!

mais sans la coloration des lignes

énorme merci merci merci

daniel

Re,

Oui c'est ca!

mais sans la coloration des lignes

Option Explicit

Dim f1 As Worksheet, f2 As Worksheet, cell As Range
Dim i As Long

Sub Compare()

    Set f1 = Sheets("Critères")
    Set f2 = Sheets("Dates")

    f2.Columns(2).ClearContents                                  'vide la colonne B

    For i = 1 To Range("A" & Rows.Count).End(xlUp).Row
        Set cell = f2.Range("A:A").Find(f1.Range("A" & i), lookat:=xlWhole)
        If Not cell Is Nothing Then
            f2.Cells(cell.Row, 2) = f1.Cells(i, 2)
        End If
    Next i
End Sub

Cordialement,

Rechercher des sujets similaires à "recherche date vba colonne"