ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
12
返回列表 发新帖
楼主: 舞文弄墨123

[求助] vba中如何同时运行两段代码?

[复制链接]

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-1-1 16:22 | 显示全部楼层
perfect131 发表于 2024-1-1 15:50
写的高级了。vba是单线程,想多线程异步执行,也有思路
https://club.excelhome.net/forum.php?mod=viewth ...

这也太复杂了,感觉是杀鸡焉用宰牛刀

TA的精华主题

TA的得分主题

发表于 2024-1-1 16:42 | 显示全部楼层
你的代码code1和code2代码我修改过了,你这二个代码只是执行了一个复制动作,并没有粘贴动作,所以,如果连续运行这二个代码,最后看到的只能是最后一次复制。
我的代码运行的结果在表2
方法就是这个方法,你自己体会一下吧。

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-1-1 16:55 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
ykcbf1100 发表于 2024-1-1 16:42
你的代码code1和code2代码我修改过了,你这二个代码只是执行了一个复制动作,并没有粘贴动作,所以,如果连 ...

我只需要复制出来,我要粘贴到微信上发送

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-1-1 16:58 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
ykcbf1100 发表于 2024-1-1 16:42
你的代码code1和code2代码我修改过了,你这二个代码只是执行了一个复制动作,并没有粘贴动作,所以,如果连 ...

因为在实际运用中,我要复制两个地方,形成截图,发送微信给同事。所以实际是截图了2张图片

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-1-1 16:58 | 显示全部楼层
ykcbf1100 发表于 2024-1-1 16:42
你的代码code1和code2代码我修改过了,你这二个代码只是执行了一个复制动作,并没有粘贴动作,所以,如果连 ...

而你修改的代码,是直接复制粘贴回表格里,相当于赋值

TA的精华主题

TA的得分主题

发表于 2024-1-1 17:23 | 显示全部楼层
舞文弄墨123 发表于 2024-1-1 16:58
而你修改的代码,是直接复制粘贴回表格里,相当于赋值

你1楼的需求是同时运行2段代码,只要能实行就行,和结果无关。

TA的精华主题

TA的得分主题

发表于 2024-1-3 10:38 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

call 后面接sub子过程就是了!

TA的精华主题

TA的得分主题

发表于 2024-1-3 11:33 | 显示全部楼层
这个要求确实要用牛刀。

同时执行是不能的,vba不支持,但是有很多方法可以实现你的目的。

最简单的,复制完直接发送,再复制第二个;或者两个copy的结果,保存下来分别发送就行了。复杂点,可以从缓冲中读取。再复杂点........

TA的精华主题

TA的得分主题

 楼主| 发表于 2024-1-4 17:24 | 显示全部楼层
micch 发表于 2024-1-3 11:33
这个要求确实要用牛刀。

同时执行是不能的,vba不支持,但是有很多方法可以实现你的目的。

看来是代码有局限性了
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-19 13:40 , Processed in 0.042708 second(s), 6 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表