XL 2016 If msgbox-vbYesNo- dans boucle if - VBA

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

MatthieuG

XLDnaute Nouveau
Bonjour,

J'ai besoin de vos lumières concernant un problème que j'ai sur une boucle if à l'intérieur d'une autre...

Petit à petit j'ai créé ma boucle MsgBox qui fonctionne lorsque je clique sur un bouton.
J'ai ajouté mes conditions "Range" par la suite. Peu importe le résultat de mes conditions, le code va directement au dernier End if.

VB:
If (Range("B9)") <> "" & Range("B4") > Range("B9") Then

If MsgBox ("Avez vous remplacé la cassette périmée ?" & Chr(13) & Chr(10) & "Si non indiquez pourquoi en commentaire", vbYesNo) = vbNo Then
Exit Sub
Else
End if

End if

Il s'agit peut être d'une broutille à modifier mais pour moi la boucle de base est cohérente If "les range..." Then "If mon MsgBox qui fonctionne" End if

Merci d'avance pour votre aide,

Matthieu
 
Bonjour,

J'ai besoin de vos lumières concernant un problème que j'ai sur une boucle if à l'intérieur d'une autre...

Petit à petit j'ai créé ma boucle MsgBox qui fonctionne lorsque je clique sur un bouton.
J'ai ajouté mes conditions "Range" par la suite. Peu importe le résultat de mes conditions, le code va directement au dernier End if.

VB:
If (Range("B9)") <> "" & Range("B4") > Range("B9") Then

If MsgBox ("Avez vous remplacé la cassette périmée ?" & Chr(13) & Chr(10) & "Si non indiquez pourquoi en commentaire", vbYesNo) = vbNo Then
Exit Sub
Else
End if

End if

Il s'agit peut être d'une broutille à modifier mais pour moi la boucle de base est cohérente If "les range..." Then "If mon MsgBox qui fonctionne" End if

Merci d'avance pour votre aide,

Matthieu
Bonjour,
Ceci ne peut fonctionner en aucun cas
if (Range("B9)") <> "" & Range("B4") > Range("B9") Then
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
XL 2021 VBA excel
Réponses
4
Affichages
44
Réponses
2
Affichages
370
Retour