excle表，怎么将一张excel表里面的数据复制黏贴到另外一张筛选过的excel表中。可以使用运行代码：

答案:2 悬赏:20 手机版

解决时间 2021-02-23 12:33

提问者网友：心牵心
2021-02-23 07:16

Sub 粘贴时跳过隐藏行()
Dim Rng As Range
Set Rng = Range("F4:F454").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 = 26 Then End
Next
End Sub
但是这样只能复制黏贴一列到筛选过的表，要复制黏贴多列到筛选过的表该怎么做呢？求帮助。

最佳答案

五星知识达人网友：woshuo
2021-02-23 07:58

筛选出数据后，选中数据区域，按Alt+;（英文分号键）选定可见单元格区域，复制，然后转到另一表中，粘贴即可。

全部回答

1楼网友：鱼芗
2021-02-23 09:36

我想应该用随机函数randbetween()生成题号，再用vlookup()引用题目。你可以百度一下方法。

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息