使用单元格值填充用户窗体文本框

时间:2019-05-07 16:39:16

标签: excel vba

我有一个简单的用户窗体,我想用一个单元格的值填充文本框。看起来很简单,但是没有填充,我无法弄清楚为什么,有人可以看看我的代码并告诉我我做错了什么吗?我正在尝试用TextBoxCurrentCCBuffer填充Sheets("Closing Costs").Range("D32")

Private Sub CommandButton1_Click()
    TextBoxCurrentCCBuffer.Value = Sheets("Closing Costs").Range("D32").Value
    If TextBoxCCBuffer.Value = "" Then
        Unload Me
        Exit Sub
    Else
        Worksheets("Closing Costs").Range("D32").Value = TextBoxCCBuffer.Value
        Unload Me
    End If
End Sub

1 个答案:

答案 0 :(得分:0)

您可以在用户窗体的初始化事件中填充文本框,而不是在做什么。

Private Sub UserForm_Initialize()
TextBoxCurrentCCBuffer.Value = Sheets("Closing Costs").Range("D32").Value
End Sub