[vba] Procedure trop grande

Bonjour voilà mon probleme.
lorsque j'execute ma procedure (quand je clic sur validé).
Une erreur m'est retourné : "Procedure trop grande"
ha quoi c'est du (ma procedure lorsque je la copie colle sous word fais 47pages :aie: )

Bonjour,

Tu peux peut être découper ta procédure en différentes fonctions qu'un procédure principale appellera, ça diminuera la 'taille' de la procédure

j'ai ma procedure de ce type :
Private Sub test_Click()

End Sub

je fais comment pour declarer une fonction à l'interieur et l'appellé??

J'ai créé une fonction qui me permet d'exporter mes valeurs dans excel :
Public Function expor_excel()
comment je fais pour l'appellé dans ma procdure SVP

C'est bon j'ai trouvé je fais call [nom de ma fonction]
Mais il ne recupere pas toutes les variable local de ma procedure. Pk?

imaginons ce code

Code:

---

1 2 3 4 5 6

For i = 1 To 10 i = i + 4 i = i - 2 i = i * 2 Next i

---

Tu le factorise en :

Code:

---

1 2 3 4 5 6 7 8 9 10

For i = 1 To 10 i = Call action_sur_i(i) Next i ............. Function action_sur_i(i as integer) as integer i = i + 4 i = i - 2 i = i * 2 end function

---

C'est très bette sur cette exemple, mais factorisé le code est très utile surtout si tu fais la même opération à plusieurs endroits

Citation:

---

ma procedure lorsque je la copie colle sous word fais 47pages

---

Je sais pas comment tu t'y retrouve mais vu la taille de la procédure tu dois forcément pouvoir factoriser des choses.

Les variables de ma procedure et les resultats trouvé dans ma procedure, est ce que je peux les reprendre dans la fonctions sans les passer en parametres?

Oui si elles sont déclarées en variables globales.

Code:

---

1 2 3 4

Option Compare Database Option Explicit 'mettre les variables globales ici

---

elles seront accessibles à toutes les 'sub' et 'function' d'un formulaire ou état, ou toutes les fonctions d'un module.

Une procédure dépasse rarement une page. Il faut factoriser un maximum avec des fonctions

C'est bon je n'ai plus qu'une page je me suis pris la tete pour rien.
j'avais oublié d'utiliser un for au lieu de créé 30 variable * 12 mois ... 360variable alors que maintenant j'utilise les meme pour les 12 mois en manipulant les chaine de caractere.
merci @+