こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Excel VBA コントロールの追加方法

こんにちわ
おわかりになるかた、教えてください。

ExcelVBA で、下記の様な方法でラベルコントロールを追加できるのですが、
ステータスバーとリストビューを追加する方法がわかりません。

set myControl = myForm.Designer.Controls.Add("Forms.Label.1")

追加したいステータスバーは下記となります。
Microsoft StatusBar Control, version 6.0
Microsoft ListView Control, version 6.0

よろしくおねがいいたします。

投稿日時 - 2009-09-26 00:02:25

QNo.5319070

暇なときに回答ください

質問者が選んだベストアンサー

Microsoft StatusBar Control, version 6.0 が "MSComctlLib.SBarCtrl.2"
Microsoft ListView Control, version 6.0 が "MSComctlLib.ListViewCtrl.2"
です。
調査方法で比較的簡単そうなのは、試しにWorksheet上に手作業でコントロールを追加してみる事です。
([コントロールツールボックス]の[コントロールの選択]から)
数式バーにオブジェクト種別が出ます。それぞれ
=EMBED("MSComctlLib.SBarCtrl.2","")
=EMBED("MSComctlLib.ListViewCtrl.2","")
となります。
(※環境によっては変なコントロールを追加するとExcelがいきなり落ちたりしますから注意)

あとはレジストリエディタから探る方法もあるかと思います。

投稿日時 - 2009-09-27 15:48:22

お礼

ありがとうございます!
おかげさまで、実現することができました。

調べ方まで教えていただき、本当にありがとうございます。
感激です。

投稿日時 - 2009-09-27 20:42:36

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問