怎么往筛选后的简历表格粘贴

　　我们在制作简历的时候，会遇到筛选出某些数据，复制后需要粘贴到筛选状态下的单元格的情况，今天小编要教大家怎么往筛选后的简历表格粘贴，一起来学习下吧!

往筛选后的简历表格粘贴的方法

　　1首先，点击excel程序左下角的【录制宏】按钮录制宏。选择录制到【个人宏工作簿】后点击【确定】按钮。

　　2开始录制宏后什么都不操作，马上点击【停止录制宏】按钮。

　　3按Alt+F11进入VBE界面，打开“个人宏工作簿”，可以看到增加了一个模块。

　　4将模块代码更新成下述代码后点击【保存】按钮。

　　Sub 多区域复制粘贴

　　On Error Resume Next

　　Dim SRange As Range, UPRange As Range, TRange As Range

　　Dim i As Long, AreaNum As Long

　　Dim MinR As Long, MinC As Long

　　AreaNum = Selection.Areas.Count

　　ReDim SRange(1 To AreaNum)

　　MinR = ActiveSheet.Rows.Count

　　MinC = ActiveSheet.Columns.Count

　　For i = 1 To AreaNum

　　Set SRange(i) = Selection.Areas(i)

　　If SRange(i).Row < MinR Then MinR = SRange(i).Row

　　If SRange(i).Column < MinC Then MinC = SRange(i).Column

　　Next i

　　Set UPRange = Cells(SRange(1).Row, SRange(1).Column)

　　Set TRange = Application.InputB