问VBA -Column插入码优化
EN

Stack Overflow用户

提问于 2017-09-29 16:53:19

回答 1查看 37关注 0票数 1

我试图在工作表中插入一列，

这是我的密码，

 Sheets(Currentsheetname).Range("A" & MyRow & ":B" & lastrow).Select
 .Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

有没有办法运行这段代码，再快一点。目前它正在花费5-10秒的时间。

谢谢。

回答已采纳

发布于 2017-09-29 16:54:42

这应该更快：(永远不要使用Select和Selection)

Sheets(Currentsheetname).Range("A" & MyRow & ":B" & lastrow).Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove

票数 4

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/46493565

复制

相似问题

问VBA -Column插入码优化EN