Base EXCEL et VBA

EXCEL ET VBA

CREATION MACRO

Boite de dialogue qui demande le prénom et qui dit bonjour à la personne qui remplit la boite de dialogue.

Macro -> Workbook : Général

Exécution macro : raccourci F5

- Ecrire : sub m1 ()

- Automatiquement apparait en bleu Sub & End Sub

- En dessous de Sub : msgbox (« Terminé »)

- Actualiser pour enregistrer : F5

- En dessous de End sub, créer un nouveau sub : sub m2()

- Automatiquement apparait en bleu Sub & End Sub

- En dessous de Sub : cells(3,1) = inputbox (« Entrer votre nome »)

- Actualiser pour enregistrer : F5

- Copier/coller le sub précédent et modifier le nom de la macro : m3

- Sous cells… Entrer, commencer à écrire msg puis CTRL + espace

- MsgBox ("Bonjour " & Cells(3, 1))

- Actualiser pour enregistrer : F5

INTERACTION AVEC L’UTILISATEUR

Msgbox peut demander aussi l’avis de l’utilsateur : msgbox(« Message », msgboxstyle)

Fonction If : permet de choisir entre 2 actions fonction d’un résultat test

If TEST Then

Action_Si_Test_Vérifié

Else

Action_Sinon

End If

Test : Résultat d’une comparaison ( =, >, <, etc.)

Dans 1 macro, faire apparaitre une boite e dialogue avec les boutons OK et Annuler & afficher dans une seconde boite de dialogue quel bouton a été cliqué par l’utilisateur.

- Ecrire sub m4()

- If MsgBox("Blablabla", vbOKCancel, "titre de la fenêtre") = vbOK Then

- MsgBox ("ok cliquer")

- Else

- MsgBox ("Annuler cliquer")

- End If

Attention : les tabulations sont très importantes pour rendre lisible les macros !

Par ex, pour justifier la macro réalisée, possibilité d’écrire un commentaire sous la macro :

Sub m4()

' Auteur Mcerisier 02/11/15

' je teste le bouton cliquer par l’opérateur

ACCES A (UNE PLACE DE) CELLULE(S)

L’accès à une ou plusoieurs cekllules

...