Probleme code = fonctionne de temps à temps

bonjour le forum,

je me tourne vers vous pour m'aider sur ce code qui ne fonctionne que de temps à temps, je ne vois vraiment pas pourquoi.

il s'agit de trouver la première ligne ou la date de début se trouve en colonne 1 :

Plg1 = Sheets("Planning").Range("A:A").Find(DMin).Row

merci d'avance.

Pedro.

14test.xlsm (143.48 Ko)

Bonsoir,

Dans votre code vous déclarer DMin as long, puis plus bas vous dite DMin = Cdate(TD) --> Dmin devient date ...
Essayez le code comme ceci

Public Sub CommandButton2_Click()
Dim DMin As Date, DMax As Date, Plg1 As Long, Plg2 As Long
On Error Resume Next
 Plg1 = Sheets("Planning").Range("A:A").Find(CDate(TD)).Row
 Plg2 = Sheets("Planning").Range("A:A").Find(CDate(TF)).Row
 MsgBox Plg1
 MsgBox Plg2
 Unload Me
End Sub

Si ok, merci de cloturer le fil en cliquant sur le petit v en haut à droite

Cordialement

bonjour le forum,

bonjour Dan,

je vois le souci,, je ne vois pas comment j'ai pu louper ça!!!, merci à vous.

Pedro.

rebonjour Dan,

en fait j'utilisais les variables DMin et DMax 2 fois dans le code, pour 2 différentes recherches, une fois comme date et une fois comme chiffre (date converti), c'est ce qui m'a induit en erreur.

merci sincèrement pour votre tuyau, là j'étais vraiment embourbé et sans recul nécessaire pour m'en rendre compte.

bien à vous.

Pedro.

Rechercher des sujets similaires à "probleme code fonctionne temps"