打开excel时加载Excel组合框

时间:2012-06-15 09:42:53

标签: excel vba excel-vba

我在Excel中有组合框,我有以下VBA代码。但是现在正在打开excel时工作。

Sub worksheet_activate()
mapping.clear
mapping.Additem "File to Table"
mapping.Additem "Table to File"
End Sub

现在,告诉我如何在打开Excel时自动加载组合框。

1 个答案:

答案 0 :(得分:1)

当我这样做时,它起作用了。在工作表宏中执行此操作。

Private Sub Workbook_Open()
With Sheet1.mapping
.AddItem "File to Table"
.AddItem "Table to File"
End With
End Sub