2007版本excel表格中,启用宏后,批量给单元格加“批注图片”的编码。

2025-03-26 02:16:33
推荐回答(2个)
回答1:

你好,这个过程是正确的;
我详细给你说明下:
Sub 添加图片批注()
Dim 单元格
On Error Resume Next
For Each 单元格 In Selection
单元格.AddComment "你们好"
'单元格.Comment.Shape.Fill.UserPicture "c:\1.png"
'单元格.Comment.Shape.Height = 120
'单元格.Comment.Shape.Width = 200
Next 单元格
End Sub
--------------------------------------------
这三行是添加批注图片的,楼主在C盘下放一张JPG的图片,小一点
'单元格.Comment.Shape.Fill.UserPicture "c:\1.JPG"
'单元格.Comment.Shape.Height = 120
'单元格.Comment.Shape.Width = 200

(单引号是注释,这个懂?)
--------------------------------------------

或直接运行我最上面的代码也行;记得先选中一些单元格区域;

回答2:

不知道你这个代码是不是完整的,首先“F:产品图”就是错的,应该是“F:\产品图”,而且建议变量及名称尽量使用英文,excel不是中国人开发的,难说有什么问题。