Excel 2013 VBA: Setting activeworkbook when clicking between workbooks

Question

I have a workbook with a userform that contains a listbox that is used to populate data on a sheet.

If I have multiple workbooks open and I click from one workbook directly to the listbox on the userform in the other workbook, the ListBox_Change event fires before Activeworkbook changes to reflect the workbook that contains the userform. So when the code reaches Set EqDataSht = ActiveWorkbook.Worksheets("Equipment-Data") I get a subscript out of range error because the workbook I'm coming from doesn't contain a sheet named "Equipment-Data".

What is the best way to set the ActiveWorkbook to the parent of the userform? Thoughts I've had are setting a public variable wb = ActiveWorkbook on workbook_open or just trapping Err.Number=9 and telling the user to click on the sheet before clicking the userform. I'm sure there is something simple I am completely overlooking (VBA amateur).

Thoughts?

Answer 1

Instead of activeworkbook use thisworkbook which returns the workbook in which the code resides.

To make it active thisworkbook.activate should work