Search results

Private Sub Command17_Click() 'On Error GoTo Err_Handler Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Dim objXL As Excel.Application Dim objXLWrkBk As Excel.Workbook Dim objXLWrkSht As Excel.Worksheet Dim lngStartRange As Long strSQL = "SELECT * FROM qryMain" Set db =...

here is what I changed lngStartRange = 5 'start at row 5 Set objXL = CreateObject("Excel.Application") Set objXLWrkBk = objXL.Workbooks.Open("M:\Book Keeping\Matt Majewski Procedures\Ferris Lockbox\Ferris Ind.xls") Set objXLWrkSht = objXLWrkBk.Worksheets("Sheet1") 'takes the name of the tab in...

two parameter error

ok ill try

The thing is it's not even getting that far down in teh code. It is still looking for the 2 parameters

I tried them before. Same problem.

thanks, Ill take a look

how can such a seemingly easy thing turn into such a pain? I have read a few articles on this and some have used Set rs = db.QueryDefs("qryMain") Would this help me or is this not what im looking for?

Actually...I commented out the errror handling and now it pinpoints the error line to Set rs = db.OpenRecordset(strSQL)

I put it all in a command button. I click and get the error 3061 "Too few parameteres. Expected 2" It doesnt open the debugger so I dont know where the error is. I added the reference to Excel 8.0 Can this code go anywhere because I tried putting it in a module and got outside call. You...

I tried it and I got a User Defined Type not Defined error on Dim objXL As Excel.Application Where should I put this code?

Thanks sooo mcuh. I dont think I will be able to try it out today. Just got a bunch of work to do and have to leave in a half hour. Thanks Again!

They are the fields. they may be named a little differently. But im not too attached to the names. What ever is easier.

the file is already created just as you see it, except all the customer info is wiped out daily. I am currently working on a database that will store this long term. But I just want Access to open the file and spit the data into the Excel spreadsheet and put them in the correct rows. Thanks

that code is beyond me. How would I get the rptMain into the excell file without ruing the formatting?

how do you create this macro? Or any other ideas?

well I be jiggered! I was doing that all along and didnt realize it. I was just adding a step. Thanks guys!

Just to get it to run.

hey! you could probably answer this. When I want to run a query I use the following code and then open the subsequent report. Private Sub Command4_Click() If StartDate > EndDate Then MsgBox "Start date can not be after end date" Else DoCmd.OpenQuery "qryMain"...

working on a new database now. Mostly taking pieces from old databases that I have made. Slow but steady. Gives me something to do aroundhere