Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Dates sous vba

Dates sous vba

3 réponses
Avatar
Run64
Bonjour,

j'ai créé un formulaire dans lequel j'ai la possibilité de choisir entre 3
dates ( 1ère possibilité de dates c'est la validation d'une date aller /
retour en ayant utiliser deux calendars et la deuxième possibilité c'est la
validation d'une date définitive en ayant utiliser un textbox). Lorsque je
choisis la 1ére possibilité, tout est ok mais lorque je veux uniquement
utiliser la deuxième possibilité, j'ai un message d'erreur qui semble vouloir
me dire de valider aussi les 2 dates des 2 calendars :

Y a t-il possibilité de choisir l'une ou l'autre possibilité ? Dans le cas
contraire quelle autre solution est envisageable ?

NB: je débute en vba depuis qques jours et déjà je suis un mordu...
Merci pour tout
dd
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
MichDenis
Bonjour Run64,

Bien sûr. Où est la procédure que tu utilises ? Tu peux la publier ici.


Salutations


"Run64" a écrit dans le message de news:
Bonjour,

j'ai créé un formulaire dans lequel j'ai la possibilité de choisir entre 3
dates ( 1ère possibilité de dates c'est la validation d'une date aller /
retour en ayant utiliser deux calendars et la deuxième possibilité c'est la
validation d'une date définitive en ayant utiliser un textbox). Lorsque je
choisis la 1ére possibilité, tout est ok mais lorque je veux uniquement
utiliser la deuxième possibilité, j'ai un message d'erreur qui semble vouloir
me dire de valider aussi les 2 dates des 2 calendars :

Y a t-il possibilité de choisir l'une ou l'autre possibilité ? Dans le cas
contraire quelle autre solution est envisageable ?

NB: je débute en vba depuis qques jours et déjà je suis un mordu...
Merci pour tout
dd
Avatar
Run64

Bonjour Run64,

Bien sûr. Où est la procédure que tu utilises ? Tu peux la publier ici.

Private Sub TxtDateA_Enter()

Calendar1.Visible = True
Calendar1.Value = Now() 'sélectionne par défaut la date du jour
End Sub



Private Sub TxtDateC_Change()

End Sub

Private Sub TxtDateR_Enter()
Calendar2.Visible = True
Calendar2.Value = Now() 'sélectionne par défaut la date du jour
End Sub


Salutations


"Run64" a écrit dans le message de news:
Bonjour,

j'ai créé un formulaire dans lequel j'ai la possibilité de choisir entre 3
dates ( 1ère possibilité de dates c'est la validation d'une date aller /
retour en ayant utiliser deux calendars et la deuxième possibilité c'est la
validation d'une date définitive en ayant utiliser un textbox). Lorsque je
choisis la 1ére possibilité, tout est ok mais lorque je veux uniquement
utiliser la deuxième possibilité, j'ai un message d'erreur qui semble vouloir
me dire de valider aussi les 2 dates des 2 calendars :

Y a t-il possibilité de choisir l'une ou l'autre possibilité ? Dans le cas
contraire quelle autre solution est envisageable ?

NB: je débute en vba depuis qques jours et déjà je suis un mordu...
Merci pour tout
dd





Avatar
MichDenis
Bonjour Run64,

Je n'ai pas compris où tu en étais....

Voici un bout de code... selon l'activité que tu veux faire :

Ce code est valide dans un formulaire !
'---------------------------------
Private Sub Calendar1_Click()

Me.TextBox1 = Me.Calendar1.Value
'Si tu veux afficher un format date particulier
Me.TextBox1 = Format(Me.Calendar1, "D-mmm-yyyy")

End Sub
'---------------------------------
Private Sub CommandButton1_Click()
'Pour transférer ta date du textbox vers
' la cellule A1 de la Feuil1

With Worksheets("Feuil1")
If IsDate(Me.TextBox1) Then
.Range("A1").NumberFormat = "d-mmm-yyyy"
.Range("A1").Value = CDate(Me.TextBox1)
End If
End With
End Sub

'---------------------------------
Private Sub UserForm_Initialize()
'Ouverture du formulaire-> afficher la date d'aujourd'hui
Me.Calendar1.Value = Date

End Sub
'---------------------------------


Salutations!







"Run64" a écrit dans le message de news:



Bonjour Run64,

Bien sûr. Où est la procédure que tu utilises ? Tu peux la publier ici.

Private Sub TxtDateA_Enter()

Calendar1.Visible = True
Calendar1.Value = Now() 'sélectionne par défaut la date du jour
End Sub



Private Sub TxtDateC_Change()

End Sub

Private Sub TxtDateR_Enter()
Calendar2.Visible = True
Calendar2.Value = Now() 'sélectionne par défaut la date du jour
End Sub


Salutations


"Run64" a écrit dans le message de news:
Bonjour,

j'ai créé un formulaire dans lequel j'ai la possibilité de choisir entre 3
dates ( 1ère possibilité de dates c'est la validation d'une date aller /
retour en ayant utiliser deux calendars et la deuxième possibilité c'est la
validation d'une date définitive en ayant utiliser un textbox). Lorsque je
choisis la 1ére possibilité, tout est ok mais lorque je veux uniquement
utiliser la deuxième possibilité, j'ai un message d'erreur qui semble vouloir
me dire de valider aussi les 2 dates des 2 calendars :

Y a t-il possibilité de choisir l'une ou l'autre possibilité ? Dans le cas
contraire quelle autre solution est envisageable ?

NB: je débute en vba depuis qques jours et déjà je suis un mordu...
Merci pour tout
dd