次の方法で共有

以前動いていたExcelVBAが、実行時エラー'5'

Anonymous
2019-08-29T01:08:09+00:00

以前動いていたExcelVBAが、突然実行時エラー'5'が出て動かなくなりました。

また、このVBAは端末によって正常に動いたり動かなかったりします。

①動作した環境

・Windouws10、Excel2016

・Windows2008Server、Excel2010

②動作しなかった環境

・Windouws10、Excel2013

・Windouws10、Excel2016

問題のコードは以下になった。

Dim a() as Variant  

 a = Array()  ⇐ここで実行時エラー'5'になります。

よろしくお願いいたします。

開発者テクノロジ | Visual Basic for Applications

ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント コメントはありません

質問作成者が受け入れた回答

Anonymous
2019-08-29T05:01:24+00:00

8月の月例パッチの不具合ですね。

Array型を関数の引数にしたりVariant型に代入したりするとエラーになります。

https://forest.watch.impress.co.jp/docs/news/1200792.html

http://blog.livedoor.jp/nichepcgamer/archives/1075495666.html

Win10の1903以外は、既に修正パッチは配布されてますので

再度WindowsUpdateしたら直ると思います。

1903は8月下旬に出すと言ってましたがまだ配布されてないですね。

この回答は役に立ちましたか?

2 人がこの回答が役に立ったと思いました。
0 件のコメント コメントはありません

3 件の追加の回答

並べ替え方法: 最も役に立つ
  1. Anonymous
    2019-09-09T07:06:30+00:00

    2019年8月31日リリースのKB4512941をインストールして、解決できました。

    ご協力、ありがとうございました。

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません
  2. Anonymous
    2019-08-29T02:07:10+00:00

    > a = Array()  ⇐ここで実行時エラー'5'になります

    そもそも、Array関数で『引数 無し』は 【構文エラー】ですよ。

    Array 関数

    配列が格納されたバリアント型 (Variant) の値を返します。

    構文

    Array(arglist)

    引数 arglist は、必ず指定します。

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません
  3. Anonymous
    2019-08-29T01:12:29+00:00

    バージョンを跨いでいるので、Officeの仕様の違いが原因な気がしますね。
    念の為windowsとofficeが最新であることを確認して、またofficeを修復できますか?
    https://support.office.com/ja-jp/article/office...

    もし技術的なことが原因であれば、下記のVBAフォーラムにもご投稿下さい。
    https://social.msdn.microsoft.com/Forums/ja-JP/...

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません