如何Excel中将批注转成单元格
如何Excel中将批注转成单元格如:A1单元格中的批注转成B2单元格的数值要批量转换把A1单元格的批注转入A1单元格内,并删除A1的批注:SubMacro1()[A1]=...
如何Excel中将批注转成单元格
如:A1单元格中的批注转成B2单元格的数值
要批量转换
把A1单元格的批注转入A1单元格内,并删除A1的批注:
Sub Macro1()
[A1] = Range("A1").Comment.Text
[A1].ClearComments
End Sub
补充:
点"工具"->"宏"->"录制新宏"->"开始",点"停止"按钮.
点"工具"->"宏",找到你刚才录制的宏,点"编辑",将你录制的宏的内容换成上面的代码.退出.
点"工具"->"宏",找到你刚才录制的宏,点"执行".
或者添加一个按钮,将按钮指定到该宏.
我在百度看到的这个宏就可以,但只能单个转,我想要批量转的
有满意答案再加分 展开
如:A1单元格中的批注转成B2单元格的数值
要批量转换
把A1单元格的批注转入A1单元格内,并删除A1的批注:
Sub Macro1()
[A1] = Range("A1").Comment.Text
[A1].ClearComments
End Sub
补充:
点"工具"->"宏"->"录制新宏"->"开始",点"停止"按钮.
点"工具"->"宏",找到你刚才录制的宏,点"编辑",将你录制的宏的内容换成上面的代码.退出.
点"工具"->"宏",找到你刚才录制的宏,点"执行".
或者添加一个按钮,将按钮指定到该宏.
我在百度看到的这个宏就可以,但只能单个转,我想要批量转的
有满意答案再加分 展开
展开全部
Sub test()
For Each c In ActiveSheet.Comments
With c
.Parent.Value = .Text
'.Delete
End With
Next
End Sub
将当前工作表中所有批注的内容写入批注所在单元格。
For Each c In ActiveSheet.Comments
With c
.Parent.Value = .Text
'.Delete
End With
Next
End Sub
将当前工作表中所有批注的内容写入批注所在单元格。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
批注的内容并不是数据,怎么转成数据呢?
就像钱包里放了500元钱(相当于单元格中的数据)、和一张说明这笔钱用途的纸条(相当于批注),你说怎么把这张纸条转成人民币呢?
就像钱包里放了500元钱(相当于单元格中的数据)、和一张说明这笔钱用途的纸条(相当于批注),你说怎么把这张纸条转成人民币呢?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Sub Macro1()
On Error Resume Next
For i = 1 To 10
Cells(i, 1) = Cells(i, 1).Comment.Text
Cells(i, 1).ClearComments
Next i
End Sub
On Error Resume Next
For i = 1 To 10
Cells(i, 1) = Cells(i, 1).Comment.Text
Cells(i, 1).ClearComments
Next i
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询