プログラミング入門としてVBAを勉強したい方へ

Excel VBAはプログラミング初心者におススメな言語です。

今回の解説

・Find

値の検索について

今回は値の検索について解説していきます。

値の検索とはセルに入力されている値を検索する命令でショートカットキーの「Ctrl と F」の操作と同様のものになります。

検索する種類にはいくつかの方法がありますが、今回は一番シンプルかつ一番使われるであろう検索方法をお伝えし、まとめの項に他にも使われる検索種類を記載します。

今回の目標：こんにちはと入力されているセルを検索する

・マクロ実行前

・マクロ実行後

ここから実践

１.開発タブのvisual Basic Editorをクリックしましょう
（Alt + F11のショートカットでも表示させられます）
開発タブが表示されていない方は【Excel VBA超初心者】～開発環境の準備～を参考にしてください

2.メニューバーの挿入タブをクリックしましょう

3.挿入メニュー内の標準モジュールをクリックしましょう

4.エディターの1行目にSub 値を検索する()と入力し、入力が完了したらエンターを押しましょう

5.ではまずは下準備をしていきます。

6.A1セルに「こんばんは」と入力してください。

7.B3セルに「おはよう」と入力してください

8.F8セルに「Hello」と入力してください

9.B7セルに「こんにちは」と入力してください

10.入力が完了したらアクティブセルをA1にしてください

11.これで下準備は完了です。

12.2行目に
Cells.Find(what:=”こんにちは”).Select
と入力してください

13.入力が完了したらエンターキーを押してください

14.入力が完了したらツールバーの再生ボタン「▶」をクリックしてください
再生ボタンはメニューバーの「挿入」の右斜め下にあります。
（見つけられない場合はショートカットキーのF5キーで実行してください

15.アクティブセルがB7セルの「こんにちは」のところに移動していれば成功です！

16.Findについては以上です！

解説

Excel VBAのFindは、指定したセルの範囲内から指定した値を検索する方法です。

今回は見慣れない書き方をしている命令がいくつかあるので細かく解説していきます。

Cells.

「Cells.」はCells()のページでは混乱するかと思い記載していませんでしたが、範囲を選択しないで「Cells」単体で使うことが可能です。

範囲を選択しない場合はシート内全てのセルを対象にする命令となります。
この「Cells.」はシート全体を対象にするので非常に便利なのですが、検索範囲が広くなるのでその分遅くなるということを合わせて覚えておきましょう。

Find(What:=””)

今回の肝である「Find」は選択範囲内の全てのセルから検索する値があるかを探し出す命令です。

そして、検索したい値を「What:=」を使ってダブルクォーテーションの中で囲われている値を探し出すという命令です。
このFind(What:=)はVBAをやっていても、なかなか使わない書き方なのであまり突き詰めずにこういう書き方をするんだな、くらいの感覚で使ってください。

たまに書きますが、こういった書き方をしなければいけないものを何でこういう書き方をしなければいけないんだろうとか「:=」の正確な使い方ってどんなだろうと調べるのは時間の無駄ですし、いずれ分かってくることなので今は割り切ってしまった方が早くレベルアップできます。

「:=」については以下のページでも簡単に解説しているので参考にしてください。

https://marumaru-tokyo.work/shouroom/excelvba/xlshift/

■今回はここまで■

今回のコード一覧

自分でコードを書いてエラーが発生してしまったら、以下のコードと比較してエラーを解消しましょう。

Sub 値を検索する()
Cells.Find(what:=”こんにちは”).Select
End Sub

エラーの場所がわからない

どうしてもエラー箇所が分からないという方がいましたら、2つのテキストの差異を視覚的に教えてくれるWinMergeというソフトがあるので、それを使って上記のコードと自身が書いたコードを比較してみることをお勧めします。

WinMerge：
https://winmerge.org/?lang=ja

まとめ

このページではセルの値を検索する方法について解説しました。

検索の方法は完全一致・部分一致、縦方向検索・横方向検索、大文字・小文字とかなり細かく検索する種類を選択することができるのでいくつか例を紹介します。

項目	命令内容	指定	命令
After	指定したセル以降から検索を開始	省略可	Range(“”) ActiveCell
LookIn	検索する対象を値、コメント、数式から選択	数式値コメント	xlFormulas xlValues xlComents
LookAt	完全一致か部分一致かを選択	完全一致部分一致	xlWhole xlPart
SearchOrder	検索方向を縦方向か横方向かを指定	行方向列方向	xlByRows xlByColumns
SearchDirection	検索する向きを指定	順方向逆方向	xlNext xlPrevious
MatchCase	大文字と小文字の区別	区別する区別しない	True False
MatchByte	半角と全角の区別	区別する区別しない	True False
SearchFormat	書式を検索する	検索する検索しない	True False

ざっと書きましたが、検索の方法はこのような感じになっています。

最初のうちは分からないと思いますが、正直に言って
分からないままで問題ありません。

強いていうのであれば「LookAt」の意味を多少理解しておく程度でいいと思います。

はっきり言って上記の表のうちのほとんどは使いませんので。

では、上記のをいくつか使ってプログラムの例を作成していきます。

複数の命令を使ったソースコード

可読性をあげるために見慣れない書き方をしていますが、以下のコードを実行していることになります。

Sub 値を検索する()
Cells.Find(what:="おはよう",  After:=Range("L100"), lookat:=xlWhole, SearchDirection:=xlPrevious).Select
End Sub

上記の命令は

・検索値は「おはよう」【what:=”おはよう”】
・検索の起点となるセルはL100セル【After:=Range(“L100”)】
・検索する値は完全一致【lookat:=xlWhole】
・検索する方向は逆方向（L100→L99→L98 …L1→M最終行→…）【SearchDirection:=xlPrevious】

です。
1回ではまず理解しきれないので繰り返し練習するか、いざ使う時に調べながら使いましょう。

因みに画像では一つの行が、複数行に渡って書かれていますがこれは「_」アンダーバー（アンダースコア）をその行の一番最後に付けると、改行してもその命令は1行として扱われるものになります。

これについては、解説しているサイトがほとんどないのでいずれちゃんと解説します。

このページについて

このページがおススメな方

このページは
・プログラミングを全くやったことがない
・プログラミングをやりたいけど何からやればいいか分からない
・仕事の業務を効率化したい
といった方向けの記事です。

Excel VBAを書くための準備から、基本的なコーディング、応用レベルの使い方をなるべく噛み砕いて全くの初心者でも少しずつステップアップできる内容になっています。

VBAをおススメする理由

特に今後プログラミングを覚えていきたいという方にVBAは非常におすすめです。
その理由は
・開発環境を構築する必要がない
・コードが癖はあるけどシンプル
・プログラミングをするためのエディターは専門のものが用意されている
・エクセルという視覚的に表示されるものが多いので、達成感をすぐに味わえる

という観点から僕はVBAをお勧めしています。

プログラミングという言語は沢山あって、あっちはこれが得意でこっちはこれが得意でといった感じに比較することは多いかと思いますが、コードが

シンプル！
かんたん！
分かりやすい！
結果をすぐ得られる！

と、いいことずくめなのでプログラミング比較で迷っている方はとりあえずまずは、の感覚でいいのでVBAをやってみてください。
（その代わり遅いんですけどね…）