Type d'argument ByRef incompatible

Bonjour,

j'ai un message d'erreur à l'exécution de mon code mais je ne comprends pas pourquoi. Est-ce que quelqu'un a une idée pour résoudre ce problème ?

Merci d'avance.

Voici l'erreur que j'ai à l'exécution de mon code :
"Erreur de compilation:
Type d'argument ByRef incompatible"

Et voici mon code qui est assez simple :

Option Explicit

Type RF
    site As String
    tranche As String
End Type

Type Action
    equipement As RF
    position As String
End Type

Sub Export(ByRef config As Action)
    'Ecrit dans le fichier txt
    Dim chemin As String
    Dim ligne As Integer
    
    chemin = "C:\Users\utilisateur\Desktop\Export.csv"
    Open chemin For Output As #1
    For ligne = 0 To UBound(config)
        Print #1, config(ligne).position,
    Next ligne
    Close #1
    MsgBox ("Export effectué avec succès !")
End Sub

Sub main()
    Dim equipement1 As RF
    Dim equipement2 As RF
    Dim config(2) As Action
    
    equipement1.site = "SITE1"
    equipement1.tranche = "TRANCHE1"
    
    equipement2.site = "SITE2"
    equipement2.tranche = "TRANCHE2"
    
    config(0).equipement = equipement1
    config(0).position = "POSITION1"
    
    config(1).equipement = equipement2
    config(1).position = "POSITION2"
    
    Call Export(config)
End Sub