Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

!!! msgbox capricieuse !!!

  • Initiateur de la discussion fabrice
  • Date de début
F

fabrice

Guest
bonjour

J 'ai un petit problème avec un code de msgbox.

MsgBox "voulez vous effectuer les calculs de cette page???", vbYesNo
If vbYes Then
Range("a1") = 1
Else
Range("a1") = 0
End If

'je souhaite en faite afficher une msgbox. si on repond oui, alors a1=1, sinon a1=0.
'Pour le oui ca va mais our le non, il affiche quand meme 1. pourquoi?
'Pourriez vous m'aider???

'merci de vos réponse,

FAb
 
J

jon

Guest
reponse = MsgBox("voulez vous effectuer les calculs de cette page???", vbYesNo)
If reponse = vbYes Then
Range("a1").Value = 1
Else
Range("a1").Value = 0
End If
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…