gpt4 book ai didi

VBA 复制和粘贴方法不起作用

转载 作者:行者123 更新时间:2023-12-03 02:46:57 24 4
gpt4 key购买 nike

我正在尝试编写一个简单的复制和粘贴宏,它一直工作到最后一行。当它到达最后一行时,它说粘贴功能将不起作用。我真的很困惑为什么会发生这种情况,对此的任何帮助将不胜感激。

Sheet2.Columns("A:B").Insert Shift:=xlToRight
Sheet2.Columns("F:G").Cut
Sheet2.Activate
Columns("A:B").Select
ActiveSheet.Paste
Sheets("SourceData").Columns("A:B").Insert Shift:=xlToRight
Sheets("SourceData").Activate
Columns("A:B").Select
ActiveSheet.Paste <-LINE THAT THROWS ERROR

我的错误消息是工作表类的粘贴方法失败

最佳答案

您需要第二个剪切(或复制)命令来配合第二个 Activesheet.Paste 命令

关于VBA 复制和粘贴方法不起作用,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/26065376/

24 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com