
No.1ベストアンサー
- 回答日時:
コレ見る限り、多分
Sub hoge()
Dim i As Integer
For i = 1 To ActiveSheet.OLEObjects.Count
If ActiveSheet.OLEObjects(i).progID = "Forms.TextBox.1" Then
MsgBox ("テキストボックス見つかったよ")
End If
Next i
End Sub
という感じでprogIDプロパティを見るんだろうけど,
Forms.TextBox.1だけなのかは自信がない
僕は持ってないけどひょっとしたら他の人は
Forms.TextBox.2とかForms.TextBoxとかいうのが登録されているかもしれない。
この回答への補足
himajin100000様
回答ありがとうございます。
progIDというのがあるんですね、初めて知りました…。
勉強させていただきます!
No.2
- 回答日時:
シート上のコントロールのProgIdをワイルド検索し、
Forms.TextBoxを含むコントロールをテキストボックスと
判断し、カウントアップする。
Dim obj As Object
Dim txtCnt As Integer
txtCnt = 0
For Each obj In ActiveSheet.DrawingObjects
If obj.ProgId Like "Forms.TextBox*" Then
txtCnt = txtCnt + 1
End If
Next
この回答への補足
Hardking様
回答ありがとうございます。
himajin100000への回答にも書きましたが、
progIDというのがあるのを初めてしりました。
無事に値を取得できました。
ありがとうございました!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
今、見られている記事はコレ!
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
-
カスハラとクレームの違いは?カスハラの法的責任は?企業がとるべき対応は?
東京都が、客からの迷惑行為などを称した「カスタマーハラスメント」、いわゆる「カスハラ」の防止を目的とした条例を、全国で初めて成立させた。条例に罰則はなく、2025年4月1日から施行される。 この動きは自治体...
-
なぜ批判コメントをするの?その心理と向き合い方をカウンセラーにきいた!
今や生活に必要不可欠となったインターネット。手軽に情報を得られるだけでなく、ネットを介したコミュニケーションも一般的となった。それと同時に顕在化しているのが、他者に対する辛らつな意見だ。ネットニュース...
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
'ckbl' コントロールは作成され...
-
EXCELでactivexコントロールを...
-
Excel VBA で Richtextboxを使...
-
エクセル・VBA CheckBoxのオブ...
-
カメラスクロールするのを動画...
-
Groupboxの配下のコントロール...
-
コントロールを移動できない
-
ユーザーフォームで動的(Me.Con...
-
VBでアニメーションGIFを表示す...
-
DLL不要のソフト製作方法につい...
-
ActiveXコントロールはどこへい...
-
なかなか、Zオーダーが理解で...
-
OCXって何ですか?
-
ExcelVBAでListViewが使用できない
-
カレンダーコントロールの使用...
-
VB6.0 コマンドボタンを追加し...
-
DataGridView、1セルに複数コ...
-
フォーカスのあるコントロール
-
Excelコマンドボタン名を変数に...
-
VBAのフォームでTextBoxがいっ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBAでオプションボタン...
-
エクセル・VBA CheckBoxのオブ...
-
カメラスクロールするのを動画...
-
EXCELでactivexコントロールを...
-
VBA ユーザーフォームの Keypre...
-
'ckbl' コントロールは作成され...
-
ExcelVBAでListViewが使用できない
-
チェックボックスをオンにした...
-
ユーザーフォームで動的(Me.Con...
-
chr関数の呼び出しで「プロ...
-
全てのオブジェクトのプロパテ...
-
vb.netで画面のコントロールId...
-
間違えて配置してしまったコン...
-
Excel VBA で Richtextboxを使...
-
VBAのフォームでTextBoxがいっ...
-
OCXって何ですか?
-
C# Form上に配置されたコントロ...
-
エクセル コントロールツール...
-
変数をコントロール型で使用す...
-
Groupboxの配下のコントロール...
おすすめ情報