在 excel 中复制粘贴后隐藏的行未隐藏

Question

我正在将 excel 工作簿的内容复制到另一个 workbook.My sheet 有一些隐藏行，这些行也必须隐藏在目标工作簿中。 我正在使用以下代码行来复制数据：

'Set rngCopyRange = wbSource.ActiveSheet.Cells
rngCopyRange.Copy

这在 Win 10 64 位、Office 2013 64 位或 Office 2016 32 位组合中运行良好 但在 windows 10 64b 、Office 2010 32b 或 2013 32b 组合中，隐藏的行不会被隐藏。 这是 excel 版本的问题吗？谁能帮我解决这个问题？

Answer 1

In 99%* of the cases where people hide rows and then copy and paste them to another location they don't actually need the hidden rows to exist in the destination

...所以我正在尝试并提供这个作为解决方案：

rngCopyRange.SpecialCells(xlCellTypeVisible).Copy

_{*像所有好的统计数据一样，这是我编的}

Answer 2

真奇怪。我正在使用 2013（64 位），如果我使用您的代码，我不会将每行的隐藏 属性 复制到目标。

我认为您遇到的问题是您正在复制的范围并未延伸到所有列，因此设置行高（即所有列）将是 counter-intuitive .

如果您将 .EntireRow 添加到您的复制范围，行高会出现：

Set rngCopyRange = wbSource.ActiveSheet.UsedRange.EntireRow

Answer 3

这只是一个推测，但如果您使用的是 wbSource.ActiveSheet.Cells，您是否复制了该工作表中的 所有 单元格，包括 隐藏个？也许 Office 版本的逻辑有点不同，尽管我对 VBA.

还是个新手