Question

这适用于VBA宏是Excel。例如，如果用户选择＆＃34; ID＆＃34;来自ComboBox，＆＃34; A：A＆＃34;被送到一个操作程序，＆＃34; B：B＆＃34; for＆＃34; Name＆＃34;等等。列数及其标题将始终不同，并且可能包含重复的标题名称。

我很欣赏指向我需要使用的VBA功能的指针。

Answer 1

如果没有关于您的要求的更多细节，这可能是我建议的最好的：

    Private Sub UserForm_Initialize()
        ComboBox1.AddItem "Column A Text"
        ComboBox1.AddItem "Column B Text"
        ComboBox1.AddItem "Column C Text"
    End Sub

    Private Sub ComboBox1_Change()
        Dim rngSelectedColumn As Range
        Select Case ComboBox1.Value
          Case "Column A Text"
            Set rngSelectedColumn = Sheet1.Columns(1)
          Case "Column B Text"
            Set rngSelectedColumn = Sheet1.Columns(2)
          Case "Column C Text"
            Set rngSelectedColumn = Sheet1.Columns(3)
        End Select
        Call ProcedureToFeed rngSelectedColumn
    End Sub

使用列标题填充UserForm的ComboBox，列标题引用逐列

1 个答案: