Sub a() '启动并激活 Word Application.ActivateMicrosoftApp xlMicrosoftWordEnd SubSub b() '启动并激活 计算器 Application.ActivateMicrosoftApp 0End Sub
使用道具 举报
⊙﹏⊙b汗,带着眼镜找眼镜
本版积分规则 发表回复 回帖后跳转到最后一页
小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )
GMT+8, 2024-6-6 12:29 , Processed in 0.329088 second(s), 5 queries , Gzip On, Yac On.
Powered by Discuz! X3.4
Copyright © 2001-2020, Tencent Cloud.