Textbox date rajouter + 1 jour
Fermé
mickysor
-
22 juil. 2013 à 17:44
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 23 juil. 2013 à 08:17
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 23 juil. 2013 à 08:17
A voir également:
- Textbox date rajouter + 1 jour
- Mettre à jour ses pilotes - Guide
- Mise a jour airpods - Guide
- Mise a jour windows 10 - Guide
- Nous n'avons pas pu terminer les mises à jour - Forum Windows 10
- Publipostage date en anglais ✓ - Forum Excel
1 réponse
pijaku
Messages postés
12263
Date d'inscription
jeudi 15 mai 2008
Statut
Modérateur
Dernière intervention
4 janvier 2024
2 744
Modifié par pijaku le 23/07/2013 à 08:18
Modifié par pijaku le 23/07/2013 à 08:18
Bonjour,
Question : s'il existe des formats de date "préformatés", pourquoi vouloir en créer d'autres?
Une date, compréhensible par Excel et VBA serait au format 22/07/2013, pas avec des points (22.07.2013)...
Passons, dans l'état et si tu souhaite conserver tes points :
Cordialement,
Franck P
Question : s'il existe des formats de date "préformatés", pourquoi vouloir en créer d'autres?
Une date, compréhensible par Excel et VBA serait au format 22/07/2013, pas avec des points (22.07.2013)...
Passons, dans l'état et si tu souhaite conserver tes points :
Private Sub CommandButton1_Click()
Dim maDate As Date
If TextBox4 = "" Then
TextBox4 = Replace(Date, "/", ".")
Else
maDate = CDate(Replace(TextBox4, ".", "/"))
maDate = maDate + 1
TextBox4 = Replace(maDate, "/", ".")
End If
End Sub
Cordialement,
Franck P
