Ajouter date picker popup

belba.yahya Messages postés 110 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour
j'ai un formulaire à 11 textbox,et je veux créer un calendar date picker,mais je ne sais pas quel code VBA dois-je saisir et ou je peux le mettre.
y a t'il quelqu'un qui a une idée et merci
A voir également:

1 réponse

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
Bonjour



0
belba.yahya Messages postés 110 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour Monsieur Michel
merci d'avance pour votre réponse,mon probléme que j'ai un formulaire de saisi,et quel code dois-je effectué et ou puis-je lemettre?
je veux ajouter le calendar dans le textbox(5) et (6)
le code de mon formulaire est:
Private Sub CommandButton1_Click()
'double click bouton Ajouter
If ComboBox1.Value = "" Then
MsgBox "Veuillez renseigner le champs 'Nom/Prénom' "
Else

Dim ligne As Integer
If MsgBox("confirmez-vous l'ajout des données?", vbYesNo, "confirmation") = vbYes Then
Worksheets("source").Select
ligne = Sheets("source").Range("A456541").End(xlUp).Row + 1
Cells(ligne, 1) = TextBox1.Value
Cells(ligne, 2) = ComboBox1.Value
Cells(ligne, 3) = TextBox2.Value
Cells(ligne, 4) = TextBox3.Value
Cells(ligne, 5) = TextBox4.Value
Cells(ligne, 6) = CDate(TextBox5.Value) '''''''''''''''''''''''''''''''''''''''''''''''''''''' ICI """""""""""""""""""""""""""""""""
Cells(ligne, 7) = CDate(TextBox6.Value) '''''''''''''''''''''''''''''''''''''''''''''''''''''' ICI """""""""""""""""""""""""""""""""
Cells(ligne, 8) = TextBox7.Value
Cells(ligne, 9) = TextBox8.Value
Cells(ligne, 10) = TextBox9.Value
Cells(ligne, 11) = TextBox10.Value
Unload reservation
reservation.Show
Else
End If
End If
End Sub
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
un textbox recoit uniquement du texte le calendrier est un contrôle au m^me titre qu'un textbox

soit on marque la date "à la main" soit on remplace les textbox par ces calendriers
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
0