openen bestand + afsluiten oude workbook

[dezilk]

Hey allen,

Ik wil graag een macro (verbonden aan een knop) maken die een bestandje opent en daarna het oude workbook afsluit (zonder te saven)

Een bestand openen lukt al met de code:

Sub openen_bel()
Workbooks.Open Filename:="W:\excel\bel.xls"
End Sub

Maar om het huidige workbook (waar de knop op staat) te sluiten lukt niet.

Iemand een idee?

 

[Roncancio]

Sub openen_bel()
Workbooks.Open Filename:="W:\excel\bel.xls"
ThisWorkbook.Close savechanges:=False
End Sub

Met vriendelijke groet,


Roncancio

 

[snb]

Als de macro zich niet in het actieve werkboek bevindt:

Sub openen_bel()
  Activeworkbook.close false
  Workbooks.Open "W:\excel\bel.xls"
End Sub

 

[dezilk]

gelukt!

Het is gelukt.

Bedankt allemaal!

Wim