如何设置组合框文本和值字段

本文关键字:文本 字段 组合 何设置 设置 | 更新日期: 2023-09-27 18:18:06

如何在Excel VBA中设置组合框文本字段和值字段,就像我们在web应用程序中设置下拉列表一样,例如

DropdownList.DataTextField ="EmpName";
DropdownList.DataValueField = "EmpCode";

如何设置组合框文本和值字段

With ComboBox1 
   .AddItem "Item1" 
   .AddItem "Item2"
End With 

ActiveSheet.Shapes("ComboBox1").ListFillRange = "A1:A10" 

当我从Access VBA中创建Excel组合框时,我使用了以下格式:

With ActiveSheet.OLEObjects.Add(ClassType:="Forms.ComboBox.1")
    With .Object
        .TextAlign = 2
        '.LinkedCell = "D6"
        '.ListFillRange = "G16:G23"
    End With
End With

但是在Excel中,这两个注释行似乎不起作用。希望这对你有帮助?