Question : Add option before execute macro

Hi Experts,

I need Experts help. How to add a message box in the attached script and request user whether need to proceed or cancel the request? Hope Experts can help me to add this feature.

Sub CombineTT2sDelete()
transferTT2S
DeleteRows
End Sub

Answer : Add option before execute macro

Like so?

                       
             Sub CombineTT2sDelete()

Dim s As String

s = MsgBox("Continue?", vbYesNo)
If s = vbNo Then Exit Sub
transferTT2S
DeleteRows

End Sub

Random Solutions

AS3 tween multiple arrows along a path

This search script is presenting the option for Next 10 when there aren't any results. What do I need to add to not show when there aren't results?

Meta redirect question

classic asp recordset paging

sendAndLoad onHTTPStatus issue

From TQuery to TADOQuery.

JavaScript: Alert when checkbox value changed

Shell script to queue commands

Current Logged In User

Delete blank line from textarea

Question : Add option before execute macro

Hi Experts,I need Experts help. How to add a message box in the attached script and request user whether need to proceed or cancel the request? Hope Experts can help me to add this feature.Sub CombineTT2sDelete()transferTT2SDeleteRowsEnd Sub

Answer : Add option before execute macro

Like so? 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: Sub CombineTT2sDelete() Dim s As String s = MsgBox("Continue?", vbYesNo) If s = vbNo Then Exit Sub transferTT2S DeleteRows End Sub

Hi Experts,

I need Experts help. How to add a message box in the attached script and request user whether need to proceed or cancel the request? Hope Experts can help me to add this feature.

Sub CombineTT2sDelete()
transferTT2S
DeleteRows
End Sub

Like so?

1: 2: 3: 4: 5: 6: 7: 8: 9: 10:

Sub CombineTT2sDelete() Dim s As String s = MsgBox("Continue?", vbYesNo) If s = vbNo Then Exit Sub transferTT2S DeleteRows End Sub