Reopen workbook

  • Thread starter Thread starter Weeepie
  • Start date Start date
W

Weeepie

Hello,

I want to reopen a workbook trough VBA without saving.

But when I close then I lose my code and it does'nt continue.

I've tried this

Dim Pad As String
Pad = ActiveWorkbook.Path
ActiveWorkbook.Close SaveChanges:=False
Workbooks.Open Pad


Thx for helping me out

Weeepie
 
Weeepie,

Use FullName, not Path:

Dim Pad As String
Pad = ActiveWorkbook.FullName
ActiveWorkbook.Close SaveChanges:=False
Workbooks.Open Pad

As long as the activeworkbook is not the book with the code, that should
work well.

HTH,
Bernie
MS Excel MVP
 
That's the problem, it should reopen the same workbook.

Isn't it possible to use a bypass. Like creating a new workbook to so I can
close en reopen from that one?

Weeepie
 
Maybe you can use application.ontime to run a do-nothing macro. As long as
excel is open (not necessarily your workbook), excel will reopen a workbook to
run that macro.

Option Explicit
Sub testme()

Application.OnTime Now + TimeSerial(0, 0, 1), _
"'" & ThisWorkbook.Name & "'!DummyMac"

ThisWorkbook.Close savechanges:=False

End Sub
Sub DummyMac()
'uncomment this line for testing???
'MsgBox "hi"
End Sub

Depending on your security settings, you may get prompted to allow macros to
open.

You may want to take a look at Chip Pearson's notes:
http://www.cpearson.com/excel/OnTime.aspx
 
This is working.

But each time I restart the tool I get this message
"The macro ,path and name!DummyMac, can' be executed. The macro is not
available etc...."

But the other macros or working .

Is it possible to disable this message

I've tried displayalerts = false but it returns anyway.

Weeepie
 
Did you add the macro named dummymac to your workbook's project?

It would be the simplest solution.

And make sure that that macro is in a General module--not under ThisWorkbook or
behind a worksheet.
 
Hi Dave,

I replaced dummymac to a module.

Now it's working perfect.

Thank you verymuch for your support.

Weeepie
 
Back
Top