"indirect" dans une macro

[ben]

Bonjour,

j'ai un pb avc le cde suivant; le pb, c'est que j'ai une valeur non définie en B3 - lorsqu'elle est definie ça fctionne, le soucie c'est que je vx la definir ds une macro.

Range("C3").Select
Application.DisplayAlerts = False
'Liste de choix pour colonne Region
With Selection.Validation
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:="=INDIRECT(""code_service_""&$B$3)"
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = False
End With


merci d'avance