Bonjour à tous,

je rencontre un soucis d'incompatibilité de type avec le code ci-dessous afin de matcher une ligne

Id_Project est déclaré en Integer
le Current_WP_Id étant récupéré d'une zone de liste

a toutes fins utiles je précise que toutes valeurs renvoie bien les bonnes données

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub List_WorkPackages_Click()
Dim Current_WP_Id As Variant // j'ai tout essayé ici rien n'y fait
 
Set WP_page = Sheets("Work-Packages")
Current_WP_Id = List_WorkPackages.Column(0)
 
Match_WP_Line = Application.Match(Id_Project & Current_WP_Id, WP_page.Columns("A") & WP_page.Columns("B"), 0)
 
' MsgBox ("WP nb= " & Current_WP_Id & "Project Id = " & Id_Project)
End Sub
merci d'avance pour votre aide