Question

我只有基本的VBA知识。试图找到一种方法让用户在两个值“内部”或“外部”之间进行选择，然后根据结果运行代码的一部分或另一部分。

实现这一目标的最佳方法是什么？

我已经开始创建一个用户表单，但是如何将值type_trade返回到sub中，然后将其用于if then语句？

Private Sub External_Click()
    Dim type_trade As String
    type_trade = "external" 
End Sub

Private Sub Internal_B2B_Click()
    Dim type_trade As String
    type_trade = "Internal_B2B"
End Sub


Private Sub UserForm_Click()

End Sub

Answer 1

实现这一目标的一种方法如下：

Private type_trade As String

Private Sub External_Click()
   type_trade = "external"
End Sub

Private Sub Internal_B2B_Click()
   type_trade = "Internal_B2B"
End Sub

Private Sub SomeOtherPoint()
   If type_trade = "Internal_B2B" Then
      'do something
   End If
End Sub

VBA userform 2命令按钮+属性值到变量

1 个答案: