マクロを登録したボタンの表示を変更するマクロ

かなり難易度が高いと思いますが、Excelのマクロでこんなことできませんか？
Excelのボタン（表示名：ファイル取り込み）にあるマクロを登録し、このマクロを実行するとファイル選択ウインドウが開き、ここでフルパス指定（仮にc:\aaa\bbb.xls）であるファイルを選択する。
すると、ボタンの表示が”参照ファイル”に変わり、参照ファイルをクリックするとc:\aaa\bbb.xlsが別Windowオープンになる。

No.3 ベストアンサー 回答者： happypoint 回答日時： 2003/06/14 23:39

VBEにて、該当するシートの、シートモジュールに、

つぎのコードを貼り付けてください。
いちおう、ボタン名の初期値は「ファイル取り込み」と表示されていることを想定しています。


Option Explicit

Private Sub CommandButton1_Click()

Select Case CommandButton1.Caption
　Case Is = "参照ファイル"
　　CommandButton1.Caption = "ファイル取り込み"
　Case Else
　　CommandButton1.Caption = "参照ファイル"
End Select

End Sub

この回答へのお礼

ありがとうございました。
ボタンの表示は切り替わりました。
後は自分でできると思いますので、質問は打ち切ります。

お礼日時：2003/06/15 09:08

No.4 回答者： happypoint 回答日時： 2003/06/14 23:48

#2、#3です。

補足です。

いちおうjoe7jpさんの希望に近い形でコードを提示しましたが、
基本的には#1さんがおっしゃっているように、
ボタンは２つに分けた方がいい（機能的）ような気がします。

理由は使いこんでみるとわかると思います。
そっちの方が便利なんですよね。

No.2 回答者： happypoint 回答日時： 2003/06/14 14:59

「ボタン」といってもいくつも種類があります。

どのような形で書かれたボタンでしょうか。
1.ユーザーフォームのCommandButton
2.ワークシート上に「コントロールツールボックス」ツールバーで作成したCommandButton
3.ワークシート上に「フォーム」ツールバーで作成したCommandButton
4.ツールバー/メニューバーにユーザー定義ボタンとして登録したコマンドボタン

この回答への補足

2.ワークシート上に「コントロールツールボックス」ツールバーで作成したCommandButton 　　です。

言葉足らずで申し訳ありませんでした。
時間がありましたら回答のプログラムを教えてください。

補足日時：2003/06/14 22:12

No.1 回答者： Neko-chan 回答日時： 2003/06/14 03:24

こんにちわ。

　たぶん、問題なくできると思いますよ。
　実現方法の一つとして、ボタンは２つあって
　Visible,Enableでコントロールする　とか。