VBA快速打开Excel常用文件

工 作 中经 常用 到 的 软 件 。对 于经 常 使 用 Ｅ ｃｌ 朋 友 来 说 ， 有 ｘｅ的
一
些 文 件 是 会 被 经 常 打 开 来 修 改 或 查 找 信 息 的 ， 可 以 从 Ｅ ｃｌ ｘｅ
的 “ 件 ”菜 单 中 找 到 用 户 最 近 打 开 的 若 干 个 Ｅ ｃｌ 件 。 但 文 ｘｅ 文
—
Ｄｉ ｔ ｏ ｍ ａ ｄ ｒ ｎ ｒ ｍ ｂｎＡｓ Ｃ ｍ ｎ ＢａＣｏ ｔｏｆ Ｓ ｔｔ ＝ Ｃｏ ｍａ ｄ ａ ｓＡｄ ｅ ｂ ｎ ｒ ｎ Ｂ ｒ． ｄ
Ｆ ｒｊ １Ｔｏ７ ０ ｏ ＝ ７ Ｓ ｔｂ ｎ＝ ｔ ． ｎｒ ｌ． ｄ ｅ ｔ ｂＣｏ ｔｏｓＡｄ ｂ ｎＦ ｃ Ｉ ＝ ｊ ｔ ．ａ ｅ ｄ ｂ ｎＴｏ ｔｐ ｅ ｔ＝ “ａ ｅｄ ： “ ｉ ｔ ． ｏｔ Ｔ ｘ ｉ Ｆｃｌ ＆ Ｎｅ ｔ ｘ
—
程 序 运 行无 误 ，再 在 这 两 个过 程 中 调用 创 建 和删 除 自定 义 菜单 的过程就可以了。 （ ）考 虑 到 要 添 加 的 自定 义 菜 单 下 的菜 单 项 以后 可 能 会有 ２ 所 变化 ，为 了减少 对程 序 的修 改 ，可 以将 菜单 的 信息 （ 例如 菜单 项 名 、热键 、菜 单 项 的 图 标 、要 打 开 的 文件 等 等 ）放 在 工 作表
加载宏 。
如 果 能 向 菜 单 中 添加 一 个 新 菜 单 ，菜 单 下 面 列 出一 些 常 用
的 文 件 ， 当点 击 菜 单 时 ，可 以打 开 相 对 应 的 Ｅ ｃｌ 件 ，这 个 ｘｅ 文 问题 就 可 以很 好 地 解 决 。 除 了 自定 义菜 单 打开 常用 文件 的 功 能 之 外 ．一 个 界 面 良好
Ｓ ｂ ｓ ｏ ａ ｅ｝ ｕ ｈ ｗｆ ｃ （
Ｄｉ ｉ ｍ ％ Ｄｊ ｔ ｍ ｍａ ｄ ａ ｍ ｂＡｓＣｏ ｎ Ｂ ｒ
闭 文 件 或 退 出 Ｅ ｃｌ ，要 删 除 自定 义 的 菜 单 ， 可 以 在 Ｗｏｋ ｘｅ 时 ｒ
ｂｏ ｏｋ
—
Ｂ ｆｒＣｏｅ事 件 中 调 用 删 除 菜 单 的 过 程 。 这 样 就 保 证 了 ｅｏｅ ｌ ｓ
（ ）加 载 宏 在运 行 时 其 工 作 簿 窗 口是 隐 藏 的 ．因 此 普 通 用 户 并 ３
不 会 感 觉 到 它 的存 在 。
３ 实 施 方 法
３ １ 关键 技术 ．
（ ） 在 Ｍｉ ｏｏ ｘｅ １ ｃ ｓｆＥ ｃｌ中 ，菜 单 栏 被 视 为 是 一 种 可 编程 对 ｒ ｔ 象 ，是 Ｃ ｍ ｎ Ｂ ｒ对 象 中 的 一 部 分 。 所 以 可 以 使 用 Ｃ ｒ ｏ ｍａｄ ａ ｏ． ｎ
Ｆ ｃｌ 属 性 指 定 菜 单 项 的 图 标 ，用 Ｏ Ａｃｏ ａｅＤ ｎ ｔ ｎ属 性 指 定 单 击 菜 ｉ 单 项 后 的 行 为 ，还 可 以 用 Ｓ ｏ ｃｔｅｔ 性 为 自定 义 的 菜 单 项 ｈｒ ｕ ｘ 属 ｔ Ｔ
设 置 快 捷键 。
图２
这 里 的 编 号均 为 Ｅ ｃｌ 的 内 置 图标 的 Ｉ ｘｅ中 Ｄ，在 后 面 的 叙 述 中 有 获 得 此 Ｉ 号 的 程 序 ； “ 件 路 径 ” 是 指 要 打 开 的文 件 路 径 及 Ｄ 文 文件名。
。
、 快速打开 Ａ
曩曩 蠢 曩囊萎 。 誊 蠹 麓 曩
常用文件
曩 ≤ 薯
ｉ 叠 ｊ
摘 要 ：利 用 Ｖ Ａ编 程在 Ｅ ｃｌ 系统 菜单 上 生成 一 个 “ 用 文件 ” 的 自定 义菜 单 ， 实现 了快速 Ｂ ｘｅ的 常
打 开 经常 用到 的 Ｅ ｃｌ 件的 目的 。 ｘｅ文 关键 词 ：Ｅ ｃｌ；Ｖ Ａ ； 自定 义菜单 ；文件 ｘｅ Ｂ
同 的 ， 即打 开某 个 文 件 ，所 以 可 以 用 一 个 带 参 数 的 过 程 来 执 行 打 开 文 件 的 操 作 。把 要 打 开 的 文 件 名 作 为 过 程 的 参 数 ，这 样 就 用 一 个 程序 实现 了点 击 不 同 的 菜单 打开 不 同 的 文 件 的 目的 。 （ ）关 于子 菜 单 的 图 标 。 为 每 个 不 同 的 子 菜 单 添 加不 同 的 ４ 图标 ，可 以 使 自定 义 菜 单 更 加 美 观 和专 业 化 。 只 要 为 每 个 子菜
通 过 菜 单 栏 名 称 或 索 引 值 对 其 进 行 引 用 ：Ｃ ｍ ｎＢｒ ｏ ｍａｄ ａｓ
（Ｗｏｋｈｅ Ｍ ｎ ａ” “ ｒｓｅｔ ｅ ｕＢ ｒ）或 Ｃ ｍ ｎ Ｂ ｒ １。 ｏ ｍａ ｄ ａｓ（）
（ ） 新 添 加 的 自 定 义 菜 单 是 一 个 弹 出 式 控 件 ． 其 类 型 ２ （ ｐ 性 ）为 ｍ ｏ ｏ ｔ ｌｏ ｕ 。创 建 菜 单 时 ，通 过 Ｃ ｍｍ ｎ ． ｔ ｅ属 ｙ ｓＣ ｎｒ Ｐ ｐｐ ｏ ｏ ａｄ Ｂ ｒ Ａ ｄ方 法 向 Ｃ ｎｒｌ集 合 中 添 加 菜 单 。使 用 Ａ ｄ方 法 的 ａ的 ｄ ｏｔ ｓ ｏ ｄ
加新菜单。
在 菜 单 中 的文 字 ， “ 捷 菜 单 ”指 定 了菜 单 的 热 键 ，在 打 开 主 快 菜 单 的 时候 ，按 下 对应 的字 母 键 就 相 当 于点 击 了相应 的菜 单 。 “ 片 编 号 ” 是 指 在 菜单 文 字 左 边 显 示 的 图 标 （ 图 １ ， 图 如 ）
图 ｌ 示 所
加 载 宏 是 一 种 可 以 扩 展 Ｅ ｃｌ ｘｅ 的功 能 的 程 序 ， 它 与 Ｅ ｃｌ ｘｅ 的 内置 功 能 一 致 ，是 为 Ｅ ｃｌ 供 自定 义命 令 或 自定 义 功 能 的 ｘｅ 提 补 充 程 序 。 加 载 宏有 以下 优 点 ： （ ）加 载 宏 对 所 有 打 开 的 Ｅ ． １ ｘ ｃｌ 件 都 生 效 而 普 通 工 作 簿 的 代 码 一 般 只 在 特 定 的工 作 簿 中 ｅ文 才 生 效 。 （ ）加 载宏 不 受 宏 安 全 级 的 限 制 ，也 不 会 有 宏 运 行 ２ 的 提 示 。 即使 将 安 全 级 设 为 “ 常 高 ” 非 ，加 载宏 就 象 Ｅ ｃｌ ｘ ｅ 本 身 固有 的功 能 一 样 工 作 。 同样 ，它 也 不 会 被 按 住 的 Ｓ ｉ 屏 蔽 。 ｈｔ ｆ
３２ 其他 需要 考虑 的问题 ．
（ ） 为 了 让 被 添 加 的 自定 义 菜 单 在 打 开 文 件 时 就 可 以使 １ 用 ，可 以在 Ｗｏｋ ｏｋ Ｏ ｅ ｒｂ ｏ— ｐｎ事 件 中 调用 创 建 菜 单 的过 程 ，在关
５ 程 序 编 写
（ ）编写 一 个 获 取 图标 Ｉ 的程 序 １ Ｄ 下 面 的程 序 可 以将 图标 显示 在 一 个 工 具栏 上 。
（ ） 菜 单 下 ຫໍສະໝຸດ 菜 单 项 是 若 干 命 令 按 钮 ，其 类 型 （ ｐ 属 ３ ｔｅ ｙ
性 ）为 ｍｓＣ ｎｒｌｕｔ 。在 创 建 菜 单 项 时 ，可 以用 Ｔ ｐ 属 性 ｏｏｔ Ｂｔｎ ｏ ｏ ｙｅ 指 定 的 控 件 类 型 ，用 Ｃ ｐｉ ａ ｔｎ属 性 指 定 菜 单 的 名 称 和 热 键 ，用 ｏ
ｔ． ａ ｂ Ｎ ｍｅ＝（ 标 （— ７ ） “ 图 １ ７ ０“ ）
ｔ ． ｉｔ ＝ ８ ０ ｂＷ ｄ ｈ ２ ｔ ．ｏ ＝ １ Ｏ ｂＴ ｐ ５
中 ，用 程序 来 读取 这些 信 息 。这样 ，不 用 修改 程 序本 身 而只 修改 工 作表 中菜 单 项 的信息 表 就可 以达 到 修改 自定 义 菜单 的 目的。 （ ）点 击 每个 菜 单 项 要 打 开 的 文 件 不 同 ，但 要 做 的 事 是相 ３
Ａ ｐｉ ｔ ｎ 应 用 程 序 中 的 Ｖ ｓａ Ｂ ｓ ） ｐ ｌ ａ ｏ ｓ（ ｃｉ ｉ ｌ ａｉ ，是 新 一 代 标 准 宏 语 ｕ ｃ
‘
… １
，
＾
‘
ｔ
‘
…
实用第一 智慧密集
… … … … … … …
同 时 可 以用 ｔ ｅ 性 指 定 控 件 的 类 型 、用 Ｉ 属 性 指 定 内置 控 ｙ 属 ｐ Ｄ 件的Ｉ Ｄ号 、用 ｂｆｒ 属 性 指 定 菜 单 的位 置 ，用 ｔｍ ｏａ ｅｏｅ ｅ ｐ ｒ ｙ属 性 ｒ 指 定 菜 单 否 是一 个 临 时 控 件 。 添 加 自定 义菜 单 时 可 以 指 定 新 菜 单 的 位 置 。 如 果 不 指 定 ． 则 会 在 菜单 工具 栏 末 尾 添 加新 菜单 。也 可 以把 自定 义 菜单 添加 到 某 一 个 系 统 菜 单 之 前 ，可 以使 用 Ｆｎ Ｃ ｎｒｌ 法 查 找 要 指 ｉｄ ｏ ｔ 方 ｏ 定 系 统 菜单 。若 指 定 的 菜 单不 存 在 ，则 在 工 作 表 菜 单 栏 末 尾 添
的 菜 单 要 像 Ｅ ｃｌ 序 中 的 菜 单 一 样 ，其 中有 菜 单 和 菜 单 项 ， ｘｅ 程 自定 义 菜单 与 系统 菜 单 之 间 、各 个 菜单 项 之 间 都 应 有 互 相 不 冲 突 的菜 单 快 捷 键 ，菜 单 项 还 要 有 一 些用 来 美 化 界 面 的 图 标 ．如
Ｖ Ａ 易 于 学 习 掌 握 ， 可 以 使 用 宏 记 录 器 记 录 用 户 的各 种 操 作 Ｂ 并 将 其 转 换 为 Ｖ Ａ 程 序 代 码 。这 样 用 户 可 以容 易 地 将 日常 工 Ｂ
作 转 换 为 Ｖ Ａ 程 序 代码 ，使 工 作 自动 化 。 由于 Ｖ Ａ 可 以直 接 Ｂ Ｂ 应 用 Ｏ ｉｅ套 装 软 件 的 各 项 强 大 功 能 ．所 以对 于程 序 设 计 人 员 ｆｃ 的程 序 设 计 和 开 发 更 加方 便 快捷 。
是 这 种 方 法 有 两 个 局 限性 ： （ ）文 件 数 量 有 限制 ； （ ）不 能 １ ２ 将 经 常 要 用 到 的 某些 文件 固定 下来 。
（ ） 由 于 自定 义 菜 单 的 目 的是 在 运 行 Ｅ ｃｌ 任 何 时 候 都 ２ ｘｅ 的 可 以 打 开 常 用 的 文 件 ．并 且 看 起 来 像 是 Ｅ ｃｌ自 己 的 菜 单 一 ｘｅ