Données Validation

Pascalbar · 13 Septembre 2010

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 · 13 Septembre 2010

Re : Données Validation

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

Données Validation

Pascalbar

XLDnaute Nouveau

Pascalbar

XLDnaute Nouveau

Discussions similaires