Le fichier à télécharger contient:
Les principales caractéristiques:
Remarque:
- Le Module_ValidationMultipleListBo à importer dans le projet VBA.
- Le Module_ValueSizeActiveXListBox à importer dans le projet VBA et issu de cette ressource.
- La Feuil1 qui donne un exemple d'utilisation.
Les principales caractéristiques:
Le Module_ValidationMultipleListBo contient la fonction:
- ValidationMultipleListBox() pour valoriser une cellule avec des valeurs multiples d'une liste de Validation des Données d'une ListBox ActiveX qui lui est appliquée.
VB:'--------------------------------------------------------- 'Validation by dynamic ActiveX ListBox without Scroll Bars (except if the ListBox exceeds the available space in the Excel Window) ' '- Target : Cell being entered '- RangeOrTableValues : Range of a column or 1 or 2 dimensional table of input values '- ListBoxWidth : Optional - ListBox Width (points) ' By default the width of the ListBox will be adapted automatically '- ListBoxHeight : Optional - ListBox Weight (points) ' By default the height of the ListBox will be automatically adapted '- Separator : Multiple Values ??Separator ' By default ", " '- ListBoxInputCellOffsetRow : Offset of the ListBox line relative to the cell concerned by the entry in multiple validation ' By default 0 '- ListBoxInputCellOffsetColumn : Offset column of the ListBox relative to the cell concerned by the entry in multiple validation ' By default 1 '- InputCellColor : Background color for the cell concerned by the multiple validation entry ' By default vbYellow. Set to xlNone for no color '---------------------------------------------------------
- L'ajout des valeurs multiples se fait en sélectionnant une ou plusieurs valeurs dans la ListBox.
- La validation de la saisie se fait soit par la touche <Entrée> soit en sélectionnant une autre cellule.
- Le retrait des valeurs se fait en désélectionnant une ou plusieurs valeurs dans la ListBox ou en utilisant la touche <Suppr> pour les désélectionner toutes dans la ListBox.
- La non validation de la saisie se fait par la touche <Echap>.