Access to Excel export assistance

jfgambit

Kinetic Card Dealer
Local time
Today, 00:06
Joined
Jul 18, 2002
Messages
798
I have an Access 2000 Db that exports information out to an Excel Doc for analysis by individuals in another department. These individuals are not Access savvy and need it to be in Excel. They open the document make changes and save it. Upon request they tell me to add additional information to the excel sheet. I need to add the data (sometimes it's one line, but usually it's multiple) from a query without over writing the existing data in the excel sheet.

Opening the Excel doc is not a problem, what I'm looking for is some code that finds the first blank cell in A:x (x being the line row number) and drops the results of my query (there are 10 columns in the query) to the excel doc. Closing and saving the doc is not a problem...just the stubborn "Find the next empty cell.

Thanks in advance.
 
Code:
Dim AcRow as Integer

AcRow = 1 'Which row to start looking in
AcCol = 1 'Which Column to check whether its empty or not

While Not Cells(AcRow, AcCol).Value = ""
AcRow = AcRow + 1
Wend

'AcRow will have the row number with the first empy cell
 
Perfect! Thank you!
 
hah, your very welcome, always nice to hear a reply.
 

Users who are viewing this thread

Back
Top Bottom