Largueur de mes Listes Déroulantes EXCEL
Fermé
psychoman
Messages postés
30
Date d'inscription
mercredi 17 octobre 2007
Statut
Membre
Dernière intervention
14 février 2008
-
14 févr. 2008 à 14:24
psychoman Messages postés 30 Date d'inscription mercredi 17 octobre 2007 Statut Membre Dernière intervention 14 février 2008 - 14 févr. 2008 à 15:08
psychoman Messages postés 30 Date d'inscription mercredi 17 octobre 2007 Statut Membre Dernière intervention 14 février 2008 - 14 févr. 2008 à 15:08
A voir également:
- Largueur de mes Listes Déroulantes EXCEL
- Liste déroulante excel - Guide
- Formule excel - Guide
- Supprimer liste déroulante excel ✓ - Forum Excel
- Déplacer une colonne excel - Guide
- Aller à la ligne excel - Guide
1 réponse
psychoman
Messages postés
30
Date d'inscription
mercredi 17 octobre 2007
Statut
Membre
Dernière intervention
14 février 2008
9
14 févr. 2008 à 15:08
14 févr. 2008 à 15:08
Dans ce code , est-ce possible de définir la largeur de la liste de validation
''Définir l a variable qui contient la liste
strPlage = "=SPEC"
''Dans la cellule activée, on définie la liste qui correspond à la plage récupérée dans strPlage
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertInformation, Operator:= _
xlBetween, Formula1:=strPlage
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = "VALEUR NON STANDARD"
.InputMessage = ""
.ErrorMessage = "VOULEZ VOUS GARDER LA VALEUR NON STANDARD ENTRÉE ?"
.ShowInput = True
.ShowError = True
End With
merci
''Définir l a variable qui contient la liste
strPlage = "=SPEC"
''Dans la cellule activée, on définie la liste qui correspond à la plage récupérée dans strPlage
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertInformation, Operator:= _
xlBetween, Formula1:=strPlage
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = "VALEUR NON STANDARD"
.InputMessage = ""
.ErrorMessage = "VOULEZ VOUS GARDER LA VALEUR NON STANDARD ENTRÉE ?"
.ShowInput = True
.ShowError = True
End With
merci