procédure trop grande?

bonjour,

J'ai le message procedure trop grande qui s'affiche...

comment faire? dois je creer 2 moules differents et a la fin du premier appeler le deuxieme...?
j'ai besoin d'un sel module pour creer mon fichier..??

Vidage du presse papier..?

Comment forcer le vidage du presse papier egalement..?

Merci

Bonjour

Pourrait-on voir le bout de code qui pose problème ainsi que le numéro d'erreur?

Bonjour,

décompose donc ta procédure en plusieurs procédures .... (en créant d'autres procédures, que tu appelles depuis la tienne, pour exécuter telle ou telle autre partie de tes instructions....!

Ainsi, par exemple :

Code:

---

1 2 3 4 5

Private Sub Command1_Click() toto = 4 toto = toto * 5 MsgBox toto End Sub

---

peut parfaitement (par exemple) se décomposer ainsi (avec une routine):

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Command1_Click() Dim toto As Integer toto = 4 calcul toto MsgBox toto End Sub   Private Sub calcul(toto As Integer) toto = toto * 5 End Sub

---

ou encore ainsi (avec une fonction) :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Command1_Click() Dim toto As Integer toto = 4 toto = calcul(toto) MsgBox toto End Sub   Private Function calcul(toto As Integer) As Integer calcul = toto * 5 End Function

---

Ok pour les appels de fonctions ..je vais s doute utiliser la fonction call pour appeler une autre procedure...

Par contre pour le presse papier je n'ai pas de message d'erreur...

Juste un message excel qui me dit : "le contenu du presse papier est tres important, voulez vou non garder les donnees"

Je ne souhetrais pas que ce message s'affiche et donc forcer le vidage du presse papier.

Call n'est pas indispensable...

Avoir une procédure trop grande, il faut déjà le faire... Combien as-tu de lignes?

Vider le presse-papiers: Lorsque l'on demande le code, ce n'est pas pour rien... :roll:... Tu as probablement un paste qui n'est pas résolu par un

Code:

---

application.cutcopymode = false

---

, mais sans code...

Tu peux toujours utiliser

Code:

---

application.displayalerts=false

---

mais il ne faut pas oublier de le remettre à True après... et donc, sans ton code, je ne sais pas t'aider davantage

ok la fonction marche et la boite de dialogue presse papier n'apaprait plus. Il faut la repasser a true a la fin ou non?

Je ne sais pas combien j'ai de ligne mais bcp oui...
J'ai scindé ma procedure en 2 fonctions et ca marche nickel...!

Comme tu postes plusieurs questions à la fois, que tu ne donnes pas le code que tu as testé... on ne sait pas t'aider. Par exemple, je ne sais pas ce que tu veux repasser à True à la fin... ni à la fin de quoi tu veux modifier cette valeur...

Citation:

---

Envoyé par cchampion2fr

ok la fonction marche et la boite de dialogue presse papier n'apaprait plus. Il faut la repasser a true a la fin ou non?

Je ne sais pas combien j'ai de ligne mais bcp oui...
J'ai scindé ma procedure en 2 fonctions et ca marche nickel...!

---

Je serais curieux de voir le code :roll: