Question

请通过此链接下载我的问题文件 - https://drive.google.com/file/d/0B2n3BIKH9iL5bFhiNjZid3YzLVE/edit?usp=sharing

问题是当我点击副本时，只复制26行，我的数据显示为38行。我无法找到为什么会出现这种问题

Sub CopyPaste()

Sheets("List").Range("AG3:AG" & Sheets("List").Range("A65536").End(xlShiftUp).Row).SpecialCells(xlCellTypeVisible).Copy
Sheets("List").Range("J3").PasteSpecial xlPasteValuesAndNumberFormats

Application.CutCopyMode = False

End Sub

Answer 1

从

更改副本

Sheets("List").Range("AG3:AG" & Sheets("List").Range("A65536").End(xlShiftUp).Row).SpecialCells(xlCellTypeVisible).Copy

到

Sheets("List").Range("AG3:AG" & Sheets("List").Range("AG65536").End(xlShiftUp).Row).SpecialCells(xlCellTypeFormulas, xlNumbers).Copy

修改 1-将A65536更改为AG65536。检查错误的列，除非是故意的。因此，它总是返回26行。 2-更改SpecialCells条件以在AG公式中查找数字。

我的复制代码不会复制整个行值

1 个答案: