Excel 如何在组合框中排除.xlsb文件类型？

我有一个Userform，它本质上是由打开的工作簿填充的两个组合框。有没有办法将PERSONAL.XLSB从列表中排除？这就是我所拥有的：

Sub UserForm_Initialize()
Dim wkb As Workbook
With Me.ComboBox1
    For Each wkb In Application.Workbooks
        .AddItem wkb.Name
    Next wkb
End With
With Me.ComboBox2
    For Each wkb In Application.Workbooks
        .AddItem wkb.Name
    Next wkb
End With
End Sub

试一试

如果不希望依赖文件扩展名可见，可以改为检查文件格式

If Not wkb.FileFormat = 50 Then
   .AddItem wkb.Name
End If

---

只要在

Additem

周围放一个

IF

语句就行了。我使用了后一种解决方案。谢谢

If Not wkb.FileFormat = 50 Then
   .AddItem wkb.Name
End If