argument dans une fonction

bonjour,

J'ai créé une procédure qui permet de mettre a jour la premier feuille d'un workbook excel.
Cette Procedure prend en argument la reference d'un workbook. Voici la procedure en question:

Code:

---

1 2 3 4

Sub UpdateFormule(ByRef W_book As Workbook) 'Update Formula '... traitement des cellules de la premier page du Worlbook End Sub

---

Voici comment j'appelle la procedure dans mon code:

Code:

---

1 2 3 4 5 6 7

Dim WkbVierge, WkbOld As Workbook '... Set WkbVierge = ActiveWorkbook '... 'mise a jour des formule de la feuille Foreseeable Tasks UpdateFormule WkbVierge

---

quand je teste mon aplcation le code ne commence même pas à s'exécuter et il me dit qu'il y a une erreur à la ligne "UpdateFormule WkbVierge".

Le message d'erreur que j'ai est:

Citation:

---

Erreur de compilation:
Type d'argument byref incompatible

---

Quelq'un voit il comment ce peut sumonter cet obstacle?

Bonsoir,

Déclare ta variable avec le type approprié:

Code:

---

Dim WkbVierge As Workbook, WkbOld As Workbook

---

Cordialement,

Tirex28/

:king: Bien joué Tirex28, c'etait bien ca le problème