Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Reponse = InputBox('C'est vrai ou faux ?', 'XXX')
If Reponse = '' Then Exit Sub
If Reponse = 'vrai' Then Range('A2') = Reponse
If Reponse = 'faux' Then Range('B2') = Reponse
End Sub
Bien entendu c'est a adapter a tes besoins...
Au fait, pas besoin de poster deux fois pour poser une meme question...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.