vba如何跨sheet页修改excel字体等属性

2024年12月05日 07:14

有4个网友回答

网友（1）：

Range(Cells(1, 1)

前面加工作表名

sheet1.Range(Cells(1, 1)
sheet2.Range(Cells(1, 1)
sheet?.Range(Cells(1, 1)

网友（2）：

With Sheets("差异汇总表(非展开)").Range(Cells(1, 1), Cells(sum + 1, sum + 1))

如果这个错误，又显示1004

可考虑，是不是没有这个 Sheets("差异汇总表(非展开)") 工作表
通常我都直接写成 SHEET4 这样的

网友（3）：

Range()之前加上sheet().

如该表2就SHEET2.RANGE(Cells(1, 1))

网友（4）：

With Sheets("差异汇总表(非展开)").Range(Cells(1, 1), Cells(sum + 1, sum + 1))

试试这个