Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Créer une macro "à la volée" depuis du code VBA

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Lolo86170
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
L

Lolo86170

Guest
Bonjour,
A partir d'une procédure VBA, je génère un fichier Excel de A à Z avec une entête, un tableau de chiffre... Dans ce tableau, il faut absolument des formes automatiques (des flèches) qui permettent de faire des tris sur des colonnes.
J'arrive à créer dynamiquement cette flèche où je veux par le code suivant :
ActiveSheet.Shapes.AddShape(msoShapeDownArrowCallout, _
siObjLeft, siObjTop, siObjWidth, siObjHeight).Select
Par contre, je n'arrive pas à rajouter à cet objet une macro créée "à la volée" depuis mon code VBA et qui permettra le tri sur la colonne où l'objet est positionné.
Si quelqu'un peut m'aider, ce serait super sympa.
A+
Laurent
 
Trier par date Trier par votes
Re : Créer une macro "à la volée" depuis du code VBA

Bonsoir,

Essaie ceci :
Code: 
Sub Test()
Set MaFleche = ActiveSheet.Shapes.AddShape(msoShapeDownArrowCallout, 10, 10, 20, 30)
MaFleche.OnAction = "Macro1"
End Sub

Sub Macro1()
MsgBox "toto"
End Sub

ou

Code: 
Sub Test()
ActiveSheet.Shapes.AddShape(msoShapeDownArrowCallout, 10, 10, 20, 30).OnAction = "Macro1"
End Sub
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Créer une macro "à la volée" depuis du code VBA

Merci Catrice pour cette réponse rapide, c'est vraiment très sympa.
On avance, mais ce je voudrais pouvoir créer le code de la macro de manière dynamique, en reprenant l'exemple, je voudrais pour avoir le contenu du Msgbox en fonction du contexte, une fois avec "titi", un autre avec "toto"...
Laurent
 
Vote positif 0 Vote négatif
Re : Créer une macro "à la volée" depuis du code VBA

Bonsoir,

Je ne sais pas si on peut créer du code à la "volée" mais comme tu veux trier des colonnes, ci-joint un exemple qui créé des boutons qui trient suivant chque colonne.
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Créer une macro "à la volée" depuis du code VBA

Bonjour Lolo, Bonjour Catrice,

On appelle Titi puis Toto, et j'arrive 😉

Pour créer des macros dans un autre classeur, je te conseille de consulter cette page là :

Visual Basic Editor - Club des décideurs et professionnels en Informatique

Saches simplement que pour que ça fonctionne, il faudra certainement, sur le poste qui fait tourner la macro, que tu ailles dans
Menu Outils - Macros - Sécurité
Onglet Sources fiables
Cocher faire confiance au projet Visual Basic
OK
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

W
  • Résolu(e)
XL 2019 Placer ou remplacer une photo .jpg au-dessus de la cellule [B6] contenant du texte à conserver
2
Réponses
21
Affichages
418
TooFatBoy
J
  • Question Question
Microsoft 365 Copie des onglets dans un fichier séparé depuis une liste en VBA
Réponses
3
Affichages
512
job75
GUIDE COMPLET : Créer un projet Google Cloud OAuth pour une application Excel/VBA
Réponses
0
Affichages
238
dysorthographie
  • Question Question
Microsoft 365 Importer données depuis un lien web
Réponses
1
Affichages
436
gbinforme
G
A
  • Question Question
XL 2021 Automatiser la génération de documents Word à partir d’Excel avec VBA
Réponses
12
Affichages
1 K
ali591
A
M
  • Résolu(e)
XL 2016 Comment contourner la fonction Indirect d'Excel avec code VBA
Réponses
11
Affichages
675
ma6me
M
L
  • Question Question
Microsoft 365 Faire agir une macro en fonction de l'emplacement du bouton
Réponses
2
Affichages
661
AtTheOne
C
  • Question Question
Microsoft 365 je cherche un code excel pour copier la couleur d'une cellule, à toutes les cellules qui ont la même valeur dans mon tableau.
Réponses
1
Affichages
501
sylvanu
C
  • Question Question
XL 2021 VBA - créer une boucle de calcul pour remplir un tableau à partir de 2 autres sur une même feuille
Réponses
7
Affichages
992
clineM
C
T
  • Résolu(e)
XL 2016 Code vba case à cocher et code vba insérer un calendrier dans une cellule
Réponses
6
Affichages
864
telemarrk
T
C
  • Résolu(e)
XL 2016 Objets Excel de type feuille dupliqués en x exemplaires suite à plantage
Réponses
6
Affichages
590
TooFatBoy
  • Question Question
XL 2021 Comment créer un code VBA afin de création un chemin d'accès universel
Réponses
8
Affichages
1 K
AugusteP
J
  • Résolu(e)
XL 2013 Macro et script vba : macro s'arrête dès la première condition trouvée
Réponses
11
Affichages
1 K
Janu44
J
  • Question Question
Microsoft 365 Masquer la boite à outil contrôle en VBA
Réponses
2
Affichages
805
dysorthographie
EXCEL :: Les Tableaux Structurés :: Une classe VBA - V1.05 - Evolutions majeures exports CSV, XML, XML UTF-8, JSON, HTML, PDF, JPG, JPEG, BMP, EXCEL
Réponses
10
Affichages
1 K
oguruma
  • Question Question
Microsoft 365 Création d'un fichier entier par rapport à des entrées via UserForm
Réponses
1
Affichages
787
job75
P
  • Question Question
XL 2013 Copier une formule dans un cellule depuis une cellule d'un onglet nouvellement crée en macro VBA
Réponses
8
Affichages
955
pascalou1
P
C
  • Résolu(e)
Microsoft 365 Amélioration de mon code VBA
Réponses
9
Affichages
839
Cherrylie
C
D
  • Question Question
Microsoft 365 macro avec lien hypertexte et modele de facture
Réponses
6
Affichages
1 K
david_aurel
D
E
  • Résolu(e)
XL 2016 Code VBA pour créer un TCD
Réponses
11
Affichages
1 K
Excellerateur
E
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…