☰

Excel：将单元格内容移动到某个单元格中的注释

tag-icon • tag-icon microsoft-excel microsoft-excel-2010
Excel：将单元格内容移动到某个单元格中的注释

我需要将单元格中的文本内容转换为另一个单元格（左侧单元格）中的注释。我看到这个帖子，并且代码运行正常，但它将注释放在与文本内容相同的单元格中。

示例：我需要 B 列中的文本作为 A 列的注释。

答案1

选择包含数据的单元格（在你的情况下是 B 列中的单元格）

并运行这个简短的宏：

Sub CommentMaker()
   Dim r As Range, v As String
   For Each r In Selection
      If r.Column <> 1 Then
         If r.Text <> "" Then
         v = r.Text
         With r.Offset(0, -1)
            .ClearComments
            .AddComment
            .Comment.Visible = False
            .Comment.Text Text:=v
         End With
         End If
      End If
   Next r
End Sub

笔记： 这不会删除原始数据！

相关内容