You can copy paste the following procedure in the worksheet. In the VBA
editor (VBA project) double click the relevant sheet and paste the module
below.
'
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1")).Rows.Count = 1 Th
The attached file demonstrates what you describe. I created a directory
C:\FactSheets containing ten Workbooks FactSheet 1 - FactSheet 10 as test
data. OpenFile contains a comboBox that allows you to open one or more of
the FactSheets. The code for the comboBox is as follows:
Private Sub ComboBox