remplissage columnheads

justine

XLDnaute Occasionnel
bonjour a tout le monde,
ma question est simple, enfin j'espere. comment remplir les columnheads d'une listbox
merci
 

bqtr

XLDnaute Accro
Re : remplissage columnheads

Bonsoir Justine,

Tu peux utiliser la propriété columnheads

- Il faut la mettre a True
-
Il faut utiliser la propriété RowSource pour alimenter la ListBox

Exemple:

En tête en A1:C1
Données en A2:C10
Il faut mettre en RowSource A2:C10, avec ColumnHeads à True la ligne d'en tête (A1:C1) s'affichera automatiquement

Bonne soirée

A+

Edit : salut Jean Pierre
 
Dernière édition:

BOISGONTIER

XLDnaute Barbatruc
Repose en paix
Re : remplissage columnheads

Bonjour,

Génère des titres de colonnes

Code:
Private Sub UserForm_Initialize()
  nbcol = [clients].CurrentRegion.Columns.Count
  Me.ListBox1.ColumnCount = nbcol
  Me.ListBox1.List = Range("clients").Resize(, nbcol).Value
  i = 1
  x = 15
  For i = 1 To nbcol
    retour = Me.Controls.Add("Forms.Label.1", "Label" & i, True)
    Me("label" & i).Caption = Cells(1, i)
    Me("label" & i).Top = 40
    Me("label" & i).Left = x
    x = x + Columns(i).Width * 1.1
    temp = temp & Columns(i).Width * 1.1 & ";"
  Next
  Me.ListBox1.ColumnWidths = temp
End Sub

http://boisgontierjacques.free.fr/fichiers/Formulaire/FormListBoxTitreColonnes.xls
http://boisgontierjacques.free.fr/fichiers/Formulaire/FormIntuitive5.xls

JB
 
Dernière édition:

Discussions similaires

Réponses
21
Affichages
1 K
Réponses
4
Affichages
276
Réponses
9
Affichages
656

Statistiques des forums

Discussions
312 229
Messages
2 086 426
Membres
103 206
dernier inscrit
diambote