Supprimer une plage sélectionnée en utilisant la fonction MsgBox, Excel VBA

Imaginez que vous avez sélectionné une cellule ou une plage de cellules à supprimer à l’aide d’une macro. Avant de faire cela, cependant vous aimeriez qu’un message s’affiche à l’écran vous demandant à nouveau si la plage sélectionnée peut vraiment être supprimée.

Sub SupprimerPlageSelectionner ()

Dim i As Integer

i = MsgBox ("Voulez-vous supprimer la plage sélectionnée?", _

  1 + vbQuestion, "supprimer la requête")

If i = 2 Then Exit Sub

Selection.Clear

End Sub

 

Commentaires

■ La variable i est déclarée comme Integer et est afféctée à la boite de dialogue MsgBox.

■ Ainsi, interroger la variable i pour déterminer sur quel bouton l’utilisateur clique.

■ Si l’utilisateur clique sur le bouton ANNULER, la variable signale la valeur 2, ce qui entraîne l’arrêt immédiat de la macro. Sinon, les données contenues dans la plage séléctionnées sont supprimées à l’aide de la méthode Clear.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x
()
x