作者：乔山办公网日期：
返回目录：excel表格制作
有时在筛选后需要将其他区域中的连续行数据复制粘贴到筛选区域，以替换筛选后的数据。由于筛选后的区域包含隐藏行，因而无法直接进行复制粘贴，否则部分数据会粘贴到隐藏行中。
有时在筛选后需要将其他区域中的连续行数据复制粘贴到筛选区域，以替换筛选后的数据。由于筛选后的区域包含隐藏行，因而无法直接进行复制粘贴，否则部分数据会粘贴到隐藏行中。而如果复制后对选择筛选区域用“定位→可见单元格”的方法选择可见单元格，再按“Ctrl+V”进行粘贴，Excel会提示“ ……Excel无法粘贴信息，原因是复制区域与粘贴区域形状不同……”。遇到这种情况，可以用辅助列或VBA的方法来解决。
例如下图636f7079e799bee5baa6e79fa5e98193361所示，左侧的“Sheet1”表的A、B两列包含一些水果名称及数量，现在需要用右侧“Sheet2”表B1:B7区域中的数值(用红色标识)替换“Sheet1”表筛选“苹果”后的数量。
方法一：使用辅助列
这个方法是用排序法把需要替换的数据放在一起再进行复制粘贴。即先添加一个“序号”辅助列，在其中输入数字序号，再用另一个辅助列对筛选后的数据进行标记，按第二个辅助列排序，再复制粘贴，最后对“序号”列排序还原原数据的排列顺序。具体步骤如下：
1.先取消筛选，在“Sheet1”表的C2、C3单元格分别输入数字“1”，“2”，选择这两个单元格后双击填充柄，将序号填充到C列。
2.筛选A列中的“苹果”。在D列第二行的单元格中输入公式：
=ROW()
然后向下填充公式到D列的所有可见单元格。
3.取消筛选，按D列排序，将全部“苹果”的数量排在一起。
4.复制“Sheet2”表B1:B7数据粘贴到“Sheet1”表的B2:B8区域。
5.按序号列排序，还原原数据的排列顺序。
最后删除C、D两列，完成替换。
方法二：VBA代码
用下面的VBA代码可直接把“Sheet2”表B列的数据粘贴到“Sheet1”表筛选后的区域。假如“Sheet1”表的数据区域为 A1:B20，“Sheet2”表B列需要复制粘贴的数量为7个，先对“Sheet1”表A列筛选“苹果”，然后按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
复制整个工作zhidao表不仅要复制工作表中的所有单元格，还包括该工作表的页面设置参数，以及自定义的区域名称等。
方法一(1)将鼠标指针移到工作表标签上方。
(2)按住Ctrl键的同时拖动工作表到另一位置。
(3)松开Ctrl键和鼠标左键，即完成了同一工作簿整个工作表的移动并复制。
方法二(1)在工作表标签上点击鼠标右键。
(2)在弹出的右键菜单中选择“移动或复制工作表”。打开“移动或复制工作表”对话框，可以将选定的工作表移动到同一工作表的不同位置，也可以选择移动到其它工作簿的指定位置。如果选回中对话框下方的复选框“建立副本”，就答会在目标位置复制一个相同的工作表。
方法三(1)依次点击“窗口——重排窗口”。
(2)在“重排窗口”对话框中选择“排列方式”为“平铺”，并点击“确定”。
(3)按Ctrl键拖放工作表，将工作表从一个工作簿复制到另一个工作簿。
先选中要复制的区域
在复制之前先按一下 alt+; 键
苹果电脑 可能是按option+; 也可能是按住fn+option+; 键