est-il possible de faire un appel dynamique à une procédure??

est-il possible de faire un appel dynamique à une procédure?? - VB/VBA/VBS - Programmation

Marsh Posté le 19-02-2008 à 16:22:00    

[VBA]
Bonjour, je m'explique :  
Je créé dynamique au cours de l'appli des bt avec les codes Btxx_Click() associés et dynamiques
Dans la procédure init, je souhaite, dans ma boucle For faire des appels successifs à ces procédure Btxx_Click()
 
public sub init()
For i = Range("A1" ).Value To ActiveSheet.OLEObjects.Count
            With Application.VBE.ActiveCodePane.CodeModule
                LineStart = .ProcStartLine("Bt" & i & "_Click", 0)
                fonction = Application.VBE.ActiveCodePane.CodeModule.Lines(LineStart + 1, 1)
               j'ai oublié de préciser : fonction vaut = Call del_ligne("SUP41", "Bt23" )            End With
            call "Bt_" & i & "_Click"
Next i
end sub
 
 
Private Sub Bt23_Click()
Call del_ligne("SUP41", "Bt23" )
End Sub
 

Y'a t'il un moyen d'appeller dynamiquement des procédures ou des fonctions... je sais pas, peut-être avec des pointeurs ou autre...? :??:  
Merci beaucoup car là je pêche!!! :fou:


Message édité par este44 le 19-02-2008 à 16:24:15
Reply

Marsh Posté le 19-02-2008 à 16:22:00   

Reply

Marsh Posté le 19-02-2008 à 17:26:13    

Je connais rien a vba, mais je dirai que la fonction eval est ton amie.

Reply

Marsh Posté le 19-02-2008 à 21:00:52    

Je ne suis pas sûr que ça soit applicable en VBA, mais en VB6 on peut utiliser la fonction CallByName
Essaie de voir là http://www.planet-source-code.com/ [...] nyname.htm
Je n'ai pas rien sous le coude pour tester le VBA.


Message édité par tegu le 19-02-2008 à 21:01:27
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed