A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
VBAでよければ、
Sub sample()
Call ShapeText_Search("検索文字列")
End Sub
Sub ShapeText_Search(SearchText As String)
Dim Shp As Shape
Dim ShapeText As String
Dim pos As Long
For Each Shp In ActiveSheet.Shapes
If Shp.TextFrame2.HasText = msoTrue Then
ShapeText = Shp.TextFrame2.TextRange.Text
pos = InStr(ShapeText, SearchText)
If pos <> 0 Then
MsgBox ("図形名:" & Shp.Name & " の" & pos & "文字目以降に有ります")
End If
End If
Next
End Sub
(グループ化図形未対応)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
pdf上に描画した図形が印刷され...
-
PowerPointで台形を描く方法
-
線を組み合わせた図形の塗りつ...
-
Canvaの図形は、縦横比をキープ...
-
Excel のバージョンによって、...
-
AutoCADで渦巻きを描く方法
-
Illustratorでくくり括弧記号を...
-
ワードかエクセルの図形を使っ...
-
図形でしずく型を作りたい
-
エクセル ユーザーフォームに...
-
Excel2003図-扇形を書く方法は...
-
エクセルで図形を連動させたい
-
Jw-cad の図形リストが表示でき...
-
Excel 図形へのハイパーリンク
-
パワーポイントに貼り付けた画...
-
グーグルスプレッドシートの図...
-
エクセルVBAで図形のテキストを...
-
G.CREWの使い方
-
Excel2007で、図形の一部(一辺...
-
VBAによる図形位置判定
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PowerPointで台形を描く方法
-
pdf上に描画した図形が印刷され...
-
線を組み合わせた図形の塗りつ...
-
ワードかエクセルの図形を使っ...
-
グーグルスプレッドシートの図...
-
AutoCADで渦巻きを描く方法
-
Excel のバージョンによって、...
-
Canvaの図形は、縦横比をキープ...
-
エクセルで図形を連動させたい
-
図形でしずく型を作りたい
-
Excel 図形へのハイパーリンク
-
Illustratorでくくり括弧記号を...
-
エクセル ユーザーフォームに...
-
クリックしたらパネルがめくれ...
-
エクセルVBAで図形のテキストを...
-
WORDで図に網掛けする方法は?
-
Jw-cad の図形リストが表示でき...
-
Excel2003図-扇形を書く方法は...
-
G.CREWの使い方
-
ワードの基本図形で 角丸四角と...
おすすめ情報