Comment insérer dans une macro une boîte de confirmation avant l'exécution

yumat · 14 Septembre 2012

Bonjour à tous
Je viens d'enregistrer la macro suivante :

Sub esai()
'
' esai Macro
' Remise à zéro ducoef deprésence
'
' Touche de raccourci du clavier: Ctrl+k
'
Insérer ici une boîte de dialogue demandant confirmation avant l'éxécution de la macro
Range("I2").Select
ActiveCell.FormulaR1C1 = "0"
Range("I2").Select
ActiveCell.FormulaR1C1 = "1"
Range("I3").Select
End Sub

A l'endroit portant l'inscription en rouge, je souhaiterais insérer une boîte de dialogue demandant confirmation avant l’exécution de la macro

Comme je n'y connais rien en VBA 😕

A l'avance merci

tototiti2008 · 14 Septembre 2012

Re : Comment insérer dans une macro une boîte de confirmation avant l'exécution

Bonjour Yumat,

à tester

Code:

Sub esai()
'
' esai Macro
' Remise à zéro ducoef deprésence
'
' Touche de raccourci du clavier: Ctrl+k
'
If MsgBox("Lancer la macro ?", vbYesNo) <> vbYes Then Exit Sub
    Range("I2").Select
    ActiveCell.FormulaR1C1 = "0"
    Range("I2").Select
    ActiveCell.FormulaR1C1 = "1"
    Range("I3").Select
End Sub

Edit : pas touché au reste du code, je ne comprend pas bien à quoi ça sert de mettre 0 puis 1 dans la même cellule

yumat · 14 Septembre 2012

[Réso]Re : Comment insérer dans une macro une boîte de confirmation avant l'exécution

Bonjour Tototiti2008
Voilà le message que j'ai inclus dans ton code :
If MsgBox("Attention, si vous lancez cette action, tous les renseignements concernant les inscrits et les présents ici à droite seront supprimés!!! Cette commande vous servira exclusivement pour le cas où vous auriez effectué des essais. Voulez-vous continuer ?", vbYesNo) <> vbYes Then Exit Sub

Dans 42 cellules concernées, si la cellule de référence passe à 0 toutes les valeurs sont effacées puis la cellule de référence reprend la valeur 1 ..... et l'application est en état de fonctionner.

Un peu vicieux???
Un grand merci à toi et bonne journée.

PS sois vigilant je vais sûrement avoir encore besoin d'un bout de VBA 🙂

Comment insérer dans une macro une boîte de confirmation avant l'exécution

yumat

Guest

tototiti2008

XLDnaute Barbatruc

yumat

Guest

Discussions similaires

Comment insérer dans une macro une boîte de confirmation avant l'exécution

yumat

Guest

tototiti2008

XLDnaute Barbatruc

yumat

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency