人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

エクセルの質問です。
ユーザーフォーム上に配置されたmultimenuのタブを変更したいのですが、変更したタブの保存方法が分かりません。
Private Sub CommandButton11_Click()

MultiPage1.page3.Caption = TextBox1

End Sub

当然変わるんですけど、いったん終了すると次はまた同じデフォルトのものになってしまいます。

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


●質問者: clinejp
●カテゴリ:コンピュータ インターネット
✍キーワード:sub エクセル デフォルト ユーザー
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● s-n-k
●60ポイント

質問の内容ですが、

  1. CommandButton11 がクリックされたときに、TextBox1 に設定されている文字列を MultiPage1.page3.Caption に設定する。
  2. Excel を終了しても次回起動時にその値を引き継ぐ

ということでしょうか?

その場合、設定した値を Excel のセルやファイルなどに保存しておいて、次回起動時に内容を復元するという方法が良いと思います。大まかなイメージは以下のようになります。

Private Sub CommandButton11_Click()
 MultiPage1.page3.Caption = TextBox1.Text
 Sheets(1).Range("A1").Value = TextBox1.Text
End Sub

のようにしておいて、以下のような感じで次回起動時に元の値に復元すると良いと思います。

' ThisWorkbook の中に書く
Private Sub Workbook_Open()
 MultiPage1.page3.Caption = Sheets(1).Range("A1").Value
 TextBox1.Text = Sheets(1).Range("A1").Value
End Sub

Workbook_Open についてはこの辺りが参考になると思います。

http://www.asahi-net.or.jp/~ef2o-inue/vba_k/sub04_130_04.html

◎質問者からの返答

大変ありがとうございます。

動的にマクロがかけるようなものですね。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ