slå skærm opdatering fra ?

må vi se koden du bruger

jeg gør sådan her, jeg ved ikke om det er det smarteste, men det virker ;o)

Dim xls As New Excel.Application
xls.Visible = True
xls.Workbooks.Open Filename:="D:\testdata.xls"
SendKeys "(^p)"
SendKeys "{ENTER}"
SendKeys "%{F4}, true"

xls.Visible = False

prøv det

bare fjern sætningen:

xls.Visible = True

rpedersen?

Sorry, jeg har prøvet lidt af hvært men har ikke fået det til at virke :-( jeg bliver nok nødt til, lige nu, at leve med at man kan se excel blive åbnet og lukket igen.

er der andre måder at udskrive en excel fil fra access, end med sendkeys.
Jeg har nemlig også det problem at på en maskine med access på dansk, gør den nogle gange det at istedet for at printe siden, så sætter den et p ind i en celle i regnearket ??? kan det være fordi ctrl+p (^p) bliver opfattet anderledes på en dansk version ?

klart...du kan bruge:

Xls.ActiveWindow.SelectedSheets.PrintOut Copies:=1

Mange tak, jeg lukker spørgsmålet nu. Så må vi se om jeg finder ud af noget senere.

takker :o)

Jeg kan nu ikke forstå, at dette ikke virker:

Dim xls As New Excel.Application
xls.Workbooks.Open Filename:="D:\testdata.xls"
Xls.ActiveWindow.SelectedSheets.PrintOut Copies:=1

husk forøvrigt

Xls.Quit

Hej igen

nu er jeg lidt forviret, for nu virker det ;-) jeg får ikke vist excel og printet kommer fint ud. Det eneste der nu mangler er at når jeg bruger xls.quit istedet for SendKeys "%{F4}, true" så kommer den og spørger om jeg vil gemme ?

har du også en løsning på det ?

jeg kan ikke huske det præcist, men kan du ikke skrive en parameter efter Quit?

f.eks:

Xls.Quit vbsaveall

Jeg har fundet ud af at hvis jeg saver inden jeg lukker så er det ok.

det gør jeg med denne komando


    For Each w In xls.Workbooks
    w.Save
    Next w

    xls.Quit

uden at gemme, nb. ikke testet

Dim xls As New Excel.Application
xls.Workbooks.Open Filename:="D:\testdata.xls"
Xls.ActiveWindow.SelectedSheets.PrintOut Copies:=1
Xls..Saved = True
xls.Quit

Xls.Saved = True

et punktum for meget ;-))

interessant - den kendte jeg ikke :o)