Hi, Sharonn,

regarding Sheets("Bid Material").Select as well as not pasting the code I think this sheet is within the worksheet which holds the code and that I mixed the workbooks. If you skip the code lines like
wbCode.ActiveSheet.Range("A1").PasteSpecial Paste:=xlPasteValues, _
    Operation:=xlNone, _
    SkipBlanks:=False, _
    Transpose:=False
wbData.Close False
Sheets("Bid Material").Select
it should do fine. As the newly opened workbook will be closed I don´t know if it really is necessary to select the sheet (that sheet would have been the active sheet within the workbook with code).

Ciao,
Holger