首页 > 解决方案 > VBA,Excel。执行偏移和调整范围大小然后复制它的代码。“编译错误:无效的监视表达式”

问题描述

我正在尝试偏移、调整大小和复制包含数据的范围,并在即时窗口中键入这行代码:

shAll.Range("A1:I78").Offset(1).Resize(.Rows.Count - 1, .Columns.Count - 
1).SpecialCells(xlCellTypeVisible).copy

当我按下回车键时,我收到此错误:“编译错误:无效的手表表达式”

是语法问题吗?

这部分代码在即时窗口中执行时工作正常:

shAll.Range("A1:I78").Offset(1).select

它正在以我想要的方式抵消。剩下的部分是调整大小并复制它。

顺便说一句,该范围shAll.Range("A1:I78")包含所有单元格中的数据。

提前致谢!

标签: excelvbacompiler-errorswatch

解决方案


您可以做一个名称范围或放置您需要的实际范围。

Worksheets("Sheet").Range("namedrange_d").Resize(, 4).Offset(6, 0).Copy _
  Worksheets("Sheet1").Range("namedrange").Resize(, 4).Offset(6, 0)

推荐阅读