• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 143
  • Last Modified:

VBA - Excel programming question

Hello,
 
I'm maintaining a project that I didn't originally code.  This code lies in an MSAccess import program that imports data from an Excel spreadsheet.

The spreadsheet was originally laid out without using Named Ranges, but this code appears to do something similar to a named range. Ths spreadsheet has column headers in Row 1 and data starting in Row 2.  The Row 1 value for this column M is "Imperial_Or_Metric".

I can't figure out how the following line knows to gather data and where from??  The real issue is I added named ranges for my additions and I added some data definition info in rows 2-4 and now have import data rows starting in row 5 and my MSAccess import program now dies on this line:


DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "Imp_UofM", Me.txtPath, True, "Unit_Of_Measure!A1:B65000"


Can someone interpret this line of code and how I can make it get along with NameRanges or at minimal make it start at row 5 of my spreadsheet for actual import data?

Thank You,
JMO9966
0
JMO9966
Asked:
JMO9966
1 Solution
 
JohnBPriceCommented:
It is hard coded in the "Unit_Of_Measure!A1:B65000", but it is using the field names from the spreadsheet, (the "true")

If you could move the fieldnames into row 5 instead of row 1, you could simply change "Unit_Of_Measure!A1:B65000" to "Unit_Of_Measure!A5:B65000", however, if you need to keep the field names in row 1, you could change it AND change the "True" to "false", but your resulting table would not get the field names.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Get expert help—faster!

Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now