Set Userform Checkbox value to True if CheckBox.Caption string is found in another String

Hi all, TFiske...again,

First of all, I want to thank to AlphaFrog, mehmetcik, Arkadi, bakerman2, xladept, and Winon for their help in getting me this far with this project.

Here's the new problem:

I have a Multi-Tab UserForm in which the user will check boxes if a given chemical is of a given type. Then the .Caption parameter for each box checked is concatenated with the following code and stored in a cell in column 4 of the "Chemical's" table:

Please Login or Register  to view this content.

Now, on the Edit Chemical Record tab of the userform, I need to set these checkboxes to True if their caption is found in the string generated by the code above when the user selects a stored Chemical Record from a ComboBox. I've tried a few approaches but haven't gotten anywhere.
Most recently I've tried a public function with InStr:

Please Login or Register  to view this content.

This latest method gives me an "Expected End Sub" error. The other method's I've tried don't seem to do anything. I've attached a copy of the project. The UserForm in question is UsrFrm_ChemicalMaintenance. Thanks again!

It looks like I was getting the "Expected End Sub" error because "End Sub" was missing. I tried the following code and it seems to work:

Please Login or Register  to view this content.

I'll mark this as solved.

Lol, thanks. I appreciate it!