如何使用 VBA 根据活动工作表中的单元格自动填充 excel 表单？

How to autofill the excel form based on the cell in the active worksheet using VBA?

我创建了一个 Excel 表单，希望表单中的文本框能够由单元格 B2 中的值自动填充。我已经尝试过，但似乎我在 VBA 中的代码对我不起作用。我在下面附上了我的代码。

Private Sub UserForm_Click()

    With UserForm1
        .txtTextBox1.Value = Sheet7.Range("B10").Value
        
    End With


End Sub

使用如下形式的 Initialize 事件。

Private Sub UserForm_Initialize()
    Me.TextBox1 = Sheets("Sheet1").Range("B10") 'Change sheet1 to your sheet name.
End Sub