返回列表 上一主題 發帖

[發問] 自動排序問題

[發問] 自動排序問題

請問一下,我做了一張工作表,欄A是有做外部資料的連結,內容如下:
       A           B         
1    振幅       代號
2   (公式)     1101
3   (公式)     1102

本來是用[change]來跑,可是在[change]底下,外部連結的資料更新,好像會無法觸發,
所以只好用另一種方式如下:
Private Sub Worksheet_Calculate()
    Sheet1.Range("A:C").Sort Key1:=Range("A1"), Order1:=xlDescending
End Sub
這樣是可以執行,不過可能是因為連結的資料更新速度很快的關係吧,
程式就一直在不停的跑,結果CPU都一直在60%上下,
因此想請教一下,有沒有什麼辦法能夠讓他每10秒才執行一次,
不然看到小漏斗一直在轉,頭都暈了:dizzy: 。

回復 2# GBKEE


謝謝版主,可以用了,如果要改跳動時間的設定
If Time - #12:00:10 AM# >= T Then
是把 #12:00:10 AM#去做修改就行了嗎?

TOP

        靜思自在 : 人的心地是一畦田,土地沒有播下好種子,也長不出好的果實。 -
返回列表 上一主題