Hi,
I would like to put a header into my ListBox but since the values inside the
ListBox are calculated inside VBA, what is the best way to proceed? I tried
to put ColumnHead = True but rowsource needs to be inside excel. Is there a
way to add value from rowsource inside VBA instead like?
Dim aHeaders as Variant
aHeaders = Array("Head1", "Head2", ...)
Me.ListBox1.RowSource = aHeaders
Actally, value are added as:
For i = 0 To 10
Me.ListBox1.AddItem fTableValue(i+1,1)
Me.ListBox1.List(i, 1) = fTableValue(i+1,2)
Next i
Maybe i = 0 could be the header.. but I cannot put these cells in gray...
Thanks a lot!
--
Alex St-Pierre

AFAIK, you can not add headers in vba. This can only be done if the
information is on a worksheet and you are using the RowSource property.
--
HTH,
Gary Brown

If this post was helpful to you, please select ''YES'' at the bottom of the
post.



"Alex St-Pierre" wrote:

Hi,
I would like to put a header into my ListBox but since the values inside the
ListBox are calculated inside VBA, what is the best way to proceed? I tried
to put ColumnHead = True but rowsource needs to be inside excel. Is there a
way to add value from rowsource inside VBA instead like?
Dim aHeaders as Variant
aHeaders = Array("Head1", "Head2", ...)
Me.ListBox1.RowSource = aHeaders
Actally, value are added as:
For i = 0 To 10
Me.ListBox1.AddItem fTableValue(i+1,1)
Me.ListBox1.List(i, 1) = fTableValue(i+1,2)
Next i
Maybe i = 0 could be the header.. but I cannot put these cells in gray...
Thanks a lot!
--
Alex St-Pierre

It's like very limited! I found an interesting article about how to make it
using class.
http://groups.google.com/group/micro...819cefb752b6ef
I also have seen that you can reproduce a column head using ListView. In
this case, the Header is gray. I don't know if these method can be use in VBA?
Thanks!
--
Alex St-Pierre


"Gary Brown" wrote:

AFAIK, you can not add headers in vba. This can only be done if the
information is on a worksheet and you are using the RowSource property.
--
HTH,
Gary Brown

If this post was helpful to you, please select ''YES'' at the bottom of the
post.



"Alex St-Pierre" wrote:

Hi,
I would like to put a header into my ListBox but since the values inside the
ListBox are calculated inside VBA, what is the best way to proceed? I tried
to put ColumnHead = True but rowsource needs to be inside excel. Is there a
way to add value from rowsource inside VBA instead like?
Dim aHeaders as Variant
aHeaders = Array("Head1", "Head2", ...)
Me.ListBox1.RowSource = aHeaders
Actally, value are added as:
For i = 0 To 10
Me.ListBox1.AddItem fTableValue(i+1,1)
Me.ListBox1.List(i, 1) = fTableValue(i+1,2)
Next i
Maybe i = 0 could be the header.. but I cannot put these cells in gray...
Thanks a lot!
--
Alex St-Pierre