返回列表 上一主題 發帖

marco, 可否只在指定的workbook裡生效? 而不是所有已經開始的workbook ?

tongbcat

帖子
2 
主題
1 
精華
0 
積分
3 
點名
0  
作業系統
win7 
軟體版本
win7 
閱讀權限
10 
註冊時間
2011-9-14 
最後登錄
2011-9-19 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2011-9-18 09:53 | 顯示全部帖子

marco, 可否只在指定的workbook裡生效? 而不是所有已經開始的workbook ?

我是VBA新手, 現有問題請教各高手! 先謝謝大家幫忙!
我是一間小巴公司的主任, 老細要我制定一個檔案去提醒我們有沒有司機遲到!
在開我自己制作的單一檔案是沒有問題的, 但當我同時開啟其他檔案時, 提取實時(real time)的儲存格的marco就出問題了!
請問有沒有方法只令提取實時的marco, 只在指定的workbook裡生效?

Private Sub Workbook_Open()
    Sheets("Control").Range("B1").Value = Time
    Application.OnTime Time + TimeSerial(0, 0, Sheets("Control").Range("B9")), "RealTime"
End Sub

====================================================================
Sub Realtime()
    Sheets("Control").Range("B1").Value = Time
    Application.OnTime Time + TimeSerial(0, 0, Sheets("Control").Range("B9")), "RealTime"
End Sub

reminder.rar (24.62 KB)
收藏 分享

tongbcat

帖子
2 
主題
1 
精華
0 
積分
3 
點名
0  
作業系統
win7 
軟體版本
win7 
閱讀權限
10 
註冊時間
2011-9-14 
最後登錄
2011-9-19 
2#
發表於 2011-9-19 08:01 | 顯示全部帖子
謝謝, OK 了, 老細收貨啦!

TOP

        靜思自在 : 口說一句好話，如口出蓮花；口說一句壞話如口吐毒蛇。
返回列表 上一主題