Question : Populate missing values in specific Excel worksheet and import into Access

I have multiple workbooks each containing multiple worksheets but I only need information from a specific  worksheet named "Index".  I need to import this information from this worksheet into MSAccess.   The database table (tblIndex)  contains the following fields.

Field1:  Workbook
Field2:  Worksheet
Field3:  Category
Field4:  Comments

My problem is the formating of the worksheet which is consistant for all workbooks.  Cell B4 begins the input for field names into Access.  Values in the column for Category (B4)  are only listed once per type leaving blank spaces in the Category column until a new category type is used.  The first Worksheet Name is also blank.

For example:

B4 = CATEGORY
C4 = WORKSHEET NAME
D4 = COMMENTS

CATEGORY                                    WORKSHEET NAME (cell C4)                          
Piping Specification Rules      
                                        MaterialsData
                                        DefaultProjectOptions
                                       AllowablePipingMaterialsClass
Piping Materials Class Rules      
                                       Service Limits
                                       Pipe Nominal Diameters
                                       Pipe Branch


The Workbook name isn't liste in the spreadsheet and would need to somehow included in the import.  I'm not sure this is very clear and I would be happy to forward an example of the worksheet.  

Answer : Populate missing values in specific Excel worksheet and import into Access

sorry

            Set shtName = .Worksheets("Index")
 
               shtName.select       'add this line