![]() 终极会员
|
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次的窗体中,哪怕加在自定义变量之后的第一句,也是一执行完马上就退出了,这是什么情况? 上传附件,我把自己的代码全都删了,只留这一句,也是运行完就退出,这是见鬼了吗?? 此帖于 2012-11-30 15:08:26 被 wxh5 编辑. . |
||
![]() 感谢ccf |
![]() 终极会员
|
已有附件,望高手答疑
|
||