Bonjour Stéphane, Creepy, Ambroys9211, le forum,
Il y a d'abord une erreur dans ton code, il manque l'instruction 'End Select' à la fin de la fonction.
Sinon cela fonctionne, bien que le fait d'utiliser une fonction soit surprenant : en général on utilise une fonction pour qu'elle retourne une valeur (ce qui permet de l'appeler à droite d'une expression) et le nom de la fonction doit être renseigné et appelé avant d'en sortir.
Pourquoi ne pas utiliser une procédure (d'autant plus que tu as bien indiqué 'Appel de procédure') ?
Bien sûr, cela marche en raison de la gestion de types par défaut (Variant, 0, chaîne vide, selon les opérations entreprises) et de syntaxe comportant des indications optionnelles, mais ce n'est pas très propre, 'VBAment' parlant.
De plus il est inutile de la qualifier de public, une fonction est publique par défaut.
Oups, mille excuses, nos réponses se cont croisées. Moi aussi j'utilise la gestion d'erreur d'Ambroys9211, plus satisfaisante.
Message édité par: JJM, à: 08/08/2005 17:06
Message édité par: JJM, à: 08/08/2005 17:07