Bestand raakt focus kwijt na opnen ander bestand

[laforge2]

Hallo,

Ik probeer vanuit VBA een bestand te open.
Dat gaat goed.
Echter het geopende bestand wordt het actieve bestand en de script loopt daarna niet verder.
Ik gebruik al ThisWorkbook.Activate, maar dat helpt niet.
Het padnaam, en bestand heb ik even fictief gemaakt.
FileLocked controleert of het bestand al geopend is
Hoe kan ik ervoor zorgen dat het script wel doorloopt?

Een stukje script:
padnaam = "c:\temp\"
bestand = "bestand.xlsx"
padbestand = padnaam + bestand
If Dir(padbestand) <> "" Then
If IsFileLocked(padbestand) Then
MsgBox "Bestand is al geopend: " & bestand
Else
Workbooks.Open padbestand
ThisWorkbook.Activate
Workbooks(bestand).Close SaveChanges:=False
End If
Else
MsgBox "Bestand bestaat niet: " & bestand & ". Import gaat wel verder."
End If



Alvast bedankt voor het meedenken.

 

[snb]

Zolang het bestand waarin een macro staat geopend is, loopt de macro door tot het einde van de macro.