2015-11-12 52 views
0

我正在使用Excel 2015.當單元格中的圖形達到或超過極限時,我希望該單元格鎖定/釋放,以便當我回來時對此我仍然可以看到達到了極限。Excel 2015,當條件滿足時凍結單元格的圖形

問題是,它是一個活動圖表,圖形可以回落到極限以下,觸發指示器告訴我已達到極限。我可以設置一個警告/指示器,當達到限制時,但無法確定如何凍結正在達到的限制。如果需要,這種凍結可以在旁邊的單元格中。

+0

嗨,我不能等到今天晚上。我只是馬上放棄它,嘿嘿。它工作的一種享受。再次感謝。如果被想要應用這個不同的獨立數字的列表。有沒有辦法將它拖拽到其他單元格中,還是重複每個獨立圖形的代碼? – Eamonn

回答

0

有沒有簡單的方法來做到這一點使用標準的功能,但你可以使用這個User Defined Function

在「開發者」選項卡中,選擇「查看代碼」,好了,查看代碼,工作簿 - 這將打開Visual Basic編輯器。

選擇Insert - >Module,您應該會看到一個'Modules'分支出現在樹中,展開並雙擊Module1(您剛剛插入)。

添加以下代碼

Public Curmax(10) As Double 
Public Reset As Boolean 

Function RunMax(Cell As Range, maxref As Integer) As Double 
    Application.Volatile (True) 'Ensures UDF is run when the sheet recalculates 
    If Cell.Value > Curmax(maxref) Then 
     Curmax(maxref) = Cell.Value 
    End If 
    RunMax = Curmax(maxref) 
End Function 

Sub ClearRunMax() 
    With ActiveCell 
     maxref = Mid(.Formula, InStr(.Formula, ",") + 1, 1) 
     Curmax(maxref) = 0 
     ActiveSheet.Calculate 
    End With 
End Sub 

現在,如果你在一個單元格中輸入=RunMax(A1,1),將正在運行的最大的東西是在細胞A1作爲最大保持參考編號。 1,添加另一個,那麼就增加了參考 - =RunMax(C3,2), =RunMax(F56,3),最多不超過10個(或任何你把Public Curmax(10) As Double

如果您在頁面上放置一個按鈕,分配ClearRunMax宏,它會如果您選擇包含RunMax語句的呼叫,然後單擊該按鈕,請將最大值重置爲您正在跟蹤的單元格的當前值(假定其大於0)。

這可以改善,我會第一個承認。例如沒有錯誤檢查。所以當你按下按鈕時你選擇了錯誤的單元格,你會得到一個Type Mismatch。另外,如果您的值爲負數,重置將不起作用。

+0

非常感謝。我會在今晚試試這個,並且讓你知道它是如何發生的。 – Eamonn

+0

對不起,我在錯誤的評論部分發布了回覆。它應該在這裏。請從上面閱讀。 – Eamonn

+0

嗨@Eamonn,如果我的回答對你有幫助,習慣上把答案標記爲「接受」。就拖入其他細胞而言,不,這不起作用,這是它的一個侷限性。您需要爲每個單元格另外添加一個公共變量,並在函數中選擇要更新哪個變量。那應該不會太難。 – SiHa

相關問題