Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 mise en forme différente dans listBox

marc.gilliand

XLDnaute Occasionnel
Bonsoir,
J'ai un listbox avec 8 colonnes, j'aimerai que certaines soient "à gauche", d'autres à "droite".
Voici mon bout de code :


Private Sub UserForm_Initialize()

'taille formulaire


UserForm1.Height = 505
UserForm1.Width = 960

'initialisation formulaire
ListBox1.ColumnCount = 8
ListBox1.List = Sheets("ListePaiements").Range("A1:K10000").Value



End Sub

Private Sub ListBox1_Change()

On Error Resume Next

Dim strCol1 As String
Dim TextRow As Long

TextRow = ListBox1.ListIndex
On Error Resume Next
strCol1 = ListBox1.List(TextRow, 0)
Sheets("USF1").Cells(16, 2).Value = strCol1

Me.TextBox2.Value = Sheets("USF1").Cells(4, 2).Value
Me.TextBox12.Value = Sheets("USF1").Cells(18, 2).Value
Me.TextBox10.Value = Sheets("USF1").Cells(19, 2).Value
Me.TextBox9.Value = Sheets("USF1").Cells(20, 2).Value
Me.TextBox28.Value = Sheets("USF1").Cells(21, 2).Value
Me.TextBox11.Value = Sheets("USF1").Cells(22, 2).Value
End Sub

merci de votre aide
 

job75

XLDnaute Barbatruc
Bonjour marc.gilliand,

Aucune propriété de la ListBox ne concerne l'alignement du texte dans les colonnes.

Le cadrage est à gauche, au centre ou à droite [Edit] pour toutes les colonnes.

Pour cadrer à droite on peut utiliser une police à chasse fixe et ajouter des espaces devant.

Faites une recherche sur ce forum, le problème a déjà été traité.

A+
 
Dernière édition:

marc.gilliand

XLDnaute Occasionnel
merci. comment fait-on pour editer les colonnes dans l'UF ?
 

ChTi160

XLDnaute Barbatruc
Bonsoir marc
Bonsoir job75 , le Forum
il y aurait bien une solution , mais elle passe par l'utilisation d'une ListView !
voir si tu as ce Composant de dispo sur ta machine ou si tu peux l'installer !
tu as aussi un problème tu Mets :
VB:
ListBox1.ColumnCount = 8
ListBox1.List = Sheets("ListePaiements").Range("A1:K10000").Value
soit une listBox dont on definit le nombre de Colonnes à 8 et la plage qu'on lui affecte en contient 11(A:K)
qu'entends tu par :
comment fait-on pour editer les colonnes dans l'UF
Pas de fichier ?
Bonne fin de Soirée
jean marie
 
Dernière édition:

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…