2013-07-29 33 views
0
Private Sub Workbook_SheetSelectionChange _ 
    (ByVal Sh As Object, ByVal Target As Excel.Range) 
    x = Sh.UsedRange.Rows.Count 
End Sub 

我有這樣的私人子過程,我試圖通過編譯器錯誤調用私有子過程

Workbook_SheetSelectionChange _ 

調用它,我得到一個編譯錯誤,我試圖重新命名子但它不會讓我刪除下劃線,因爲子文件中的第二行。我想知道這是爲什麼,我怎麼稱呼這個子?

回答

2

_是續行字符

Private Sub Workbook_SheetSelectionChange (ByVal Sh As Object, ByVal Target As Excel.Range) 

相同

Private Sub Workbook_SheetSelectionChange _ 
(ByVal Sh As Object, ByVal Target As Excel.Range) 

這是一樣的(採取極端)

Private _ 
Sub _ 
Workbook_SheetSelectionChange _ 
(ByVal _ 
Sh _ 
As _ 
Object, _ 
ByVal _ 
Target _ 
As _ 
Excel.Range) 
+0

謝謝! @SeanCheshire – user2600411

1

嘗試簡單地:

Workbook_SheetSelectionChange

或者

_是一個連字符,子程序的名字一部分。