问题已经解决,用传参数的方式
在有窗体的excel 中调用
Application.Run "另一个表名.xlsm!模块1.sub过程名", TextBox1.text
将窗体文本框的值TextBox1.text传递给另一个excel表的sub过程中。
相反的,可以在无窗体文本框的excel中调用
Application.Run "有窗体表名.xlsm!模块1.sub过程名", “显示在窗体文本框中”
这里的sub
Sub sums(str As String)
UserForm1.TextBox1.text = str
DoEvents
End Sub
实际运用:在一个窗体运行多个vbaproject工程时,可以在窗体中返回程序进程(正在运行哪一个工程或过程)。