No.3
- 回答日時:
こんなところへ質問する前に、Googleででも「Find VBA」などで照会すれば、沢山記事が出ますので勉強してからにすべきでしょう。
http://officetanaka.net/excel/vba/cell/cell11.htm
VBAをやるならマクロの記録、WEB照会、手元のVBA書籍の記述参照はまず心がけなけばならないでしょう。
>Findメソッドは、引数Whatに指定した検索値が見つかった場合は、見つかったセル(Rangeオブジェクト)を返します。ただし、見つからなかった場合はNothingという特別な状態を返します
これを検知します。
ーー
・外に該当が複数ありえる場合は、FindNextを使う
・該当の最後まで検索されて後は、最初の該当分のセルに戻る。
ことを体験すること。後者の検知で検索は終わることになります。
>Sheets("Sheet1").Cells.Find("あああ").Offset(1, 0)
Offset利用は、まず該当のデータがあるセルをとらえて、その後次の行に記述したほうが良いと思う。
初心者の場合は余り複数のことを複合化した記述はしないほうが良いでしょう。
No.1
- 回答日時:
一例です。
Set wk = Sheets("Sheet1").Cells.Find("あああ")
If wk Is Nothing Then Exit Sub
Sheets("Sheet3").Range("A1") = wk.Offset(1, 0)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Excel(エクセル) 並べ替え、ソートの構文がわからない。 お世話になります。VBA超初心者です。 エクセルでワークシート 2 2023/06/28 21:00
- Visual Basic(VBA) ExcelVBAでDo Until loopのネスト、IF文を使って一致する物と一致しない物としたい 11 2022/12/24 17:46
- Visual Basic(VBA) VBA初心者です 検索した数字の行に色をつける 5 2023/02/13 14:22
- Visual Basic(VBA) VBA For Each 〜 複数条件について 3 2022/10/20 20:05
- Visual Basic(VBA) まとめシートから集計シートへA列のコードが一致したら1行コピーするマクロをネット上で見つけました。こ 1 2022/08/30 14:11
- Visual Basic(VBA) findメソッドの変数について 6 2023/06/23 08:01
- Visual Basic(VBA) vbaのvlookup関数エラー原因を教えていただけないでしょうか。 3 2022/04/25 16:16
- Excel(エクセル) VBAのoffsetの動き方について教えてください 3 2022/11/25 23:36
- Excel(エクセル) 格納したデータを配列のように扱う方法はありますか? 8 2023/06/05 08:53
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
excelのマクロで該当処理できなければ飛ばして進むにはどうすればよいのでしょうか
Visual Basic(VBA)
-
EXCEL VBA 指定したファイルが存在しない場合メッセージボックスを表示させる
Access(アクセス)
-
【EXCEL】【VBA】空欄は飛ばして処理する方法を教えて下さい。
Excel(エクセル)
-
-
4
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
5
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
6
UserForm1.Showでエラーになります。
工学
-
7
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
8
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
9
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
10
vba 2つの条件が一致したらコピーして別シートに値のみ貼り付け
Visual Basic(VBA)
-
11
EXCEL VBA で指定した範囲に入力があるかどうか?
Visual Basic(VBA)
-
12
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
13
【EXCEL VBA】Range(A:A").Find(What:="キーワード")の1行目について"
Visual Basic(VBA)
-
14
ファイルが見つからない時、スルーしたい。
Visual Basic(VBA)
-
15
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
16
【vba】指定範囲の中に任意の文字があるときの条件分岐
Excel(エクセル)
-
17
エクセルVBAのIf,Then 構文でOr条件とAnd条件の結合方法?
Excel(エクセル)
-
18
テキストボックスの番号を使ったFor~Next文について
Visual Basic(VBA)
-
19
VBA 該当データがない時 エラーメッセージを表示
Visual Basic(VBA)
-
20
【Find関数】あるのに見つからない。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
Excel内での検索結果をシート...
-
エクセル 数字をすべて○などの...
-
クリックすると文章が表示され...
-
Excel ハイパーリンクのURLを別...
-
Excelで、図形内の文字をセルに...
-
現在のセルの位置を返す関数は...
-
フォントの色を指定して削除出...
-
Excelでセルをクリックす...
-
太字に設定されているセルの個...
-
エクセルでPDFリンクを大量...
-
エクセルマクロ 赤色の文字を検...
-
セル背景や文字を点滅させる方法
-
空白セルを空セルに置き換える...
-
ページ内ハイパーリンクの表示...
-
Excelで挿入した図をセルの中央...
-
【EXCEL】先週の月曜日の日付を...
-
エクセルでページ数をあるセル...
-
エクセル 未入力セルがあると...
-
excelで セルの移動時に...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
Excelで、図形内の文字をセルに...
-
マクロを実行すると画像がズレ...
-
クリックすると文章が表示され...
-
Excelでセルをクリックす...
-
Excelで挿入した図をセルの中央...
-
太字に設定されているセルの個...
-
現在のセルの位置を返す関数は...
-
セルがクリックされた回数をカ...
-
エクセルでの検索ボックスの作...
-
Excel ハイパーリンクのURLを別...
-
エクセルでPDFリンクを大量...
-
Excel2007 色のカウント (VBA)
-
フォントの色を指定して削除出...
-
【EXCEL】先週の月曜日の日付を...
-
VBA 見つからなかった時の処理
-
エクセルでページ数をあるセル...
-
空白セルを空セルに置き換える...
おすすめ情報