看我这段VBA代码，我想应用于当前工作表，为什么它就应用于所有工作表了，还有应该怎么改。
答案:1 悬赏:50 手机版
解决时间 2021-11-23 17:34
- 提问者网友：相思似海深
- 2021-11-23 04:56
看我这段VBA代码，我想应用于当前工作表，为什么它就应用于所有工作表了，还有应该怎么改。
最佳答案
- 五星知识达人网友：你哪知我潦倒为你
- 2021-11-23 06:26
因为这句:
ActiveSheet.Range("A1") = dd & "天" & hh & "小时" & mm & "分钟" & ss & "秒"
始终在当前活动工作表单元格A1写入值。
程序每隔1秒调用自身一次，如果你在不同的工作表之间来回切换显示，活动工作表也就随之更改。
解决方法：
可以把需要写入的工作表固定起来，比如名为"特定名字"的工作表，那么语句改成：
Sheets("特定名字").Range("A1") = dd & "天" & hh & "小时" & mm & "分钟" & ss & "秒"
ActiveSheet.Range("A1") = dd & "天" & hh & "小时" & mm & "分钟" & ss & "秒"
始终在当前活动工作表单元格A1写入值。
程序每隔1秒调用自身一次，如果你在不同的工作表之间来回切换显示，活动工作表也就随之更改。
解决方法：
可以把需要写入的工作表固定起来，比如名为"特定名字"的工作表，那么语句改成：
Sheets("特定名字").Range("A1") = dd & "天" & hh & "小时" & mm & "分钟" & ss & "秒"
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯