Vba excel中的用户窗体,用于向多个工作表或工作簿添加信息

Vba excel中的用户窗体,用于向多个工作表或工作簿添加信息,vba,excel,userform,worksheet,Vba,Excel,Userform,Worksheet,是否可以使用一个用户表单将完全相同的信息输入到两个工作表中 我正在尝试输入不同颜色的车票号码。我还想包括昨天的日期和处理该票号的工作人员姓名以及该票号所处的阶段。全部来自一个用户表单。我可以在一个工作表中输入,但如何确保它同时将这些信息输入到两个工作表中 您可以在两张工作表上都填写地址。我假设你说的是两本不同的工作簿,但我写的只是一个特定案例的概括,在这个案例中,你在两张不同的工作表上使用一本工作簿 Dim WsOne As Worksheet Dim WsTwo As Worksheet S

是否可以使用一个用户表单将完全相同的信息输入到两个工作表中


我正在尝试输入不同颜色的车票号码。我还想包括昨天的日期和处理该票号的工作人员姓名以及该票号所处的阶段。全部来自一个用户表单。我可以在一个工作表中输入,但如何确保它同时将这些信息输入到两个工作表中

您可以在两张工作表上都填写地址。我假设你说的是两本不同的工作簿,但我写的只是一个特定案例的概括,在这个案例中,你在两张不同的工作表上使用一本工作簿

Dim WsOne As Worksheet
Dim WsTwo As Worksheet

Set WsOne = Workbooks("DesiredWorkbookNameHere").Worksheets("DesiredWorksheetNameHere")
Set WsTwo = Workbooks("DesiredWorkbookNameHere").Worksheets("DesiredWorksheetNameHere")
然后,当您使用UserForm执行操作时,您可以命令它对这两个表单执行操作。例如:

WsOne.Range("A1") = Me.TextBox1
WsTwo.Range("A1") = Me.TextBox1