Answer a msgbox yesno with a macro?

[robfo0]

Hi everyone,

I have a file that has a shutdown after certain amount of time macro. this works fine, but , on the before_close event, i have this code:

msgbox("Save?",vbyesno)

so this question comes up preventing the shutdown from doing its thing (save, and shutdown).

Is there a way to get the shutdown macro to answer vbyes to this question when it pops up?

Thanks

 

[Legacy 98055]

Hi Rob
No offense, maybe I'm dense, but I saw your related post yesterday and along with this post I cannot get the big picture of the flow/logic of your code. It sound like a very simple problem to solve...
Maybe attack from another direction?
Tom

 

[James]

I don't know if this will help you or not:

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Dim Msg As String, Ans As String
If Not Me.Saved Then
Msg = "Do you want to save the changes to"
Msg = Msg & Me.Name & "?"
Ans = MsgBox(Msg, vbQuestion +vbYesNo)

Select Case Ans

Case vbYes
Me.Save

Case vbNo
Me.Saved = True
Exit Sub
End Select
End If
End Sub

James

 

[robfo0]

Qroozn,

I could do what you suggest, but then i the code would still run through the Before_close code, thus creating errors.

TSTom, would you mind taking a look at my workbook? I've been trying quite a few different approaches, then when i solve one thing, another problem arrises


I appreciate the help though guys

 

[Legacy 98055]

Go ahead and send it.
Am at work so I don't have the one youe sent before
Tom