Bonjour,

J'ai dans un de mes programme le code suivant qui va passer un tableau en parametre d'une fonction. Malheureusement lors de l'appel de cette fonction, l'editeur VBA me renvoit l'erreur de compilation : "Incompatiblité de type: tableau ou type défini par l'utiliateur"!

Je ne vois pas du tout d'ou peut venir l'erreur :/

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub CommandButton1_Click()

b = compte_nb_item
r = ListeFichiersDans("C:\Documents and Settings\f-freyssinier\Desktop\Factures")
If b - a <> 0 Then
    Dim Tabl() As String
    ReDim Tabl(b - a)
    With Workbooks("classeur_ref.xls").Sheets(1)
        For i = 0 To b - a - 1
            Tabl(i) = .Range("B" & i + 2)
        Next i
    stockage_folder (Tabl)    
Me.Hide
End If

End sub
Chipss