No.1ベストアンサー
- 回答日時:
無力のため、いつもFind、FindNextには苦労するのですが、思い切ってあげてみます。
VBAの経験がおありなら、欠点は修正してもらえるかもと思って。標準モジュールに
Sub test01()
s = InputBox("検索文字列=")
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Worksheets
Set x = sh.Cells.Find(what:=s)
If x Is Nothing Then GoTo p1
MsgBox sh.Name & x.Address
b = sh.Name & x.Address
sh.Activate
x.Activate
'---
Do
Set y = sh.Cells.FindNext(after:=ActiveCell)
If y Is Nothing Then GoTo p1
If sh.Name & y.Address = b Then GoTo p1
MsgBox sh.Name & y.Address
y.Activate
Loop
p1:
Next
End Sub
シート名タブの左側のシートから探していきます。
上記はMggBoxで表示にしてますが、特別セルにセルアドレス値を出すなど適当に修正してください。
少数例でテストしてますが、十分テストしてください。
ありがとうございます。
カスタマイズは、させていただけるなら
させていただきます。
お忙しいところ、どうもありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) マクロVBAのフォルダ階層別で検索の方法 4 2022/04/03 23:23
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/11 12:55
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2022/08/04 13:56
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/06/04 09:39
- Excel(エクセル) 【Excel】指定のセル内容を基に別シートのセルを検索して選択する【VBA】 1 2022/06/16 16:16
- Visual Basic(VBA) エクセルのマクロとシートの保護について教えてください。 1 2022/10/18 08:36
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/01/25 11:42
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/24 08:33
- Excel(エクセル) VBA ふたつの同じ様式シートのセルをコピーしたい 2 2023/03/08 15:28
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2022/03/25 17:03
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
エクセルのマクロで全シートを検索したい
Excel(エクセル)
-
マクロでの全シート内検索
Excel(エクセル)
-
excel2010 マクロで複数シート検索し、一致した行をコピーしたい
Excel(エクセル)
-
-
4
Excel VBAでの全ワークシート検索について
Visual Basic(VBA)
-
5
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
6
Excel内での検索結果をシートに出力したい
Excel(エクセル)
-
7
Exel VBA 別ブックから該当データを検索し、必要なデータを取得する方法について
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
シャープのアクオス sh-m25 を...
-
excelの差込印刷で可視セルだけ...
-
エクセルVBAでの日付順のデ...
-
VBAの処理が途中で止まる
-
歯抜けの時間を埋めて行の挿入
-
エコウォッシュシステムの値段...
-
スマホで古いPCにテザリング
-
VBA 貼付先範囲(行)がいっぱ...
-
エクセルVBA 別シートの複数の...
-
複数条件に一致したデータを月...
-
VBA:同じ文字列データの比...
-
VBAで複雑な構成の転記
-
Excel で行を指定回数だけコピ...
-
ノートパソコン 2in1について i...
-
エクセルVBAで SendKeys "{TAB}"
-
vbaでコントロールブレイク
-
情報系の授業の課題なのですが...
-
LAVIE Direct DT PC-GD298ZZAL...
-
スマホ機種変更で旧機種のGoogl...
-
外付けHDDをフローリングに落と...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA 別シートの複数の...
-
Excel で行を指定回数だけコピ...
-
Excel VBA インデックスの境...
-
excelの差込印刷で可視セルだけ...
-
VBA:同じ文字列データの比...
-
VBA別シートの最終行の下行へ貼...
-
エクセル:VBAで月変わりで、自...
-
エクセルVBAで 2種のリストを...
-
歯抜けの時間を埋めて行の挿入
-
エクセルVBAで SendKeys "{TAB}"
-
VBAで条件が一致する行のデータ...
-
EXCELマクロで全シート対...
-
VBAの指示の内容 昨日こちらで...
-
Excel VBAでシート内全体に非表...
-
VBAで複数シート選択
-
Excelマクロ データが上書きさ...
-
Excel VBA 時刻でのD...
-
VBA 貼付先範囲(行)がいっぱ...
-
エクセルVBAでの日付順のデ...
-
【WORD差し込み印刷】複数レコ...
おすすめ情報