Données Validation

[Pascalbar]

Bonjour,
Sous 2003, j'ai une donnée validation alimentée par une liste dynamique.
Plutôt que d'afficher un vide avant le choix de l'opérateur, j'aimerais afficher la première valeur.
J'ai trouvé une procédure VBA chez Jacques Boisgontier

Sub raz()

For Each c In Cells.SpecialCells(xlCellTypeAllValidation)
If Left(c.Validation.Formula1, 1) = "=" Then
NomList = Mid(c.Validation.Formula1, 2)
c.Value = Range(NomList)(1)
Else
temp = c.Validation.Formula1
a = Split(temp, ";")
c.Value = a(0)
End If
Next c
End Sub

Mais qui chez moi me renvoie une valeur d'erreur
Variable non définie
Des idées ?
Merci
Pascal

 

[Pascalbar]

Re : Données Validation

Je me réponds à moi-même, j'avais juste une Option explicit qui trainait
Pascal