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 pb d'écriture

pb d'écriture

4 réponses
Avatar
Titus
Bonjour, vraiment désolé, mais la question a été posée, et je ne la retrouve
pas, sur Excel 97 cela ne fonctionne pas,

Sub lancement( )

If Date >= "04/02/2004" And Date <= "10/02/04" Then

MsgBox "toto"

End If

End Sub



Merci Titus
Signaler un problème avec ce contenu

4 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
ChrisV
Bonjour Titus,

Sub lancement()
If Date >= CDate("04/02/2004") And Date <= CDate("10/02/04") Then _
MsgBox "toto"
End Sub


ChrisV


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

Bonjour, vraiment désolé, mais la question a été posée, et je ne la
retrouve

pas, sur Excel 97 cela ne fonctionne pas,

Sub lancement( )

If Date >= "04/02/2004" And Date <= "10/02/04" Then

MsgBox "toto"

End If

End Sub



Merci Titus




Avatar
Titus
Merci beaucoup ChrisV
Titus

"ChrisV" a écrit dans le message de
news:eD%
Bonjour Titus,

Sub lancement()
If Date >= CDate("04/02/2004") And Date <= CDate("10/02/04") Then _
MsgBox "toto"
End Sub


ChrisV


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

Bonjour, vraiment désolé, mais la question a été posée, et je ne la
retrouve

pas, sur Excel 97 cela ne fonctionne pas,

Sub lancement( )

If Date >= "04/02/2004" And Date <= "10/02/04" Then

MsgBox "toto"

End If

End Sub



Merci Titus








Avatar
Titus
Merci beaucoup Michel
Titus

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

Utilise

If Date >= CDate("04/02/2004") And Date <= CDate("10/02/04") Then

ou mieux encore (pas d'ambigüité selon le type de calendrier utilisé sur
la machine)


If Date >= DateSerial(2004, 2, 4) And Date <= DateSerial(2004, 2, 10)
Then





Bonjour, vraiment désolé, mais la question a été posée, et je ne la
retrouve


pas, sur Excel 97 cela ne fonctionne pas,

Sub lancement( )

If Date >= "04/02/2004" And Date <= "10/02/04" Then

MsgBox "toto"

End If

End Sub

Merci Titus


--
Cordialement,

Michel Gaboly
http://www.gaboly.com





Avatar
Michel Gaboly
Bonjour,

Utilise

If Date >= CDate("04/02/2004") And Date <= CDate("10/02/04") Then

ou mieux encore (pas d'ambigüité selon le type de calendrier utilisé sur la machine)

If Date >= DateSerial(2004, 2, 4) And Date <= DateSerial(2004, 2, 10) Then




Bonjour, vraiment désolé, mais la question a été posée, et je ne la retrouve
pas, sur Excel 97 cela ne fonctionne pas,

Sub lancement( )

If Date >= "04/02/2004" And Date <= "10/02/04" Then

MsgBox "toto"

End If

End Sub

Merci Titus


--
Cordialement,

Michel Gaboly
http://www.gaboly.com