2013-12-19 95 views
-2

我已經在Excel 2010中觸發用戶窗體

每個同事都有一個工作表(節日形式)成爲假期和病假規劃師/跟蹤器,你可以看到所有52個週一年,因爲他們要求假期日期1放在相應的單元格中。

我也有52個單獨的工作表,顯示周視圖,並列出所有同事。這從每個單獨的同事假期表單中獲取信息。

這一切都行得通,我現在需要做的是如果4名急救員在假期同時打開警告用戶窗體。

我已經嘗試過worksheet_change_event並計算事件,但沒有任何工作。

該代碼將需要觸發用戶窗體時的5 cells(C23:G23) = 0

每個這些小區中的該值來自函數>4-sum(C9,c10,c16,c18)並且這被跨越取決於其他4個細胞在其上柱它們是複製的總和從c到g。

任何幫助,將不勝感激。

+1

你可以發佈你已經嘗試使用'Worksheet_Change'事件或'_Calculate'事件的代碼嗎? –

回答

0

Worksheet_Change試試這個。

Option Explicit 
Private Sub Worksheet_Change(ByVal Target As Range) 
Dim rngCheck As Range 
'// Define the range you need to check: 
Set rngCheck = Range("C9:G9,C10:G10,C16:G16,C18:G18") 

'// Check to see if the Change happens to one of the computation cells 
If Intersect(Target, rngCheck) Is Nothing Then Exit Sub 


Call Your_SubRoutine 

End Sub 
-1

您可以添加一些條件格式。這可以在不必使用VBA的情況下快速突出顯示任何問題,如果工作表將由多個用戶共享(它們不能全部被信任以允許宏),那麼這很有用。

此外,我問你爲什麼有52個輸出表?似乎過度殺傷?每張紙上需要多少同事?有多少人可以訪問它?月視圖會不會足夠?你能否把所有的同事和日期放在一張年度表上,然後用過濾器一次看到一個同事,或者按部門查看?