Mac版Microsoft Word能否进行VBA开发并插入UserForm？

1. 关于Toolbox与Insert选项的限制 #

Mac版Word 16.78.3的VBA环境确实和Windows版存在功能差异，默认没有可视化的UserForm设计界面，Insert菜单仅支持Module和Class Module是当前版本的正常限制，官方文档可能未明确标注，但这是现阶段Mac版的功能局限。

2. 手动创建UserForm的控件保存问题 #

你通过代码创建的UserForm属于运行时动态生成，而非设计时创建的独立对象，所以控件不会自动保存到代码中。这类动态生成的控件仅存在于当前运行会话，关闭文档后就会消失。如果需要持久化的UserForm结构，只能通过代码固定控件的创建逻辑，每次运行时重新生成。

3. 重复运行新增Form的处理方案 #

每次运行代码新增Form，是因为每次执行都创建了新的UserForm实例，解决方式有两种：

• 方案一：运行前销毁已有实例
  在创建新Form前，先遍历已加载的UserForm，关闭并销毁同名实例：

  Dim existingFrm As Object
  For Each existingFrm In UserForms
      If existingFrm.Name = "CustomForm" Then
          Unload existingFrm
          Exit For
      End If
  Next existingFrm
  
  ' 创建并显示新Form
  Dim newFrm As Object
  Set newFrm = CreateObject("UserForm")
  newFrm.Name = "CustomForm"
  ' 这里添加控件创建代码，比如：
  ' Dim btn As Object
  ' Set btn = newFrm.Controls.Add("Forms.CommandButton.1")
  ' btn.Caption = "点击测试"
  newFrm.Show
  

• 方案二：复用单一实例
  把UserForm实例声明为模块级变量，仅在首次运行时创建，后续直接显示：

  Dim customFrm As Object
  
  Sub ShowCustomForm()
      If customFrm Is Nothing Then
          Set customFrm = CreateObject("UserForm")
          customFrm.Name = "CustomForm"
          ' 添加控件逻辑
      End If
      customFrm.Show
  End Sub
  
  Sub ReleaseCustomForm()
      If Not customFrm Is Nothing Then
          Unload customFrm
          Set customFrm = Nothing
      End If
  End Sub
  

  建议在关闭文档前调用ReleaseCustomForm释放对象，避免内存占用。

内容的提问来源于stack exchange，提问作者Andy