Excel VBA |用于更新列表框上选定行的用户窗体

Question

我正在研究一个基本的用户窗体项目，以在我的实际业务数据库中学习和使用它。

a。我创建了两个用户表单；

• UserForm1 =将数据添加到最后一行，在列表框上显示数据并删除一行
• UserForm2 =您可以从UserForm1上打开它（我命名为“ Edit”）

b。我基本上有4列和值的数据；

ID  ||  Name  || Last Name || Date

当您单击列表框上的“编辑”按钮以及要更新数据的行时，它将打开3个文本框，您可以使用它们更改ID，Name和{{ 1}}。此外，还有一个“保存”按钮

我有一个与youtuber一起编写的代码，但他所做的是他仍然将Label保留在ID列中，您无法更改它，仅显示值。

我想做的是不仅要更改Last Name和ID的所有值（Name，Last Name，Name）？ 我尝试并搜索了很多东西，但是我没有做的所有事情。这是我的代码；

UserForm1上的“编辑”按钮的代码

Last Name

在UserForm2上保存按钮代码

Private Sub CommandButton4_Click()
    UserForm2.Label4.Caption = ListBox1.List(ListBox1.ListIndex) ' I wanted to update this data also
    UserForm2.TextBox1.Text = ListBox1.Column(1, ListBox1.ListIndex)
    UserForm2.TextBox2.Text = ListBox1.Column(2, ListBox1.ListIndex)
    UserForm2.Show
End Sub