excel 粘贴时怎么避开隐藏的单元格？

2024-11-12 18:26:22

推荐回答（5个）

回答1：

Excel 粘贴时避开隐藏单元格的方法：

1、以Excel 2016为例，假设需将下图的数据复制粘贴到另一个表格中，其中4-6行已被隐藏。

2、按Ctrl+A选中需复制的单元格区域，然后按Alt+；选择可见单元格，然后单击右键，选择“复制”。

3、打开另一张表格，单击右键，粘贴即可。如图可见，粘贴的数据避开了隐藏的行。

回答2：

Excel 粘贴时无法避开隐藏的单元格，必须是连续的单元格。

　　有时在筛选后需要将其他区域中的连续行数据复制粘贴到筛选区域，以替换筛选后的数据。由于筛选后的区域包含隐藏行，因而无法直接进行复制粘贴，否则部分数据会粘贴到隐藏行中。

方法一：使用辅助列

　　这个方法是用排序法把需要替换的数据放在一起再进行复制粘贴。即先添加一个“序号”辅助列，在其中输入数字序号，再用另一个辅助列对筛选后的数据进行标记，按第二个辅助列排序，再复制粘贴，最后对“序号”列排序还原原数据的排列顺序。具体步骤如下：

先取消筛选或隐藏，使用辅助列，如C1、C2单元格分别输入数字“1”，“2”，选择这两个单元格后双击填充柄，将序号填充到C列。
再次筛选原来的数据。
在D列第二行的单元格中输入公式：
=ROW()
然后向下填充公式到D列的所有可见单元格。
取消筛选，按D列排序。
对标记列排序把要粘贴的数据排在一起
复制数据粘贴到相应的区域。
重新按辅助列C列序号列排序，还原原数据的排列顺序。

方法二：VBA代码
按Alt+F11打开VBA编辑器，在代码窗口中输入下列代码并运行即可。
Sub 粘贴时跳过隐藏行()
Dim Rng As Range
Set Rng = Range("B2:B20").SpecialCells(xlCellTypeVisible)
For Each cell In Rng
Worksheets("Sheet2").Cells(i + 1, 2).Copy
ActiveSheet.Paste Destination:=cell
Application.CutCopyMode = False
i = i + 1
If i = 7 Then End
Next
End Sub

回答3：

Excel 粘贴时无法避开隐藏的单元格，必须是连续的单元格。

　　有时在筛选后需要将其他区域中的连续行数据复制粘贴到筛选区域，以替换筛选后的数据。由于筛选后的区域包含隐藏行，因而无法直接进行复制粘贴，否则部分数据会粘贴到隐藏行中。

方法一：使用辅助列

　　这个方法是用排序法把需要替换的数据放在一起再进行复制粘贴。即先添加一个“序号”辅助列，在其中输入数字序号，再用另一个辅助列对筛选后的数据进行标记，按第二个辅助列排序，再复制粘贴，最后对“序号”列排序还原原数据的排列顺序。具体步骤如下：

先取消筛选或隐藏，使用辅助列，如C1、C2单元格分别输入数字“1”，“2”，选择这两个单元格后双击填充柄，将序号填充到C列。
再次筛选原来的数据。

在D列第二行的单元格中输入公式：

=ROW()

然后向下填充公式到D列的所有可见单元格。
取消筛选，按D列排序。

对标记列排序把要粘贴的数据排在一起
复制数据粘贴到相应的区域。
重新按辅助列C列序号列排序，还原原数据的排列顺序。

方法二：VBA代码

按Alt+F11打开VBA编辑器，在代码窗口中输入下列代码并运行即可。

Sub 粘贴时跳过隐藏行()
Dim Rng As Range
Set Rng = Range("B2:B20").SpecialCells(xlCellTypeVisible)
For Each cell In Rng
Worksheets("Sheet2").Cells(i + 1, 2).Copy
ActiveSheet.Paste Destination:=cell
Application.CutCopyMode = False
i = i + 1
If i = 7 Then End
Next
End Sub

回答4：

EXCEL要粘贴的目标区域必须是连续的，所以直接粘贴没法实现。

可以这样：
1、目标区域先取消隐藏，并设一辅助列，输入序号1、2、3.。。，用于记录原顺序
2、再进行筛选隐藏，将可见行剪切到新表
3、在新表里进行原来的复制粘贴
4、粘贴后的结果复制到原表
5、将原表按辅助列序号排序，即可

回答5：

先定位，然后复制，如图