VBA Excel - 通過工作表和範圍作爲參數

任何人都可以幫助我將一個Sub轉換成一個函數，所以我可以用它來不同的窗體控件？我是VBA excel的新手，我一直試圖將這個轉換成幾個小時，但沒有運氣。欣賞它，如果有人可以幫助。VBA Excel - 通過工作表和範圍作爲參數

Private Sub ComboBox1_Change() 
    Dim v, e 
    With Sheets("DATABASE").Range("minRange").SpecialCells(2) 
     v = .Value 
    End With 

    With CreateObject("scripting.dictionary") 
     .comparemode = 1 
     For Each e In v 
     If Not .exists(e) Then .Add e, Nothing 
     Next 
     If .Count Then Me.ComboBox1.List = Application.Transpose(.keys) 
    End With 
End Sub

謝謝。

來源

2016-04-03 Oversoul

兩個潛艇和功能都可以接受，你只需要確定他們在 –

等待括號中的頭參數，你的意思是你想改變'ComboBox1_Change（） '接受參數的事件？ –

範圍變量應該有工作表已經限定，所以不需要單獨傳遞。只要寫你的子接受了一系列的說法：

Sub MySub(ByVal rng As Excel.Range) 

    MsgBox rng.Address 

End Sub

來源

2016-04-03 07:56:01

VBA Excel - 通過工作表和範圍作爲參數

回答

相關問題