VBA 最终用户将 Microsoft Office 2007 升级到 2010（VBA 6 到 VBA7）时遇到的问题以及需要文档、帮助和提示。 （关键词就够了）

Question

作为典型的小型企业用户，当我的笔记本电脑坏了时，我必须升级到 Office 2010（2007 版已不再上市）。现在我有一堆快速而肮脏的 VBA 来配合我的旧工作表。它们都不是编程杰作，但它们都可以使用 Excel 和 Office 2007 完成工作。

现在我尝试在 Office 2010 上使用我的旧东西，一切都有点无法使用。我花了两天时间搜索网络，试图为最终用户找到任何文档，但没有成功。我发现了很多针对专业程序员的博客，他们希望编写防弹代码来服务从 Office 0 到 Office2010、32 位到 64 位（这里没有 8 位？）的任何内容，但没有一篇文章谈论主要业务，最终用户需要大量自制编码才能生存一天。

如何使旧的 2007 VBA 与 2010 兼容？

不，我不需要它向后兼容任何东西，它与我的新计算机和新软件兼容就足够了（在我的情况是 64 位，如果有人想知道的话）。我只需要知道为什么我的代码不再工作，以及该怎么办。 我真正想要的是一些指向真实信息的指示（如果有的话）！ 当然，我可以将我的每一段代码复制粘贴到程序员讨论论坛上，被嘲笑，几周后我可能会让其中一些代码工作，但我真正需要的是编写给基本 VBA 用户的真实信息。我需要学习这个。

那么您的问题是什么？

发生了什么变化？

日历 Active-X 组件丢失。我找到了解决方案： http://answers.microsoft.com/en-us/office/forum/officeversion_other-customize/missing-calendar-control/03ad5d05-ca3f-4081-9989-e757223ebdde 现在我只是必须重做我所有表格上的每个日历......谢谢。

Textbox.Text 不起作用，我找到并运行 Microsoft Excel 代码兼容性检查器 (CII)，它显示我有几千个“已弃用”的 Textbox.Text 元素 – “可能包含对象模型中已删除的项目” - 什么？

它不断变得更好，同样的微软软件指出： “类型：弃用 项目：[xls]SmartTagRecognizer.FullName 网址：http://go.microsoft.com/?linkid=9719761 代码：MyFullName = ThisWorkbook.FullName”” 没有解释…（顺便说一句，停止检查器并查看结果的唯一方法是 CRT-ALT-DEL –停止…）

我访问了检查器给出的链接，没有任何帮助。

我运行检查器几次，每次都会给出不同的结果。现在这很有趣。

我听到了您的问题，现在请告诉我您的问题

我从哪里开始。这是一个。 我有一个表单，用户可以在其中进行新的“约会”，保存时，VBA 在日历工作表中创建一段代码和新形状（以及 Outlook，但这不是这里的重点）。当用户返回并单击该形状 - 按钮 - 按钮时，将运行一段创建的代码。这是代码：

Private Sub myMacro2001_Click()
    Dim meetingId As Integer
    meetingId = 2001
    Load formHours
    Call formHours.selectMeeting(meetingId)
    formHours.Show vbModeless
End Sub

应该是在 2007 年打开表单 formHours，其中包含为 2001 年会议存储的信息（meetingId）

formHours 中的代码开头为：

Sub selectMeeting (ByRef IdNo As Integer) ’Bring in the meeting ID
Meeting = IdNo
    ….

不是很优雅，但它有效。不再这样做了。

如果您能帮助我解决这个问题，我很感激，但如果您告诉我应该在哪里找到答案，那就更好了。 发生了什么变化？以前工作过，现在不工作了。该怎么办？

（PS。我知道我的代码很糟糕，但它有效......我只是想知道发生了什么变化，以及我需要如何更改。Ps.Ps

是的，我知道我应该问微软，但你知道怎么做那是……）

跟进

经过 Barrowc 和其他人的一些善意建议后，我设法解决了一些问题。将 Text.Text 更改为 Text.Value 产生了一堆新问题，一些 Text-Values 用于公式，现在我需要更改它们 Val(FooTextBox.Value)

真正令人惊讶的是 2010 年似乎非常慢！我在办公室里同时参加了 2007 年和 2010 年的比赛，2007 年轻松获胜。我的一名员工已经在 2007 年向一位客户开具了发票，当时 2010 年尚未开放！有趣的是，自 2007 年以来，我一直在 AMD Athlon X2 双核处理器上运行，内存有限，而 2010 年，我在我的新笔记本电脑上运行 Core i7-740QM，6 GB，两者都运行 win7-64。我上网查了一下，没有发现任何关于Office 2010上的VBA7比Office2007上的VBA6慢很多的抱怨。我不知道这是否只是我的问题，但我的员工一心一意地投票支持 2007 年......

Answer 1

对于所有 TextBox 实例，将 .Text 更改为 .Value

SmartTagRecognizer 问题似乎是误报因此无需执行任何操作

---

关于表单错误，您可以尝试以这种方式创建表单以查看是否有帮助：

Private Sub myMacro2001_Click()

Dim meetingId As Integer
Dim fmHours As formHours

meetingId = 2001
Set fmHours = New formHours

fmhours.selectMeeting meetingId
fmHours.Show vbModeless

End Sub

此外，您可以将 Sub selectMeeting 更改为 Public Sub selectMeeting

---

有关 Office 2007 和 Office 2010 之间 VBA 实际差异的文档似乎有点稀疏。 此页面特别提到 32-位 ActiveX 控件（自定义和内置）在 64 位版本的 Office 2010 中无法工作。因此，这很可能是问题的根源。

还有来自 Microsoft 此处：

是否会提供 64 位版本的 Office 2010 产品？

是，64 位 Office 2010 产品
将提供升级。 但是
我们强烈推荐大多数用户
安装 32 位版本的 Office 2010
在 32 位和 64 位操作系统上
因为目前很多常见的系统
Office 加载项将无法运行
在 64 位版本中。 64 位
安装 Microsoft Office 2010
产品将可供用户使用
谁经常使用非常大的文档
或数据集并需要 Excel 2010
程序访问大于2GB的
记忆。可能存在技术问题
64 位版本并按顺序
安装 64 位版本的 Office
2010产品用户必须有64位
他们支持的操作系统
电脑。

（我的重点）

如果可以，请尝试安装到 32 位版本的 Office 2010

Answer 2

我也遇到了问题...几十年来我一直用它来创建一串“=”字符以在文本中进行视觉中断等...

STRING$(80,"=")

现在人们告诉我该代码在 Excel 2010 中失败。

替换是什么对于上述？我的意思是...我可以做到这一点...

For X = 1 to 80
print "=";
next x
print

但这确实是一个倒退。

有一个潜在的修复...那就是将其更改为像这样引用 VBA...

VBA.STRING$(80,"=")

它似乎在 2007 年仍然有效。

Answer 3

从@barrowc 获取这一点：

本页特别提到 32 位 ActiveX 控件（两者
自定义和内置）不适用于 64 位版本的 Office
2010年。

我对此有一个部分解决方案 - 用嵌入图像的形状替换 ActiveX 按钮 - 您需要的一些答案可能位于 我给出的关于伪造“按钮点击”行为的答案

这是一项大量的工作，并且您正在从事件驱动的代码回归到能力较差的对象和过时的对象“分配宏”设计。但您至少可以保持工作表设计的视觉可用性。