Salut tout le monde!
J'ai un bout de code tout simple et une erreur de compilation. Qq'un pourrait m'expliquer ce qui ne vas pas?
Dim d as Range
Select Case CriteriaSelection.Text
' CriteriaSelection est une combobox dans un USF
Case "In Charge"
Set d = Range("In_Charge")
Case "Region"
Set d = Range("Region")
Case "Type"
Set d = Range("Type")
End Select
d.Select
'Apparemment d n'est pas reconnue... Pourquoi???
J'ai un bout de code tout simple et une erreur de compilation. Qq'un pourrait m'expliquer ce qui ne vas pas?
Dim d as Range
Select Case CriteriaSelection.Text
' CriteriaSelection est une combobox dans un USF
Case "In Charge"
Set d = Range("In_Charge")
Case "Region"
Set d = Range("Region")
Case "Type"
Set d = Range("Type")
End Select
d.Select
'Apparemment d n'est pas reconnue... Pourquoi???