EXCEL多个单元格内容如何复制到一个批注里

是直接选中单元格点复制,在批注里就不能粘贴了,没有了粘贴的选项了,只能选中单元格中的数字点复制才行,我想只选中单元格就能够复制

用万能的VBA可以解决。

举例说明。

例如有表格如图:

编制代码,将A、B、C三列的数值写入D列的批注中。代码如下:

Sub 插入批注()

Dim I As Integer

Dim S As String


I = 2

Do While Cells(I, 1) <> ""

S = Cells(I, 1) & Cells(I, 2) & Cells(I, 3)

Cells(I, 4).Select

ActiveCell.AddComment

ActiveCell.Comment.Text Text:=S

I = I + 1

Loop

End Sub

执行代码后如图:

温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-01-09
选择这一列,复制,再选定需要复制列,右键,选择性粘贴,选“批注”
---
补充:
Sub test()
Dim rng As Range
For Each rng In Range("A:A") '按实际需要更改列号
If Not rng.Comment Is Nothing Then rng.Offset(0, 1) = rng.Comment.Text
Next
End Sub
工具-宏-VB编辑器,插入-模块,将下面的程序复制.再执行.
第2个回答  2011-01-09
假定你多个单元格内容分别在A2,B2,C2,D2;
假定批注为E2,则在E2设公式:=A2&B2&C2&D2
但如果需要在不同单元格内容间加逗号,则应写成E2:=A2&","&B2&","&C2&","&D2本回答被提问者采纳
相似回答