Run-time Error '1004'

[Maverick]

I'm new to this, but I have received so much great information here, I had to join. Here is a problem am encountering with the following code in MS Access:


objSht.Activate
objSht.Range("A25:H44").Select
objSht.Range("A25:H44").Sort Key1:=Range("A25"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNumbers

Everything works fine up to this point and the strange thing is the above code also works the first time I run it, but for subsequent runs I get

"Run-time Error '1004'"
"Method 'Range' of object '_Global' failed"

Do I need to reset something at the end of my code?

Thanks for the help.

[PEB]

Hi,

Usually when you invokes Excel from Access u create an object... When u finish using this object you need to set it to nothing

like:

Set ExcelSheet = Nothing
 

Where ExcelSheet is the name of the created Excel object

:)

[Maverick]

Thank you. Works beautifully. Would it be possible to now do a "Save As" to the file I just created and pass the new filename with a variable? Thank you so much for your help.

[PEB]

I'm sure that there is a command for this...

Wait...

I'm watching...

 
ExcelSheet.SaveAs "C:\TEST.XLS"
 
 

:)