forms - Excel VBA 中的现代表单和表单控件

Question

Excel VBA 的窗体和控件的外观自 Excel 97 以来一直没有更新。它们看起来像 Windows 95。它已成为一种非常老式的外观。

某些控件(例如复选框、单选按钮和编辑框)具有可以使它们看起来是二维的属性。早在 1997 年，这让它们看起来像 Windows 3x 一样过时，但具有讽刺意味的是(？*)它使这些控件看起来更现代。我一直在这样做，但它不适用于其他一些控件，尤其是命令按钮和下拉菜单。

是否可以直接调用 Windows API 来获得更具现代感的表单和表单控件？如果是这样，是否有人为他们制作了一些样板 VBA 模块？

另外，Macintosh 上的 Excel 也可以吗？

*我曾经以为我理解讽刺，但我再也不确定了。

Answer 1

这不一定可以访问其他控件，但我发现这对于控制 VBA 不提供访问权限的东西非常有用(遗憾的是)。您可以使用此处提供的类:http://www.oaltd.co.uk/Spreads/FormFun.zip访问窗体上的某些 Windows API 功能。

假设这个类被称为 cWindowsAPI:

private sub UserForm_Initialize()

    Dim formVar as cWindowAPI
    Set formVar = new cWindowAPI

    Set formVar.Form = Me

    '    Now you have access to the different options available via the api
    '    that were exposed within the cWindowAPI class of course
    formVar.ShowCaption = false
    formVar.ShowMaximizeBtn = false

    '    Etc...

End Sub

也许可以使用您遇到的有用 API 对此进行扩展。