Listbox Multiselect

Any expert ? I come in peace and seek for help.

You will get help as and when someone is ready to help, and that help will be offered for free.

Any expert ? I come in peace and seek for help.

"Part of being a person is about helping others"
-Regis Murayi-

Making quotes about helping others on a forum where many members spend a lot of their free time doing just that shows us two things:

1. You don't know how the forum works.
2. You have an impatient streak.

I think that last post is likely to do your chances of getting help more harm than good, I hope for your sake that I am wrong.

First you need to set your listbox to be multi select.
Either set the property at design time or add code to userform Initialize event

Please Login or Register  to view this content.

then you need to loop through and check choices. Modify Add event code

Please Login or Register  to view this content.

Attachment 748204

Hello Andy Pope,
thank you for replying, i do like you said but still get an error when i click on the add button (refer image)
and whenever i double click on the listbox1 for updating purpose, it going to this code Call MsgBox("Pilih data pada tabel data", vbInformation, "Data Siswa")

Please don't quote previous reply, unless it has a use. Otherwise it just clutters your post.

Please Login or Register  to view this content.

Your example workbook does not load any values in to any controls so difficult to actual test.

You will need to check the double click event of the control to see what code is being run

Administrative Note:

We would very much like to help you with your query, however it has been brought to our attention that the same query has been posted on at least TWO other forums and you have not provided the required cross-post link(s) here.

Please see Forum Rule #3 about cross-posting and adjust accordingly. Read this to understand why we (and other sites like us) consider this to be important.

(Note: this requirement is not optional. No help to be offered until the link is provided.)

I seek other help to this site
https://www.mrexcel.com/board/thread...elect.1182210/
http://www.vbaexpress.com/forum/show...ox-Multiselect

You have asked on TWO other sites - links to both are required before you will get any further help here.

And you need to read the forum rules ASAP.

EDIT: Thank you for the second link.

Start again - you are tying yourself up in knots - going round in circles with repetition - you need ONE table with an extra field for 'Section'
You then load the listbox with the filtered 'visible rows of the table' - saves all the nonsense of loading the listbox from 'active sheets'
You will see that 'UbahData' does not appear to be 'Set' unless the 'Update' button has been previously been pressed.
Start your UserForm code with the statement 'Option Explicit' as the very first line of code then follow that by declaring ALL your variables before any 'Subs' code.
That way your variables are available throughout all your UserForm code, if you declare them within a 'Sub' they are only operative within that 'Sub' and lose their value as you exit the 'Sub'.
As soon as you have 'Option Explicit' at the head you will amaze yourself how much simpler 'debugging' becomes - saving yourself much time scratching your head.