populate colum headers on userform

[timecop79]

How do I populate the colum headers of a list box with some headings.
I can populate the 'body' of the list box with text of various columns and rows wide, but how do I populate the headers. The property 'ColumnHeader ' just gives me a Boolean value, and just makes the heafers visible.

 

[dmt32]

Hi
The ListBox control will only display column headers when using the RowSource property to populate it & the ColumnHeads property is set to True

You can read a general guide here: VBA Listbox - A Complete Guide - Excel Macro Mastery.

Dave

 

[timecop79]

Hi
The ListBox control will only display column headers when using the RowSource property to populate it & the ColumnHeads property is set to True

You can read a general guide here: VBA Listbox - A Complete Guide - Excel Macro Mastery.

Dave

I tried a lot of thing but nothing work, I think I'm making a mistake but don't know what exactly, my headers can't be displayed, je peut partager mon code et une image de l'anomalie

 

[dmt32]

Post code you are having issues with - plenty here to offer guidance

Dave

 

[timecop79]

here the code:

Sub refresh_data()

Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("Historique inter")
Dim last_row As Long
last_row = Application.WorksheetFunction.CountA(sh.Range("A:A"))

With Me.ListBox1
     .ColumnHeads = True
     .ColumnCount = 12
     .ColumnWidths = "70;70;70;70;70;70;70;70;70;70;70;70"
     .List = sh.Range("A2", "L" & sh.Range("A" & Rows.Count).End(xlUp).Row).Value
 End With
    
End Sub

here the image , you can see headers one row donw

 

[timecop79]

It's OK, I found the solution