. : : ClassiClub ForuM : : .

会员中心 论坛帮助 日历事件 标记论坛已读
返回   精品技术论坛 » 技术论坛 » 『软件使用』 » 专题:办公邮件

『软件使用』: 电脑软件推荐, 电脑软件使用, 经验分享



发表新主题 关闭主题
 
主题工具
wxh5
 
wxh5 的头像
终极会员
 
资 料:
注册日期: Jul 2004
帖子: 13,411 声望值: 1
精华: 0,解答: 29
#1 旧 2012-11-30, 14:23:16 Icon18 【求助】excel vba中复制粘贴后程序自动退出了?
wxh5 当前离线  

Range("a1:e" & i).Value = Range("a1:e" & i).Value

执行完这一句,整个VBA就退出了,下面的句子都不会被执行到

我改了种说法:
'Worksheets("sheet1").Range("a1:e" & i).Copy
'Worksheets("sheet1").Range("a1").PasteSpecial xlPasteValues

也不行,这段代码执行完后就退出了,真郁闷啊!这代码应该没问题吧?

另外还有一个问题:在当前的用户窗体上执行完程序,想删除自己,要如何操作?

就在当前文件上操作,就一个用户窗体,求一段简洁的代码。谢了!!:blush;



附,真奇怪,我自己另外创建了一个空白的XLS再用这句代码就没问题……怪了啊!
但是我把代码加在我自己已经修修补补了N次的窗体中,哪怕加在自定义变量之后的第一句,也是一执行完马上就退出了,这是什么情况?

上传附件,我把自己的代码全都删了,只留这一句,也是运行完就退出,这是见鬼了吗??
上传的附件
文件类型: rar test.rar (30.1 KB, 2 次查看)

此帖于 2012-11-30 15:08:26 被 wxh5 编辑. .


感谢ccf
wxh5
 
wxh5 的头像
终极会员
 
资 料:
注册日期: Jul 2004
帖子: 13,411 声望值: 1
精华: 0,解答: 29
#2 旧 2012-11-30, 19:05:41 默认
wxh5 当前离线  

已有附件,望高手答疑
发表新主题 关闭主题

主题工具

论坛规则  发帖规则
不可以发表主题
不可以回复帖子
不可以上传附件
不可以编辑自己的帖子
论坛启用 vB 代码
版面启用 表情符号
版面启用 [IMG] 代码
版面禁用 HTML 代码


所有时间均为北京时间, 现在的时间是 11:50:55.

本论坛带宽由迅通网络提供
SSL证书由TrustAsia提供

Copyright © 2000 - 2019 ClassiClub Forum All Rights Reserved.
粤ICP备09123456号