Hej!
Jag har som du kanske sett i tidigare inlägg installerat access2000 nyligen.
Många av dina kodexempel du hjälpt mig och andra med fungerar kalas i access97 men inte i access2000.
Misstänker att det kan ha med referenser att göra?

Vilka referenser har du installerat? Om du vid tillfälle kunde ange dessa så skulle det troligen hjälpa mig en hel del!

Ex på kod som funkar i MIN access 97 men inte i MIN 2000:

Dim App As Excel.Application
Dim book As Excel.Workbook
Dim Sheet As Excel.Worksheet


Set App = New Excel.Application
Set book = App.Workbooks.Add("C:\mall.xlt")
Set Sheet = book.Worksheets(1)

Sheet.Range("A7").Value = 1
Sheet.Range("C10").Value = 2

book.Close True, "C:\Test.xls"

App.Quit

Den känner inte igen vad detta är för något alls!!

en annan sak som inte heller fungerar i min installation av 2000 är :

Set QueryObject = db.CreateQueryDef("MyQuery", strsql)

Lägg till referensen "Microsoft Excel"

Finns en mindre bugg i Access2000. Den saknar referenser till DAO. Lägg till referens till "Microsoft DAO 3.6"

Tack snälla Andreas!
Du har just löst min frustration om varför ingenting fungerar som det gjorde i min access97!!

Ang din lösning som du gav mig för att flytta över data från access till excel, den funkar utmärkt!
En fråga bara, vet du om man kan få excelfilen att verkligen öppna sig och att excel blir aktivt så att användaren ser på en gång hur deras offert blev (det är en offert som ska skrivas i excel)?
Som det är nu får man ju spara men sen får man öppna excel och öppna upp filen, går det att lösa smidigare?`

Tack för hjälpen med referenserna!

Skippa:
<code>
book.Close True, "C:\Test.xls"

App.Quit
</code>
Och skriv:
<code>
App.Visible = True
</code>