Hello,
In Your userform Activate Event put:
Under your Combobox Change event put something like this:
Dim Wks As Worksheet For Each Wks In ThisWorkbook.Sheets Me.ComboBox1.AddItem Wks.Name Next
Regards.Dim rng As Range Me.ListBox1.Clear For Each rng In Sheets(Me.ComboBox1.Value).Range("A2:A100").Cells 'Just an example. Me.ListBox1.AddItem rng.Value Next
Thank you sir for your prompt reply. Its all working fine but I have a little problem. The listbox is showing a 1 column only like this:
Date
Particulars
OR Reference
Withdrawal
Deposit
Balance
What I want to show is like this (1 Row, 6 Columns)
Date Particulars OR Reference Withdrawal Deposit Balance
And that is also the format that is shown in each worksheet.
What shall I do to make it like this format in my Listbox.
Last edited by Marlon1980; 07-18-2015 at 07:12 AM.
Please see attached image to make it clearly.
Capture1 is the result of the code that you gave
Capture2 is the one that I want to show.
Capture1.PNGCapture2.PNG
Thanks once again.
Last edited by Marlon1980; 07-18-2015 at 07:34 AM. Reason: added image attachment
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks