Erreur d'exécution 1004

Arto -  
 Arto156 -
Bonjour,
J'aimerais pouvoir sélectionner une plage dans une feuille (ici "Fiche empilage dépilage"), pour lui appliquer ensuite une fonction nommée "bordure".
Voici le code qui ne marche pas:

Worksheets("Fiche empilage dépilage").Activate
ActiveSheet.Range(Cells(5, 1), Cells(bor1, 7)).Select

Call bordure

bor1 est un Integer déclaré, et dont la valeur est calculée avant dans le programme.
Une erreur se déclare à la ligne ActiveSheet...
L'erreur est: erreur d'exécution 1004 ; erreur définie par l'application ou par l'objet.
Quelqu'un peut-il m'aider à savoir pourquoi le code ne s'exécute pas correctement?
Merci d'avance

1 réponse

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 586
 
Quelle est la valeur de bor1 ?
0
Arto156
 
bor1 a une valeur variable. Mais j'ai trouvé ma solution. Pour ceux que ça intéresse, il faut créer la fonction sous la forme suivante:
Public Function bordure(Sheets(i).name)
0