为每个转到评论创建一个新选项卡

-1

我有一个包含大量信息的电子表格。信息的每个部分都有一个评论，允许我们使用goto函数（F5）找到它。为每个转到评论创建一个新选项卡

我想做一个vba脚本/宏，循环所有的评论，并把相关的数据放入每个评论部分的新标签。

我已搜索并找不到关于如何做到这一点的任何信息。如果任何人都可以提供这样的链接，我会很感激。

2014-09-05 user3101337

请尝试在编写这些代码和共享试图在这里。我认为，你会发现社区对你的努力做出了回应。 – 2014-09-05 19:37:05

我不知道从哪里开始，我不需要有人来编写代码，只需链接一些信息将不胜感激。 – user3101337 2014-09-06 01:00:41

寻找“excel VBA loop through cells”和“excel VBA cell comments”的想法。您首先需要做的是循环遍历单元格，然后评估搜索项的注释。一旦在搜索字词中有评论，您可以执行搜索。如果你之前从未做过VBA，这有点复杂。如果您是VBA的新手，我会建议您搜索如何记录宏。这是一个很好的起点。 – 2014-09-06 20:41:19

谢谢n8的提示。我得到的东西的工作，那就是：

Dim sheetName As String

SHEETNAME = ActiveSheet.Name

Dim nName As Name 

For Each nName In Names 
    If InStr(1, nName.RefersTo, sheetName) > 0 Then 
     Application.Goto Reference:=nName.Name 
     Selection.Copy 
     Sheets.Add After:=Sheets(Sheets.Count) 
     ActiveSheet.Name = nName.Name 
     ActiveSheet.Paste 
    End If 
Next nName

来源

2014-09-08 18:30:16 user3101337

为每个转到评论创建一个新选项卡

回答

相关问题