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 -
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
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:
- Vba date picker excel 2016 userform
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
- Nombre de jours entre deux dates excel - Guide
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
soit on marque la date "à la main" soit on remplace les textbox par ces calendriers
https://silkyroad.developpez.com/VBA/ControlesUserForm/