vba 怎么结束运行中的进程

－－－－－－游卖虚－－－－－－－－－－－－－－－

Public x As String　'申明一个神燃公共变量

Sub A()

End Sub

---------------------------------

Private Sub CommandButton1_Click()'  窗体1控件程序代码

'

'你的过程

'

Dim m%

UserForm2.Show

'

'

If x = "CommandButton2" Then

MsgBox x

Exit Sub

End If

If x = "CommandButton1" Then

MsgBox x

End If

'你的过程'

'

End Sub

－－－－－－－－－－－－－－－－

Private Sub CommandButton1_Click()‘’窗体1控件代码

Unload Me

End Sub

Private Sub CommandButton2_Click()

Unload Me

End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

x = Me.ActiveControl.Name

End Sub

－－－－－－－－－－－－－－－－－－配颤

on error GOTO A

A:msgbox()

在调用的帆帆穗前面on error GOTO A

在SUB结束前面

A:msgbox()‘提示

end'结束轿烂程序

end sub

＝＝＝＝＝＝＝＝＝＝＝＝＝＝态卜＝＝＝

你直接吧A放到你程序的结束地方不就好了

如果VBA里面有多个过程，相互之间没有 什么关系，想执行哪个过程可以选择。光标在哪个过程就开始执行哪个过程。

但是开始语句没办法指定，不猛侍可能在一个过程中前面的语句不执行，从中间某亩知神个语句开始执行。但是可以加上断点，程序运行到某一句暂停。

调试可以“逐迅亏语句”（按F8），一句一句地执行。随时点击点击菜单上的终止，结束调试

---