Fonction interne à un module

Bonjour,

je me pose une question que je ne me suis jamais posé et sans réponse dans mes recherches

J'ai une séquence de lignes à exécuter dans une macro à plusieurs endroits, le plus logique est d'écrire une "Function" et de l'appeler à chaque fois

Cependant ce code contient beaucoup de références interne à la macro elle-même , ce qui fait une fonction avec un grand nombre de paramètres à passer

Je me demande s'il est possible dans VBA de faire une fonction "interne" c'est à dire l'équivalent d'un "GoTo" à la première ligne du code à exécuter (pas de problème) ET REVENIR à la ligne suivant l'appel

Cela ressemblerait à cela, le problème bien sur est de trouver comment faire un équivalent à "GoTo b" ("GoTo b" devenant "GoTo c" au prochain appel soit un retour dynamique)

Code:

---

1 2 3 4 5 6 7 8 9 10 11

lignes de code ... GoTo a b: ...   a: lignes communes ... Goto b

---

Bonjour,
Je ne suis pas certain d'avoir compris ce que vous voulez mais si une procédure A invoque une procédure B, à son retour elle exécutera la ligne suivante de la procédure A

Bonjour Philippe, retraite83

Pas certain d'avoir bien compris non plus l'explication, voici un essai

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Function Test(MonParam as String) Dim Rep as string ' Exécute une action selon une valeur Select Case MonParam Case "BONJOUR" Rep = "Bonjour et bonne journée" Case "AU REVOIR" Rep = "Au revoir et bonne soirée" Case "SALUT" Rep = "YO !" End Select ' Renvoie la valeur à la fonction Test = Rep End Function

---

Fonction que l'on peut appeler comme ceci

Code:

---

1 2 3

Sub Essai() Msgbox Test("BONJOUR") End Sub

---

A+

Bonjour vous 2

je n'ai pas été clair

en fait je voudrai que la procédure B soit dans A
Si elle est dans une fonction autre, je vais avoir un paquet de paramètre à passer, si pas d'autre solution je le ferai

Pour essayer de préciser, voilà mon idée :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

Sub x()   1ere fois... GoTo a b: ...     2eme fois... GoTo a c: ...   3eme fois... GoTo a d: ...   a: ... Si je viens de 1ere fois = retour en b Si je viens de 2eme fois = retour en c Si je viens de 3eme fois = retour en d End sub

---

bonjour,
le langage spaghetti avec moults GOTO est dépassé!

il est, il me semble, préférable de sub diviser c'est méthode plutôt que de les agglomérer en une!

notes que tu peux gérer la propriété d'un module pour lui donner un nom ce qui te permettras de t'y retrouver facilement dans ton code!

notes également qu'il est possible de créer des types personnaliser pour regrouper plusieurs variables, ça peux te permettre de limiter le nombre de paramètre à un fonction!

notes également qu'il est possible de définir des paramètres optionnels {Optional} à une méthode et de leurs affecté des valeur par défaut!

#5

tu connais une doc qui parle de tout ça?

Merci

Bonjour

je vais écrire une fonction avec passage des paramètres

merci à tous de votre temps

Bonjour,
désolé mais il m'a fallu un peut de temps!

déjà il faut donner la parole au maître de tous les informaticiens Descartes!

https://slvf-associes.com/methode-cartesienne

comme disait Descartes un problème complexe n'est autre que la somme de problème simple!

sur limages qui suit tu peux trouver le schéma cartésien d'un projet!
de droite à gauche ce trouve le temps et le flue de données
et de haut en bas le détail!
Pièce jointe 629289

quand tu en serras au détail le plus petit tu pourras envisager un diagrammes fonctionnel!

Pièce jointe 629291
un fois ton digramme établir tu pourras imaginer ton pseudo code!
https://info.blaisepascal.fr/pseudo-code

pour la génération les diagramme j'ai utiliser Dia!

Merci
je vais regarder cela de près

Il va me falloir un peu de temps...