vba excel, recherche d'une date dans une cellule

tahiti1 · 28 Juin 2007

Bonjour,

Je souhaiterais créer la macro suivante:
-Saisir une date dans une inputbox
-Rechercher la date dans un fichier excel
-Sélectionner la colonne (de la cellule comprenant la date)

je bloque totalement.... à l'aide.
Merci d'avance !!!

Gorfael · 28 Juin 2007

Re : vba excel, recherche d'une date dans une cellule

tahiti1 à dit:
Bonjour,

Je souhaiterais créer la macro suivante:
-Saisir une date dans une inputbox
-Rechercher la date dans un fichier excel
-Sélectionner la colonne (de la cellule comprenant la date)

je bloque totalement.... à l'aide.
Merci d'avance !!!

Salut

Code:

Sub test()
Dim X As Date
Dim Cel As Range
X = CDate(InputBox("date"))
For Each Cel In UsedRange
    If Cel = X Then Columns(Cel.Column).Select
Next Cel
End Sub

ou

Code:

Sub test()
Dim X As Date
Dim Cel As Range
X = CDate(InputBox("date"))
Set Cel = UsedRange.Find(X)
Columns(Cel.Column).Select
End Sub

Comme tu le sents
A+

vba excel, recherche d'une date dans une cellule

tahiti1

Guest

Gorfael

XLDnaute Barbatruc

Discussions similaires

vba excel, recherche d'une date dans une cellule

tahiti1

Guest

Gorfael

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency