Transformer un sub() en fonction

Bonjour,

Je souhaiterais transformer un sub() en une fonction afin de l'utiliser pour differents projets.
Etant debutant en vba, j'arrive pas à creer la fonction, je tombe sur diffrents messages d'erreurs! sachant que mon sub() marche très bien!
D'après ce que j'ai pu comprendre sur les forums, une procédure 'function' doit toujours envoyer une valeur, et c'est la ou je trouve des difficultés, car dans ma procédure sub() je change le format d'une cellule/plage après une comparaison (mettre en gras, changer le interior.ColorIndex ...), donc pas de valeur a renvoyer!

Dans mon projet j'ai utilisé des dictionnaires pour eviter de faire des boucles for (j'effectue une recherche par clé ) afin d'optimiser le temps d'execution de ma macro.

En pj vous trouvez la macro, le code est bien commenté!
Dans le commentaire je met en evidence les procédures que j'aimerais changer en fonction.

Si quelqu'un pourrait me donner un exemple sur comment transformer une seule de ces procédures en fonction, afin que je puisse l'appliquer sur le reste des procédures!

le code se trouve dans la feuille "control board"

Merci d'avance pour votre aide

Bonjour, bonjour,

que de confusion ! Pas besoin de transformer une procédure en fonction pour l'appliquer à d'autres projets ‼
Rien à voir !

S'il n'y a rien à renvoyer, ce n'est donc pas une fonction mais bien une procédure !

Rien qu'en consultant l'aide VBA de Sub & Function …

Et pour répondre plus précisément, une présentation claire & exhaustive s'impose, avec le code !

Bonjour Marc_L,

Si tu regarde le nombre de ligne de code dans mon projet principal, tu comprends pourquoi j'aimerais faire ca sous forme d'une fonction.
Je travaille sur un projet aeronautique, les attributs peuvent etre une centaine, le fichier joint n'est qu'un petit exemple.
Mon besoin est, vu que la meme procédure se repète pour chaque attribut, et pour d'autre projets aussi, est juste d'optimiser le temps pour coder tout ca, et si d'autres collègues veulent appliquer les memes fonctionalités, qu'il auront pas besoin de re'coder tout ca.

Maintenant si ce n'est pas possible, on tombe dans l'obligation de coder ca à la main!

Merci

Pour être tout à fait clair, cela n'a rien à voir qu'un code soit une fonction ou pas pour l'utiliser dans d'autres projets !

Toutes mes procédures sont utilisables dans n'importe quel projet si j'en prévois les paramètres,
c'est donc juste une question de contexte, de logique, de conception …

S'il n'y a rien à renvoyer, ce n'est donc pas une fonction.
Suffit de mettre à plat ce qui doit être passé en paramètre …

Tu as tout a fait raison! mes competances en programmation sont limités!:oops:
mon besoin est plutot de créer une procédure generale qui prend des paramètres, mais surtout pouvoir utiliser une procédure au sein d'une autre procédure.

Je pense avoir compris ce que je dois faire, si je bloque je reviens vers vous!

Merci en tout cas!

Bonjour,
Oui, mais une fonction peut-être appelée comme une SUB
Exemple avec MsgBox

Code:

---

1 2	MsgBox "Message", vbCritical + vbOKCancel response = MsgBox("Message", vbCritical + vbOKCancel)

---

Évidemment !

Mais ce n'est pas le fait d'être une fonction qu'elle fonctionnera mieux qu'une procédure pour divers projets …

Si tu veux que ta sub soit utilisable par tous:
1) ne déclare pas tes sub sur le module de la feuille mais dans un module séparé.
2) Ne déclare pas tes sub en private mais en public.
3) Personnalise si besoin est tes sub en leurs passant des paramètres :

Code:

---

public Sub Initialiser_Click(param1 as string, param21 as strng, param3 as strng)

---

4) Place-les dans un classeur XLA.