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 if + 2 actions

if + 2 actions

5 réponses
Avatar
Albatroz
Salut tout le monde

question bete, je veux mettre un if et ensuite afficher une message
box avant de sortir de la macro:

If Range("D4").Value > Range("F4").Value Then MsgBox "begining date is
later than the ending date; please correct it"
...


j'ai essaye avec un goto et ca bloque


peut etre qu'il faut utiliser une autre fonction.

Merci d'avance pour votre aide toujours precieuse
++
Signaler un problème avec ce contenu

5 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
Daniel
Bonsoir.

If Range("D4").Value > Range("F4").Value Then
MsgBox "begining date islater than the ending date; please correct it"
Exit Sub
End If

Cordialement.
Daniel
"Albatroz" a écrit dans le message de news:

Salut tout le monde

question bete, je veux mettre un if et ensuite afficher une message
box avant de sortir de la macro:

If Range("D4").Value > Range("F4").Value Then MsgBox "begining date is
later than the ending date; please correct it"
...


j'ai essaye avec un goto et ca bloque


peut etre qu'il faut utiliser une autre fonction.

Merci d'avance pour votre aide toujours precieuse
++



Avatar
JB
On 5 fév, 22:27, "Albatroz" wrote:
Salut tout le monde

question bete, je veux mettre un if et ensuite afficher une message
box avant de sortir de la macro:

If Range("D4").Value > Range("F4").Value Then MsgBox "begining date is
later than the ending date; please correct it"
...

j'ai essaye avec un goto et ca bloque

peut etre qu'il faut utiliser une autre fonction.

Merci d'avance pour votre aide toujours precieuse
++


Bonsoir,

Sub xxxx()
.....
If Range("D4").Value > Range("F4").Value Then
MsgBox "begining date is ...."
Exit Sub
End if
....
End If

JB

Avatar
Droopy191
Salut tout le monde

question bete, je veux mettre un if et ensuite afficher une message
box avant de sortir de la macro:

If Range("D4").Value > Range("F4").Value Then MsgBox "begining date is
later than the ending date; please correct it"
...



Salut,

un Exit Sub devrait convenir


--
DR

Avatar
Albatroz
Merci les amis et bonne nuit macrotique.





On Feb 5, 4:51 pm, Droopy191 wrote:

Salut tout le monde

question bete, je veux mettre un if et ensuite afficher une message
box avant de sortir de la macro:

If Range("D4").Value > Range("F4").Value Then MsgBox "begining date is
later than the ending date; please correct it"
...


Salut,

un Exit Sub devrait convenir

--
DR



Avatar
Jacky
Bonsoir,
Si j'ai bien compris....
'---------
If Range("D4").Value > Range("F4").Value Then reponse = MsgBox("begining
date is later than the ending date; please correct it", 1)
'Reponse peut retourne 1 pour OK et 2 pour Annuler
'Reste plus qu'a faire les conditions sur 1 ou 2
If reponse = 1 Then
'--------
'---Le code
MsgBox reponse
'-----
End If
'---------------

--
Salutations
JJ



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

Salut tout le monde

question bete, je veux mettre un if et ensuite afficher une message
box avant de sortir de la macro:

If Range("D4").Value > Range("F4").Value Then MsgBox "begining date is
later than the ending date; please correct it"
...


j'ai essaye avec un goto et ca bloque


peut etre qu'il faut utiliser une autre fonction.

Merci d'avance pour votre aide toujours precieuse
++