open bestand afsluiten die een variabel naam heetd

[gerenmarly]

Hallo
Ik worstel nog met een vraagstuk
via een vba code open ik een nieuw bestand
maar terwijl hij dit doet moet hij het bestand afsluiten waar deze code instaat
hoe pak ik dit aan

de code voor nieuw bestand is

Sub Update()

'
' Update Macro
'' De macro is opgenomen op 3-11-2009 door Ger en Marly.
'Dim zeker As Variant
zeker = MsgBox("                    Nieuwe order starten?", vbYesNo, "                        bevestiging ")
If zeker = vbNo Then Exit Sub

    Application.ScreenUpdating = False
   Application.DisplayAlerts = False


    ChDir "S:\pad"
    Workbooks.Open Filename:="Pad-.xlsm"

    Windows("Rekenstaat.xlsm").Activate
    ActiveWindow.Close




End Sub

hierbij is Rekenstaat.xlsm het bestand wat nog open staat( dan werkt hij wel)
echter als het bestand een ander naam heeft werk dit niet en krijg ik een foutmelding

wie kan mij hierbij helpen
" Pad" is hierbij de weg naar een netwerklocatie

 

[HSV]

Je bedoelt:
Het bestand sluiten waar de code instaat die een ander werkboek heeft geopend?

Thisworkbook.close

 

[gerenmarly]

Ja Harry dit bedoeld ik

Mijn dank is groot
Groetjes Ger