Macro

[schaps]

Bonjour à vous tous,

Est-ce qu'il y a une façon plus rapide de lancer une macro sans être obliger de
sélectionner «affichage-afficher les macros-Exécuter» ??

merci

schaps

 

[Victor21]

Re : Macro

Bonjour, schaps.

Est-ce qu'il y a une façon plus rapide de lancer une macro sans être obliger de
sélectionner «affichage-afficher les macros-Exécuter» ??

Oui !
On peut lui affecter une touche de raccourci, l'affecter à un objet sur la feuille, à une commande, à un bouton, à un événement... entre autres.

 

[schaps]

Re : Macro

Bonjour Victor21 et à vous tous,

Tu devras me guider s.v.p. car ds les choix que tu proposes je ne sais pas comment faire vraiment.

Merci
ps: parcontre le bouton semble parfait !!

 

[Verba_Tim]

Re : Macro

Bonjour, schaps, victor,
Tu peux aussi mettre un raccourci "afficher les macros" sur ta barre de raccourci
Mais le plus rapide reste pour moi le raccourci clavier
Deux solutions:
Affichage des macros -> option, et tu leur affecte un raccourci,
Ou le code suivant:

Application.OnKey "%(lettre)", "nom de ma macro"

Avec le % correspondant à la touche ctrl que tu fais suivre par le caractère de ton choix. Si je ne me trompe pas, tu peux aussi y affecter par ce moyen des combinaisons caractères comme "%+x" correspondant à "ctrl + shift + x" ou encore "%^x" correspondant à "ctrl + alt + x". ^^
Fait toi plaisir!


Au plaisir de te lire,



VB_T

edit: ^^ le bouton c'est pas mal ^^ mais perso je n'utilise pas vraiment ^^ je passe la main

 

[Verba_Tim]

Re : Macro

RE,

Très simple en fait

Au lieu d'une image, vous pouvez utiliser un bouton.

Cliquez sur Affichage / barres d'outils / puis cochez "Commandes" pour afficher la barre d'outils correspondante.

Dans cette barre d'outils, sélectionnez le bouton. Le pointeur de la souris se transforme en croix et vous permet de dessiner la forme du bouton sur la page Excel.

Reste à lui affecter une macro :
Double cliquez sur le bouton, vous arrivez dans la page de code associée à la page contenant votre bouton. Le squelette de la macro associée au bouton est déjà inscrit :
Private Sub CommandButton1_Click()
End Sub
Il suffit d'y ajouter les instructions souhaitées, par exemple :
Private Sub CommandButton1_Click()
MsgBox "bonjour"
End Sub
Le message "bonjour" est associé au bouton.

Reste encore à désactiver le mode "création" en cliquant sur l'icone en forme d'équerre de la barre d'outils "Commandes".

Remarque :
ma macro, qui fonctionne correctement quand elle est lancée directement, ne fonctionne plus quand elle est lancée par un bouton !
Si les lignes VBA qui doivent être lancées par clic sur le bouton nécessitent la manipulation de cellules Excel, on peut rencontrer une erreur. Par exemple, si vous essayez de lancer la copie de A1 en B3 par action sur le bouton :
Private Sub CommandButton1_Click()
Range("A1").Copy Range("B3")
End Sub
...vous aurez une erreur "La méthode Copy de la classe Range a échoué"
Alors que la macro suivante lancée manuellement se déroule sans problème :
Sub copie()
Range("A1").Copy Range("B3")
End Sub
L'explication vient du fait que après le clic sur le bouton, ce dernier reste sélectionné et la macro ne peut plus accéder aux cellules de la page Excel.
Une solution simple consiste à sélectionner une cellule au début de la macro (le bouton perd ainsi le focus) :
Private Sub CommandButton1_Click()
Cells(1).Select
Range("A1").Copy Range("B3")
End Sub
Si le fait de modifier la cellule active est gênant, vous pouvez aussi modifier les propriétés du bouton pour lui interdire de prendre le focus :
En mode création, double cliquez sur le bouton pour accéder au code associé au bouton.
Affichage / Fenetre Propriétés permet d'afficher (si ce n'est déjà fait) les propriétés du bouton.
Il suffit de passer à False la propriété TakeFocusOnClick du bouton.


Source: Voir ici pour plus d'info, de précision, de détail...



Au plaisir de te lire,


VB_T

 

[schaps]

Re : Macro

Salut Verba_Tim et vous tous,

Ok pour le "ctrl + alt + x" mais je vais où exactement.

merci encore
schaps

 

[Verba_Tim]

Re : Macro

RE

Pour le raccourci clavier il faut tout simplement glisser le bout de code que je t'ai donner au début de ton code, juste après le sub.


Au plaisir de te lire,


VB_T

 

[schaps]

Re : Macro

Bonjour Verba_Tim et à vous tous,

Merci encore une fois de ton aide. j'ai un peu de difficulté mais je vais y arriver avec tes codes.

schaps

 

[Verba_Tim]

Re : Macro

RE
Mais de rien
Si ça peut t'aider, fait un tour ici, même si je doutes que leurs indications sur les raccourcis correspondant à alt/ctrl/shift soit tout à fait bien ordonné, tu pourra y trouver un peu d'aide .


Cordialement,


VB_T

 

[schaps]

Re : Macro

Re Verba_Tim,

Wow c'est vrait que ça va m'aider beaucoup.

Merci encore
schaps

 

[Robert]

Re : Macro

Bonjour le fil, bonjour le forum,

Peut-être comme ça :
La propriété Accelerator du bouton (= p) permet de remplacer le clic de la souris par le raccourci clavier [Alt]+[P].