VBA problème validation variable

[Rafilo13]

Bonjour,

Je suis en train de faire un projet VBA et dans ce cadre je cherche a parametrer un variable qui me permettra de filtrer sur différentes colonnes suivant certaines conditions

Voici mon code :

Dim d As Long
With Sheets("Vision Siren")

If .Range("D13") = "Aucun" And .Range("D11") <> "Aucun" Then
Set d = 10
ElseIf .Range("D13") = "Aucun" And .Range("D11") Then Set d = 9
ElseIf .Range("D13") <> "Aucun" Then Set d = 11

Else
Exit Sub
End If

Sheets("D1ST").AutoFilter field:=d.Value, Criteria1:=c.Value

Le problème est que VBA ne comprends pas d = 10 (qui est une des valeurs que je veux faire prendre a mon field). Je sais pas si c'est ma synthaxe qui n'est pas bonne ou autre ...

Si quelqu'un peu me donner des conseilles merci par avance

Bonne journée a tous.

 

[Dranreb]

Re : VBA problème validation variable

Bonjour
L'instruction Set sert uniquement à affecter une instance d'objet connu à une variable objet, ce qui est indispensable pour pouvoir ensuite utiliser cette variable comme expression représentant cet objet.
Pour affecter une expression à une variable non objet ou a une propriété d'un objet qui n'est pas elle même un objet, c'est l'instruction Let, dont le mot clé, Let, facultatif, n'est pratiquement jamais employé.
Cordialement

 

[Rafilo13]

Re : VBA problème validation variable

Merci pour la réponse et les explications. Bonne journée