Excel bestand afsluiten via VBA

[mulderm]

Hoe kan je in VBA programmeren of een bekend bestand
vb. c:\test.xls geopend is en zoja vervolgens laat sluiten?
Ik wil dit in Access programmeren in een module.

mulderm

 

[Jan van Asseldonk]

Met onderstaande code wordt getracht naar test.xls te gaan. Als dat lukt wordt de sheet gesloten. Lukt het niet dan komt er een melding dat test.xls niet geladen is.

Sub Macro1()
'
On Error GoTo errorcontrole

Windows("test.xls").Activate
ActiveWorkbook.Close

errorcontrole:
If Err.Number = 9 Then
MsgBox ("test.xls is niet geladen")
End If

End Sub

 

[mulderm]

Hallo Jan,

Dit werkt perfect als ik deze code in de module van
de Personal.xls plaatst.
Maar hoe moet ik dit in de module vanuit Access
besturen?

mulderm

 

[Jan van Asseldonk]

met access ben ik weinig bekend.
Maar volgens mij moet dezelfde code ook in Access werken.
Vba starten in access (macros?) en dan de code invoegen in de module. ??
Plaats anders de vraag even in de access sectie.

 

[mulderm]

Bedankt voor de hulp Jan.

mulderm