返回列表 上一主題 發帖

[發問] 可否限定試算表 僅某部分自動計算

lichang

帖子
128 
主題
62 
精華
0 
積分
176 
點名
0  
作業系統
win8 
軟體版本
office2003 
閱讀權限
20 
註冊時間
2013-1-24 
最後登錄
2026-9-14 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-7-10 11:14 | 只看該作者

[發問] 可否限定試算表 僅某部分自動計算

各位大大，我現在製作一個試算表，不過因為在後幾個分頁有大量計算比較式，導致運算時都會整個重新計算
影響試算表速度，但實際上我的後面幾個分頁已經不會再變更(暫時)，所以有辦法僅限定第一分頁可以自動計算嗎???
後幾個分頁是不做任何重新計算的動作



1.part01.rar (1 MB)
1.part02.rar (1 MB)
1.part03.rar (939.08 KB)
收藏 分享

Scott090

帖子
533 
主題
58 
精華
0 
積分
613 
點名
234  
作業系統
win 10 
軟體版本
[] 
閱讀權限
50 
性別
男 
註冊時間
2013-3-19 
最後登錄
2026-9-25 

2025年全勤獎章2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章2015羊年全勤獎章熱烈參與勳章
2#
發表於 2016-7-11 08:37 | 只看該作者
回復 1# lichang

Excel 使用說明：
重新計算現用工作表，自上次計算後已經變更的公式以及其從屬公式。 SHIFT+F9 鍵   

Excel VBA 可以指定範圍

TOP

rouber590324

帖子
561 
主題
160 
精華
0 
積分
725 
點名
0  
作業系統
WINDOWS 
軟體版本
xp 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2014-9-10 
最後登錄
2026-2-12 

論壇榮譽勳章論壇贊助勳章熱烈參與勳章
3#
發表於 2016-7-11 16:23 | 只看該作者
DEAR SIR
如下可自行指定 需求計算之 SHEET

Sub 指定SHEET計算()
    Sheet2.Select
    ActiveWorkbook.PrecisionAsDisplayed = False
    ActiveSheet.Calculate
    ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
    Sheet2.Select
End Sub

Sub 自動計算()
    With Application
        .Calculation = xlAutomatic
        .MaxChange = 0.001
        .CalculateBeforeSave = True
    End With
    ActiveWorkbook.PrecisionAsDisplayed = False
    Range("A1").Select
End Sub

Sub 手動計算()
    With Application
        .Calculation = xlManual
        .MaxChange = 0.001
        .CalculateBeforeSave = False
    End With
    ActiveWorkbook.PrecisionAsDisplayed = False
    Range("A1").Select
End Sub
羅

TOP

        靜思自在 : 我們最大的敵人不是別人．可能是自己。
返回列表 上一主題