List .rowsource property

[vmjan02]

I have mention below code, but .rowsource is not working.

I am trying to get the data from sheet which is veryhidden.

any Idea.



Private Sub CommandButton5_Click()
If Sheets("Show").Visible = xlSheetVeryHidden Then
With Me.ListBox1
.ColumnCount = 6
.ColumnWidths = "35;60;60;70;110;60"
.RowSource = Sheets("Show").Range("B12:H19").Address -----> Problem area, its not taking this rowsource.
.BorderStyle = fmBorderStyleSingle
.TextAlign = fmTextAlignLeft
.MultiSelect = fmMultiSelectMulti
End With
End If
End Sub

 

[gallen]

RowSource takes a string:

Because that line says the RowSource should be the address of .RowSource = Sheets("Show").Range("B12:H19") then this can also be written as

[/COLOR][COLOR=#333333].RowSource = "B12:H19"[/COLOR][COLOR=#333333]

Which is wrong as this will use the active sheet. So you need to change the line to this:

.RowSource = "Show!B12:H19"

 

[vmjan02]

Cool, works well, done the trick. thanks.