從單元格列表中選擇給定值

Question

我正在變量中獲取工資名稱的值。 我必須在列表下拉單元格中設置此工資單名稱。 如果我只是使用以下方式將工資單放入單元格中

Worksheets(sectionName).Range("B" & rowCntr).Value = payroll 

上面的代碼。不會觸發下拉更改事件，因此不會填充其他計算的單元格。 請提出一種方法，以便我可以從下拉菜單中選擇值，並觸發下拉菜單更改事件。

Answer 1

如果我正確理解了您的問題，那么您正在尋找一種方法來更改下拉列表中的值時運行代碼？ 如果是這樣，請嘗試一下。

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim Cell As Range

    Set Cell = Range("YOUR DROP DOWN CELL") 'or an entire range of cells

    If Not Application.Intersect(Cell, Range(Target.Address)) Is Nothing Then
        ' Your Code Here

    End If
End Sub