HH1225 發表於 14-12-4 07:47

請問 Private Sub Worksheet_Calculate() 如何設定第二個Worksheet_Calculat

請問 VBA高手
如何在同一個sheet 設定第二個 Worksheet_Calculate()

Private Sub Worksheet_Calculate()
......

End Sub

??????   Worksheet_Calculate()
..................

End Sub



請問
如何在同一個sheet 設定第二個 Worksheet_Calculate()

Seer_et 發表於 14-12-4 12:20

當一個sheet內容有異動時即會觸發Worksheet_Calculate()事件
不太明白為何需要2個或以上的Worksheet_Calculate()程序
如有不同的要處理的事，皆可寫在單一Worksheet_Calculate()程序裡，不是嗎?

HH1225 發表於 14-12-4 12:58

Seer_et 發表於 14-12-4 12:20 static/image/common/back.gif
當一個sheet內容有異動時即會觸發Worksheet_Calculate()事件
不太明白為何需要2個或以上的Worksheet_Calcul ...

舊版本的Excel
Private Sub Worksheet_Calculate()
   .
if .....

end if
if .....

end if
..


End sub

檔案太大 超過64K VB 說不可以

Issue 發表於 14-12-4 18:35

那其中一部分改成function呢

HH1225 發表於 14-12-4 19:31

Issue 發表於 14-12-4 18:35 static/image/common/back.gif
那其中一部分改成function呢

請問 function 如何用呢?

我VB 沒學過
只會模仿

Issue 發表於 14-12-4 20:16

Private Sub Worksheet_Calculate()
   aaa '這樣呼叫副程式

End Sub

'aaa是副程式名稱
Function aaa()


End Function

HH1225 發表於 14-12-4 20:22

Issue 發表於 14-12-4 20:16 static/image/common/back.gif
Private Sub Worksheet_Calculate()
   aaa '這樣呼叫副程式



瞭解了
有空再試試
試完在上來報告
謝謝

頁: [1]
查看完整版本: 請問 Private Sub Worksheet_Calculate() 如何設定第二個Worksheet_Calculat