当您单击绿色单元格时,一个新工作表的新工作表名称与绿色单元格的名称匹配。绿色单元格是父母,“x”代表孩子。所以在新创建的工作表中会有两列。一列包含父母ID,第二列将显示子ID。(下图演示)。做这个的最好方式是什么?
2 回答
1
由于您没有尝试过,我只会为您提供让您开始解决问题所需的基本信息。这需要粘贴在您的数据来源的工作表上
(VBE > Sheet X > Paste code here)
每次双击单元格 ( Target) 时,都会创建一个新工作表。在单击或选择更改时触发此事件太不可预测了。
工作表名称将 =Target单元格中的值工作
表将始终是选项卡选择中最右侧的工作表
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets.Add(After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count))
ws.Name = Target.Value
End Sub
在完成项目时您可能需要考虑的事项:
- 将目标范围限制为您希望它起作用的单元格。要实现这一点,请研究
Intersect方法(或参见#5) - 如果您双击的单元格值的值不符合工作表名称限制,则会出错。研究
Error Handling以解决此问题(或确保您希望将其应用于的每个单元格都有一个符合工作表名称规则的值) - 如果你双击同一个单元格两次,你会得到一个错误(不能有多个同名的工作表)。
Error Handling会在这里帮助你 - 这不会在您的工作表上放置任何数据。在这个网站上复制/粘贴的问题数量非常多。
Offset来自您的Target手机可能会有所帮助。此外,Target.Column如果单元格有x Target如果您真的希望仅在单击“绿色”单元格时触发,则可以对其进行修改以检查单元格格式
于 2018-06-20T21:01:57.213 回答
-1
所以首先,也许我没有得到正确的问题。
只是为了澄清这个问题。你想在第一张表上有某种目录吗?
为此,您需要为此特定工作表或特定范围的事件处理程序。您可以根据所需的结果选择 Worksheet_SelectionChange 或 Worksheet_Change Event。
至于创建新工作表并重命名的例程。您可以使用此参考
于 2018-06-20T20:34:41.640 回答

