选择性粘贴跳过空单元格代码修改？

wangjwpx · 发表于 2019-10-3 06:40

选择性粘贴跳过空单元格
学习搞了一个代码，不行，请老师帮助修改。=xlPaste？跳过空单元格不知怎么修改

Sub 七簿田日转表选择性粘贴跳过空单元格()

Range("z2:dc2").Copy ' z2:dc2是复制的单元格区域

Selection.PasteSpecial Paste:=xlPasteSkipBlanks,True '选择目标，粘贴全部,跳过空单元格

End Sub

killq · 发表于 2019-10-3 06:53

这是闭门造车吗？

wangjwpx · 发表于 2019-10-3 07:02

killq 发表于 2019-10-3 06:53
这是闭门造车吗？

傲慢的样子，不理你

killq · 发表于 2019-10-3 07:36

wangjwpx 发表于 2019-10-3 07:02
傲慢的样子，不理你

随便你，反正遇到问题的不是我，哈哈

wangjwpx · 发表于 2019-10-3 07:46

killq 发表于 2019-10-3 07:36
随便你，反正遇到问题的不是我，哈哈

论坛有许多热心老师，我不急。

wangjwpx · 发表于 2019-10-3 08:39

搞定
Sub 七簿田日转表选择性粘贴值跳过空单元格()

Range("z2:dc2").Copy ' z2:dc2是复制的单元格区域

Selection.PasteSpecial Paste:=xlValues, SkipBlanks:=True '选择目标，粘贴值,跳过空单元格

End Sub

everbest2015 · 发表于 2019-10-3 10:24

参照录制宏的代码进行修改

		自动登录	找回密码
密码			免费注册

[求助] 选择性粘贴跳过空单元格代码修改？

最新热点 /1