
No.1ベストアンサー
- 回答日時:
TypeName関数を使ってみてください。
'--------------------------------------
Private Sub CommandButton1_Click()
Dim myCtrl As Control
For Each myCtrl In Me.Controls
Select Case TypeName(myCtrl)
Case "TextBox"
myCtrl.BackColor = RGB(255, 0, 0)
Case "Label"
Case "ListBox"
myCtrl.BackColor = RGB(0, 255, 0)
Case "CheckBox"
Case "ComboBox"
Case "CommandButton"
End Select
Next myCtrl
End Sub
'------------------------------------------
勘違いでしたらご容赦願います。
以上ここまで。
No.2
- 回答日時:
シートにコントロールのタイプと名前をリストアップします。
(フォームにページやタブを使用した場合までの確認はしていません。)
参考までに(対象はUserForm1にしてあります)
Sub test()
Dim c As Control, r As Long
Load UserForm1
r = 3
Cells(1, 1) = ("コントロール数:" & UserForm1.Controls.Count)
Cells(2, 1).Value = "No"
Cells(2, 2).Value = "名前"
Cells(2, 3).Value = "種類"
For Each c In UserForm1.Controls
Cells(r, 1).Value = r - 2
Cells(r, 2).Value = c.Name
Cells(r, 3).Value = TypeName(c)
r = r + 1
Next c
End Sub
わざわざ、表を作るプログラムまで教えて下さり、ありがとうございました。
お礼は、早い順に付けたので10ptになってしまいましたが、
感謝の気持ちは20ptの人と同様です。
また、お願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
ユーザーフォームで動的(Me.Controls.Add)に作成したコントロールの削除
Visual Basic(VBA)
-
変数をコントロール型で使用する方法
Visual Basic(VBA)
-
VBA:ユーザーフォームのマルチページに色を付けたい。
Word(ワード)
-
-
4
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
5
エクセルVBAでmeに相当するものは?
Excel(エクセル)
-
6
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
7
どこにもフォーカスを当てたくない
Access(アクセス)
-
8
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
9
TextBoxコントロールを引数として渡すには?
その他(教育・科学・学問)
-
10
VBA 変数名に変数を使用したい。
Visual Basic(VBA)
-
11
Excel vba ListBoxについて
Excel(エクセル)
-
12
ListView 項目の選択/選択解除について
Visual Basic(VBA)
-
13
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
14
オブジェクト型の変数にフォームを入れたい
Visual Basic(VBA)
-
15
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
16
VBAでのユーザフォームの表示有無の確認について
Visual Basic(VBA)
-
17
excelのInitializeイベントとActivateイベントについて
Excel(エクセル)
-
18
リストビューをスクロールさせるには
Visual Basic(VBA)
-
19
ユーザーフォームをホイールでスクロールする方法(Excel2000VBA)
Excel(エクセル)
-
20
コントロールの存在確認
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ExcelVBAのコントロールの種類...
-
VBA ユーザーフォームの Keypre...
-
WEBユーザーコントロール
-
Shapeコントロールの.NET移行方法
-
chr関数の呼び出しで「プロ...
-
'ckbl' コントロールは作成され...
-
カメラスクロールするのを動画...
-
Webカスコンってなんですか?
-
コンポーネント名を変数で指定
-
シートに2つ以上のActiveXコン...
-
EXCELでactivexコントロールを...
-
ControlTipTextの書式設定(Font...
-
エクセル・VBA CheckBoxのオブ...
-
VB.net webアプリケーションで...
-
エクセル IEをコピーし貼り付け...
-
WinAPIで電卓をクリック
-
VB6でシリアルポートの制御
-
エクセルVBAで2種類のCheckbox...
-
C# タブのコントロール取得
-
OCXって何ですか?
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelVBAのコントロールの種類...
-
EXCELでactivexコントロールを...
-
ExcelVBAでListViewが使用できない
-
'ckbl' コントロールは作成され...
-
カメラスクロールするのを動画...
-
VBA ユーザーフォームの Keypre...
-
vb.netで画面のコントロールId...
-
エクセル・VBA CheckBoxのオブ...
-
chr関数の呼び出しで「プロ...
-
エクセルVBAでオプションボタン...
-
Groupboxの配下のコントロール...
-
エクセル コントロールツール...
-
Labelコントロールの(左右)余...
-
チェックボックスをオンにした...
-
Excel VBA で Richtextboxを使...
-
アクセス特有の書き方?
-
(VBA)スピンボタンの大量...
-
ActiveX DLL と ActiveXコント...
-
C# ユーザコントロール内のボタ...
-
Excel VBA 動的に作成したチェ...
おすすめ情報