Comparer DTPicker
colombe88
Messages postés
41
Statut
Membre
-
.Grincheux. Messages postés 211 Date d'inscription Statut Membre Dernière intervention -
.Grincheux. Messages postés 211 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
a tous .
Je me trouve face au soucis suivant
j'aimerai comparer deux DTPicker de Deux Userform differente. Ainsi donc dans mon classeurA j'ai creer 2 UserForm " UserForm1" & " UserForm2 "
chacune de ces UseForm comprend deux DTpicker (une pour affiche la date l'autre l'heure). Dans mon UserForm2 j'aimerai verifie que la date et l'heure entrées ne sont pas plus petites que celles du UserForm1 . j'ai ecris le code suivant dans le "Userform2"qui ne fonctionne pas: erreur 424
Private Sub DTPickerFin_CloseUp()
If (Format(DTPickerFinDate.Value, "DD.MM.YYYY") & " " & Format(DTPickerFinHeure.Value, "hh:mm")) < _
(Format(DTPickerAnDate.Value, "DD.MM.YYYY") & " " & Format(DTPickerAnaHeure, "hh:mm")) Then
MsgBox ("date de fin avant date Analyse :" & Chr(13) & "entre une nouvelle date")
End If
End Sub
a tous .
Je me trouve face au soucis suivant
j'aimerai comparer deux DTPicker de Deux Userform differente. Ainsi donc dans mon classeurA j'ai creer 2 UserForm " UserForm1" & " UserForm2 "
chacune de ces UseForm comprend deux DTpicker (une pour affiche la date l'autre l'heure). Dans mon UserForm2 j'aimerai verifie que la date et l'heure entrées ne sont pas plus petites que celles du UserForm1 . j'ai ecris le code suivant dans le "Userform2"qui ne fonctionne pas: erreur 424
Private Sub DTPickerFin_CloseUp()
If (Format(DTPickerFinDate.Value, "DD.MM.YYYY") & " " & Format(DTPickerFinHeure.Value, "hh:mm")) < _
(Format(DTPickerAnDate.Value, "DD.MM.YYYY") & " " & Format(DTPickerAnaHeure, "hh:mm")) Then
MsgBox ("date de fin avant date Analyse :" & Chr(13) & "entre une nouvelle date")
End If
End Sub
A voir également:
- Comparer DTPicker
- Comparer prix amazon - Guide
- Meilleur prix Amazon : payer moins cher avec Amazin'Europe - Accueil - Commerce
- Comparer pdf - Télécharger - PDF
- Comparer samsung a15 et a16 - Accueil - Téléphones
- Audio comparer - Télécharger - Nettoyage