Question

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

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

Answer 1

您同时处理两个工作表。我假设您正在谈论2种不同的工作簿，但我写的只是对特定案例的概括（在2个不同的工作表中使用1个工作簿）

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

excel中的用户表单，用于向多个工作表或工作簿添加信息

1 个答案: