質問: ### 前提・実現したいこと ここに質問の内容を詳しく書いてください。 (例)64Bitで32Bitのソフトを動かしたい。(当方VBAに関して全くの無知です。) ソフトを開いたときに以下のエラーメッセージが発生しました。 ### 発生している問題・エラーメッセージ コンパイルエラー このプロジェクトのコードは、64ビットシステムで使用するために更新する必要があります。 →DeclareステートメントにPrtSafe 属性を設定しVBAProjectのコンパイルを実行。 →コンパイルエラー プロパティーの使い方が不正です ``` Public Sub BtnBarActive() Application.CommandBars(m_sBtnName).Visible End Sub ``` .Visible の部分がマーカーが引かれているのですが 次はどうすればいいのでしょうか? ### 補足情報(FW/ツールのバージョンなど) ここにより詳細な情報を記載してください。
回答: 追記された情報だと32bitソフトを64bitで使うのとは関係ないですね。 VisibleプロパティにはTrueかFalseの値を渡す必要があります。 コマンドバーを表示させたいならTrueを渡せばいいですね。 ``` Public Sub BtnBarActive() ' コマンドバー表示 Application.CommandBars(m_sBtnName).Visible = True ' コマンドバー非表示 Application.CommandBars(m_sBtnName).Visible = False End Sub ```