VBA EXCEL : problème de "FIND" et range
Bonjour,
Je monte actuelement une requete dans laquel je dois selectionner une cellule contenant une variable ( dans le cas présent, c'est une date)
J'utilise donc une méthode find pour trouvé la celulle correspondante :
[quote]
Sub test()
Dim cellule As Range
Dim datejour As String
datejour = Workbooks("stocks_2009_11.xls").Sheets("UNE").Range("B8")
Set cellule = Sheets("stocks").Range("A1:N1").Find(what:=datejour)
Range(cellule).Select
End Sub
[/quote]
je n'arrive pas a selectionner la cellule, car la variable "Cellule" contient la date recherché, et pas les coordonnées de la cellule.
Avez-vous une idée pour que la fonction "Find", je ramene les coordonnées de la cellule?
merci d'avance
Je monte actuelement une requete dans laquel je dois selectionner une cellule contenant une variable ( dans le cas présent, c'est une date)
J'utilise donc une méthode find pour trouvé la celulle correspondante :
[quote]
Sub test()
Dim cellule As Range
Dim datejour As String
datejour = Workbooks("stocks_2009_11.xls").Sheets("UNE").Range("B8")
Set cellule = Sheets("stocks").Range("A1:N1").Find(what:=datejour)
Range(cellule).Select
End Sub
[/quote]
je n'arrive pas a selectionner la cellule, car la variable "Cellule" contient la date recherché, et pas les coordonnées de la cellule.
Avez-vous une idée pour que la fonction "Find", je ramene les coordonnées de la cellule?
merci d'avance
Configuration: Windows XP Internet Explorer 6.0
