Brad Marks
BradM at blackforestltd.com
Fri Jul 1 13:26:32 CDT 2011
Steve, William, Darryl, Thanks for the help with my questions. The advice that you provided has helped me move forward. Below is a stripped down snippet of the Access 2007 VBA code that I put together based on the advice you provided. I am going to post it here in case some other "newbie" is looking for the very "basic basics" and I am posting it here to see if anyone sees a problem with the direction that I am heading. Thanks again, Brad PS. I also ordered a book on this subject. '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Sub Pull_Data_From_Excel_Into_Access() Dim XLApp As Excel.Application Dim XLWorkbook As Excel.Workbook Dim XLSheet As Excel.Worksheet Dim Str_Value_in_Cell As Variant Set XLApp = CreateObject("Excel.Application") XLApp.Workbooks.Open ("C:\Book1.xlsx") XLApp.Visible = True ''' to see Spreadsheet Set XLWorkbook = XLApp.Workbooks(1) Set XLSheet = XLWorkbook.Sheets(1) Str_Value_in_Cell = XLSheet.Cells(1, 1).Value MsgBox Str_Value_in_Cell End Sub '~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~