在B列已有图片的链接地址,要在C列显示相应的图片,下面是代码
下面显示的是2-4行,如果一页所有内容都要显示,那么,把4要改成一个变量,ActiveSheet.UsedRange.Rows.Count,取最后一行
Sub 把B列图片链接在C列生成图片()
'以第2-4行为例,设定单位格宽度(图片宽度)
Columns("C:C").ColumnWidth = 36.22
Rows("2:4").RowHeight = 150
'插入图片(假设图都是4:3的,否则还涉及要取得原始尺寸,如果图小,可以直接