Discussion :

[seb92400]

Hello,

Dans mon code, j'ai inséré la ligne suivante :

Reponse = MsgBox(("Attention : Vous allez annuler vos dernières modifications." & Chr(13) & "Confimer ?"), (vbExclamation + vbYesNo), "Annulation...")

Ensuite, j'utilise un SelectCase pour les réponses... Jusque là, tout va bien... :-)

J'ai du mettre une Option Explicit tout au début, et depuis, je dois déclarer la variable Reponse, sinon, j'obtiens une erreur...

Et c'est là que ça va plus... Si j'ai bien compris, on doit définir cette variable dans les options au début... Je dois écrire quoi et où ??? Dans Option Explicit ??? Car jusque là, tout ce que j'ai essayé n'a pour résultat qu'une jolie petite boîte de dialogue : IMCOMPATIBILITE DE TYPE... Argh... Je crois que je vais me mettre à la guitare moi...

Merci d'avance...

[random]

surtout ne touche pas à option explicit
ajoute en début de procédure ou fonction
dim réponse as variant

[seb92400]

hum... Merci... Mais j'ai déjà utilisé cette solution... Et rien à faire... :-(

[Muhad'hib]

Salut,

Mets l'ensemble de ton code STP

Rem : msgbox renvoi un integer, une déclaration "Dim Reponse as Integer" doit suffir (mais ça ne va rien changer à ton pb ... )

A+

[seb92400]

Voici le code...

[seb92400]

Petite précision...

De temps en temps, lorsque je ferme le formulaire, j'ai un message d'avertissement :

"Variable objet ou variable de bloc with non définie"...

Donc en fait, je suppose que l'erreur précédente ne vient pas de ma vaiable "reponse" mais de ce que j'ai ajouté dans Option Explicit... Si quelqu'un peut m'éclairer...

[random]

pour utiliser une variable objet il faut d'abord la lier à un objet avec
set mavar=unobjet