Add to a multicolumn listbox using two textboxes and one command button

[ChrisPatterson]

Dear Excel-gurus,

Having prowled the internet for well over an hour trying to find the solution, I come to you for help.

The situation is as follows: users add data to a userform which, once all is completed, produces a PDF document. One of the parts is to fill in terms and abbreviations used in the document. A number of which are always required, even more can be selected by the user and finally the user has the option to add non-standard terms and abbreviations to the document.

The userform therefore, amongst other buttons and things, has:
a 2-column listbox which needs to be populated automatically for the standard T&As;
a 2-column listbox for the optional T&As which the user selects using the multiselect option;
a textbox for the non-standard T&A shortcut;
a textbox for the non-standard T&A description;
a button for adding the non-standard, user-defined T&A (which is typed into the two textboxes);
a button for removing T&As from the top listbox.

The idea is that the main listbox be the one copied by VBA to the final document.

I have tried the commands .AddItem, .List, .Column, .RowSource, et cetera, but cannot find a working code. Like other people, when using RowSource, I get an access error.

Here are a few things I've tried:

Please Login or Register  to view this content.

TermsAbbsUserform_edit.png

[romperstomper]

You need something like:

Please Login or Register  to view this content.

[ChrisPatterson]

Romperstomper,

Thanks again for another swift reply. Unfortunately I get the Run-time error '70': Permission denied. error, which, if I understand correctly, might have to do with having:

Please Login or Register  to view this content.

When the listbox is not automatically filled this way your code works.

[romperstomper]

Yes - you can't use Rowsource if you plan to add items - unless you add them to the source range.

[ChrisPatterson]

Fixed by not using RowSource.