突然Excelのマクロファイルが読み込めなくなりました。

先に質問したUPRですがエラーメッセージの画面コピーがどういうわけか届いていたかったので改めてエラーメッセージを書きます。

マクロファイルを読み込むと

「***.xlsmファイルの一部の内容に問題が見つかりました。可能な限り回復しますか?」

のメッセージが出て「はい」を選択すると,マクロが削除されてしまい,マクロが動かなくなってしまいます。

今まで作成されたどのマクロファイルも同じです。業務に支障が出て大変困っています。(4月14日?以降にOSやOFFICEのアップデータがあってからかも)

現在の各バージョンは以下の通りです。

Excelのバージョン 2016 MSO(16.0.12624.20422)32ビット

OSのバージョン  Win10 (1909)ビルド 18363.778

解決方法をご教授ください。

回答
回答

何やら、直近のアップデートでVBAが変なことになっているようですね。
全てのマクロブックが被害を受ける訳でもないようです。

わたしも Excel2010 でやられました(Excel2016は1月から更新を止めてたので今回は被害なし)

(4/25 11:00) ※ 発生条件が判明しました ※ 2頁目のレスを参照してください


> 4月14日?以降にOSやOFFICEのアップデータがあってからかも
> Excelのバージョン 2016 MSO(16.0.12624.20422)32ビット
そのアップデート以前までは問題なかったのならば、
その一つ前の16.0.12624.20382 へロールバックすることで回避できると思います。
https://docs.microsoft.com/ja-jp/officeupdates/update-history-office365-proplus-by-date


ロールバック後は、アカウント>更新オプションで「更新を無効」にします。

※ 下記 ロールバックによる対処法は C2R (Click to Run)版が対象です。

  MSI 版(インストーラ形式)の場合はKB のアンインストールで対処します。

  尚、ストアアプリ版も対象外です。

以前のバージョンの Office に戻す方法
https://support.microsoft.com/ja-jp/help/2770432/

もしくは、直接コマンドプロンプトを打ち込んでもできます。
「コマンドプロンプト」を管理者として実行し、下記の二つのコマンドを実行し

ます。
   cd %programfiles%\Common Files\Microsoft Shared\ClickToRun

   officec2rclient.exe /update user updatetoversion=16.0.12624.20382

   (補) Office2013 の場合、アップデートツールのフォルダが異なる為、

    下記のコマンドになります( 32bit-Windows の場合、ClientX64⇒ClientX86 )

       cd %programfiles%\Microsoft Office 15\ClientX64
       officec2rclient.exe /update user updatetoversion=15.0.5223.1001





> 「はい」を選択すると,マクロが削除されてしまい,マクロが動かなくなってしまいます。

「回復」で壊されてしまったワークブックは元には戻せませんから、
バックアップなどがあれば、それから復旧するしかないでしょう。

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
【 参 考 】バージョン別 関連スレッド

-- Excel2016/2019 & Excel365 --
突然Excelのマクロファイルが読み込めなくなりました。
http://answers.microsoft.com/thread/dd6f9ed9-39c0-40b3-b268-3bb22c289876

-- Excel2013 --
Microsft Visual of Application システムエラー
http://answers.microsoft.com/thread/13c25236-bb2f-40be-94aa-acec1b3b0add

-- Excel2010 --
office2010 windows10 日本語VBAエラー
http://answers.microsoft.com/thread/39a174c5-0390-4a4c-8ecd-2d7efbd7ad6e

この回答は 27 人の役に立ちました

·

この回答で問題は解決しましたか?

役に立ちませんでした。

回答としてマークしていただきありがとうございます。

この返信の満足度をお教えください。

フィードバックをお送りいただきありがとうございます。今後のサイト改善に役立てて参ります。

この回答の満足度をお教えください。

フィードバックをお送りいただきありがとうございます。

 
 

質問情報


最終更新日 2020年9月11日 表示 17,250 適用先: