EXCEL/MACRO boucle pour rechercher une date

Résolu/Fermé
Signaler
Messages postés
741
Date d'inscription
lundi 18 mai 2009
Statut
Membre
Dernière intervention
10 janvier 2016
-
Messages postés
741
Date d'inscription
lundi 18 mai 2009
Statut
Membre
Dernière intervention
10 janvier 2016
-
Bonjour,

voilà j'ai un userform avec une combobox, quand je rempli ma ComboBox je veux trouvé un code dans la colone A puis une date préalablement inscrite par une autre macro est formatée ainsi jjj-jj/mm/yy voici mon code:

Private Sub NumofModif_Change()

Dim b As Integer, a As Integer, c As Integer
Dim d As Date

a = 1
b = NumofModif ' combobox code avec rowsource sur colonne A
c = 1
d = datesaisie ' DTPicker paramétré pour afficher la date du jour

Do ' je cherche mon code dans la colo A
a = a + 1
Loop Until Application.Cells(a, 1) = b

Do ' je cherche la date saisie (datesaisie) sur la ligne du code trouvé
c = c + 1
Loop Until Application.Cells(a, c) = d

ActiveCell.Select ' Je séléctionne la cell

End Sub


La macro stop à la ligne Loop Until Application.Cells(a,c) = d , le message d'erreur: erreur définie par l'application ou par l'objet

Je pense que celà vient du format de ma date si j'ai raison comment dois ej procéder pour que ma macro reconnaisse la date du DTPicker dans la ligne du code trouvé????


Merci d'avance

2 réponses

Messages postés
741
Date d'inscription
lundi 18 mai 2009
Statut
Membre
Dernière intervention
10 janvier 2016
92
euuuuh personne ne sait? me suis-je mal exprimé ? dites moi . . .
Messages postés
741
Date d'inscription
lundi 18 mai 2009
Statut
Membre
Dernière intervention
10 janvier 2016
92
j'ai trouvé j'avais juste une variable mal déclarée. .. . .