目次
使用環境
- OS：Windows 10 Pro（バージョン：20H2）
- ソフト：Microsoft Excel VBA
経緯
VBAを使って、Excel上で**「Ctrl + F」検索機能**を再現し、
指定した文字列をセルから探し出す方法を学びました。
解決方法：Findメソッドを使う
VBAでは、Find()メソッドを使うことで、
「Ctrl + F」と同じような検索動作をプログラムで実装できます。
コード例（シート内で「森」を探す場合）
Dim FoundCell As Range
Set FoundCell = Cells.Find(What:="森")
If FoundCell Is Nothing Then
MsgBox "いません。"
Else
FoundCell.Activate
End If
コード解説
- 1行目：
FoundCellという変数をRange型で宣言します。 - 2行目：シート全体（
Cells）の中から、「森」という文字列を探し、結果をFoundCellに格納します。 - 3行目：
If文で、検索結果が「見つからなかった場合（Nothing）」を判定します。 - 4行目：「森」がいなければ、メッセージボックスで「いません。」と表示します。
- 6行目：「森」が見つかった場合、そのセルに移動（アクティブ化）します。
- 7行目：
If文終了。
ポイントまとめ
Cells.Findを使えば、シート全体から検索できます。What引数に探したい文字列を指定します。- 見つかったかどうかを
If FoundCell Is Nothingで判定します。 - 見つかった場合、
FoundCell.Activateでそのセルに移動できます。
まとめ
Excel VBAで「Ctrl + F」検索を再現するには、
Cells.Find(What:="検索ワード")を使う- 結果が見つからない場合（Nothing）と見つかった場合を条件分岐する
この基本形を押さえておけば、検索機能を自在に組み込めるようになります。
副業から独立まで「稼げる」Webスキルを習得する（PR）
ここまで読んでいただきありがとうございます。 最後に宣伝をさせてください。
「副業を始めたいが、何から手をつければいいかわからない」「独学でスキルはついたが、収益化できていない」という悩みを持つ方には、マンツーマン指導のWebスクール**「メイカラ」**が適しています。
このスクールは、単に技術を教えるだけでなく、**「副業として具体的にどう稼ぐか」**という実務直結のノウハウ提供に特化している点が特徴です。
講師陣は、実際に「副業Webライターから1年で独立して月収100万円」を達成したプロや、現役で利益を出し続けているブロガーなど、確かな実績を持つプレイヤーのみで構成されています。そのため、机上の空論ではない、現場で通用する戦術を学ぶことができます。
副業に特化した強み
- 最短ルートの提示: 未経験からでも実績を出せるよう、マンツーマンで指導。
- AI活用の習得: 副業の時間対効果を最大化するための、正しいAI活用スキルも網羅。
- 案件獲得のチャンス: 運営がWebマーケティング会社であるため、実力次第で社内案件の紹介など、仕事に直結する可能性があります。
受講者の多くは、「在宅でできる仕事を探している」「副業を頑張りたい」という20代・30代・40代が中心です。
受講前には、講師による無料説明が行われます。無理な勧誘はなく、自分に合った副業スタイルやプランを相談できるため、まずは話を聞いてみることから始めてみてはいかがでしょうか。
