Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


6820 / 76735 ←次へ | 前へ→

【75512】Re:VBAのタブストリップについて
質問  初心者  - 14/4/27(日) 8:31 -

引用なし
パスワード
   回答ありがとうございます。
問題なく追加する事ができました。

動的にタブストリップを追加する理由は、フォーム上にあらかじめ配置したコマンドボタンをクリックした際に、別フォームを呼ぶのではなく、フォームの横幅を広げて、そこにタブストリップを埋め込む仕様の為です。

また、追加で質問させて頂きたいのですが、動的に追加したタブストリップのタブ(ページ?)を移動した際にイベントを拾う事は可能でしょうか?

以下ではタブを移動してもイベントを拾いませんでした。

【ユーザーフォームに記述】
Dim ObjTab As msforms.TabStrip
Set ObjTab = UserForm2.Controls.Add("forms.tabstrip.1", "TabStrip1")
   With ObjTab
     .Left = 150 '表示位置(左基準)
     .Top = 50  '表示位置(上基準)
     .Height = 150 '表示位置(高さ)
     .Width = 330 '表示位置(横幅)
   End With

【クラスモジュールに記述】
Public WithEvents ObjTab As TabStrip
Private Sub ObjTab_Change()
MsgBox "sss"
End Sub

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

0 hits

【75509】VBAのタブストリップについて 初心者 14/4/25(金) 20:19 質問
【75510】Re:VBAのタブストリップについて γ 14/4/25(金) 21:42 発言
【75512】Re:VBAのタブストリップについて 初心者 14/4/27(日) 8:31 質問
【75513】Re:VBAのタブストリップについて γ 14/4/27(日) 10:00 発言
【75514】Re:VBAのタブストリップについて 初心者 14/4/28(月) 6:38 お礼

6820 / 76735 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free