Excel VBA选项按钮如何链接到模块?

Excel VBA选项按钮如何链接到模块?,excel,vba,module,options,userform,Excel,Vba,Module,Options,Userform,嗨,我有一个userform,允许您从信息中选择并以特定格式将其粘贴为字符串。我有一个单独的模块,它创建这个字符串,如下所示: Sub Skeleton_Query1() UserForm2.Show strQuery = "SEL " & Chr(10) & strSelectedColumns & Chr(10) & "FROM Database.Table1 A" _ & Chr(13) & "Left Join Database.Ta

嗨,我有一个userform,允许您从信息中选择并以特定格式将其粘贴为字符串。我有一个单独的模块,它创建这个字符串,如下所示:

Sub Skeleton_Query1()

UserForm2.Show

strQuery = "SEL " & Chr(10) & strSelectedColumns & Chr(10) & 
"FROM Database.Table1 A" _
& Chr(13) & "Left Join Database.Table2 B" & Chr(10) _
& "On A = B " & Chr(13)

End Sub
其中strSelectedColumns是来自userform的信息

我基本上想勾选我的选项按钮,如下所示:

Private Sub OptionButton3_Click()
strPeriodicButton = UserForm2.OptionButton3
End Sub
我想在我的模块中添加类似于以下内容的内容,这样,如果我勾选选项框,它将检查是否勾选,并在上面的字符串中添加一个字符串:

If strPeriodicButton = True Then
strPeriodic = strQuery & "Left Join Periodic Table"
Range("B2").Value = strPeriodic

ElseIf strPeriodicButton = False Then
Range("B2").Value = strQuery
供参考:

Public strSelectedColumns As String, srtQuery As String, 
strPeriodicButton As Boolean, strPeriodic As String