Lire code source macro avec une macro ...

S

SubEndSub

XLDnaute Occasionnel

• 18 Août 2009

• #2

Re : Lire code source macro avec une macro ...

Bonjour chez vous

Voici un exemple trés simple (à mettre dans un module standard)

Lance la macro : macro

Code:

Sub macro()
Dim Debut&, Fin&, i&, TexteMacro$
With ThisWorkbook.VBProject.VBComponents("Module1").CodeModule
Debut = .ProcStartLine("macro1", vbext_pk_Proc)
Fin = .ProcCountLines("macro1", vbext_pk_Proc) + Debut
For i = Debut To Fin
TexteMacro = TexteMacro & .Lines(i, 1) & Chr(10)
Next
End With
MsgBox TexteMacro
End Sub

Sub macro1()
sMessage = "hello"
sMessage = sMessage & ", world !"
MsgBox sMessage, vbInformation, "MESSAGE"
End Sub

 

Vote positif 0 Vote négatif

R

Raphy

XLDnaute Nouveau

• 18 Août 2009

• #3

Re : Lire code source macro avec une macro ...

Merci pour la rapidité de la réponse !
Je vais étudier tout ça et faire des modifications pour obtenir ce qui m'intéresse !
Je te tiens au courant.

 

Vote positif 0 Vote négatif

R

Raphy

XLDnaute Nouveau

• 18 Août 2009

• #4

Re : Lire code source macro avec une macro ...

Je suis en train de tester l'exemple, mais j'ai un souci à l'exécution et j'ai beau essayer de le triturer dans tous les sens, j'obtiens une erreur:

Erreur d'exécution 1004: L'accès par programme au projet Visual Basic n'est pas fiable.

Cliquez pour agrandir...

J'ai essayé différents "techniques" à savoir: tester sans le "With", lancer la macro avec un bouton. J'ai obtenu une fois, les informations de la "Msgbox", mais je n'ai pas réussi à reproduire l'exécution une seconde fois.

Encore une fois merci pour l'aide

 

Dernière édition: 18 Août 2009

Vote positif 0 Vote négatif

S

SubEndSub

XLDnaute Occasionnel

• 18 Août 2009

• #5

Re : Lire code source macro avec une macro ...

Lire cette article de Microsoft pour voir quoi il retourne

http://support.microsoft.com/kb/282830/fr

 

Dernière édition: 18 Août 2009

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 18 Août 2009

• #6

Re : Lire code source macro avec une macro ...

Bonjour,

pour ce message d'erreur :

Erreur d'exécution 1004: L'accès par programme au projet Visual Basic n'est pas fiable.

Cliquez pour agrandir...

barre de menu excel => outils => macros => sécurité => onglet "éditeurs approuvés", tu coches "faire confiance au projet visual basic".

bon après midi
@+

 

Vote positif 0 Vote négatif

R

Raphy

XLDnaute Nouveau

• 18 Août 2009

• #7

Re : Lire code source macro avec une macro ...

Parfait, cela résout mon problème.
Pour information, j'ai fait dans Excel (on sait jamais, ça peut servir à d'autres):

Outils -> Macro -> Sécurité -> Onglet "Sources fiables" -> Cocher "Faire confiance au projet Visual Basic"

Cliquez pour agrandir...

Merci.

EDIT: devancé par Pierrot93 ...

 

Dernière édition: 18 Août 2009

Vote positif 0 Vote négatif