我正在创建一个vba用户窗体，该窗体完成后，带有窗体详细信息的字符串变量将粘贴到工作簿的另一张表中。

在用户单击addBtn之后，我想将值dStr粘贴到新表中。希望对此有所帮助。我在其他地方读过，您可以将变量设置为public，但也不确定如何做到这一点。

Sub UserForm_Initialize()

Dim valueUSD,name,ric,pStr,sitchStr As String
Dim i,lRow As Long

i = 2
ric = Worksheets("Tester").Range("H" & i)
name = Worksheets("Tester").Range("B" & i)
valueUSD = Worksheets("Tester").Range("C" & i)
sitchStr = ""
dStr = ""

pStr = ric & "   " & name & "   " & valueUSD & "   "

Label1.Caption = pStr

TextBox2.Value = ""

If activeCheck.Value = True Then
    sitchStr = sitchStr + activeCheck.Caption
ElseIf itwCheck.Value = True Then
    sitchStr = sitchStr + itwCheck.Caption
Else
    sitchStr = ""
End If

dStr = pStr & vbNewLine & sitchStr & "," & TextBox2.Value

End Sub

Sub addBtn_Click()

Application.ScreenUpdating = False
Dim copySheet As Worksheet
Dim pasteSheet As Worksheet
Dim myData As DataObject

Dim lastRow As Long


End Sub