検索を繰り返す「特定の範囲を検索する」で、検索の方法について説明しました。この記事では複数検索にヒットする状況の場合の、繰り返し方法を説明します。複数の検索条件に合致するセルがあった場合に、次のセル、次のセルと移動する処理を実現するためFindNextやFindPreviousを使います。EXCEL.Range(&quot;A1:A10&quot;).Find(&quot;a&quot;)EXCEL.Range(&quot;A1:A10&quot;).Find(&quot;a&quot;).SelectEXCEL.Range(&quot;A1:A10&quot;).FindNext(After).SelectEXCEL.Range(&quot;A1:A10&quot;).FindPrevious(After).Selectメッセージを出しながら検索を繰り返す上記のスクリプトでは、一瞬のうちに処理が完了してしまうので、挙動しているのか確認が難しいです。次のスクリプトで、メッセージによる処理のコメント、背景色の変更が行われるので、検索の繰り返しがわかりやすく確認できます。スクリプトは下記のようになります。コメントは受け付けていません。カテゴリー:UWSCとExcel特定の範囲を検索する特定の範囲を検索するFind(keyword)文字列を指定し、検索に合致するセルに移動する範囲を指定(Range(X:X)し、Findを実行することで、該当キーワードに一致するセルの位置情報を取得できます。以下のサンプルにおいて、「a」と入力してから、セルの移動を行い、その後でFindで見つけた位置を選択しています。EXCEL.Range(&quot;A1:J10&quot;).Find(&quot;a&quot;).Select検索にヒットした箇所の背景色を変えてみる上記のスクリプトでは、一瞬のうちに処理が完了してしまうので、本当に挙動したかわかりにくいです。次のスクリプトで、メッセージによる処理のコメントや、検索結果セルの背景色の変更を実施してみます。これで処理の流れがわかりやすくなると思います。スクリプトは下記のようになります。コメントは受け付けていません。EXCEL.ActiveCell.End(-4162).Address()NEXT上記のスクリプトを実行することで、終端の情報が取得できます。冒頭の例や、サンプルスクリプトではAddressで位置情報を取得していますが、Selectによる移動、Valueによる値取得も行えます。30の範囲で終端のアドレス、値を取得する上記のサンプルより規模を大きくし、かつ位置情報以外にもセル移動や値取得をしてみましょう。スクリプトは下記のようになります。コメントは受け付けていません。//現在位置から相対移動セルを移動してみる絶対移動で行のアルファベット、列の数字を組み合わせたセル位置を入力し、Selectすることで該当場所へ移動できます。ActiveCell.Offsetで行の数字、列の数字を入力し、Selectすることで該当場所へ移動できます。TrueEXCEL.workbooks.add()//絶対移動EXCEL.Range(&quot;A30&quot;).Select//相対移動EXCEL.ActiveCell.Offset(1,2).SelectNEXT上記のスクリプトを実行することで、セルの移動結果を確認できます。A30の位置に移動、そしてそこから下行に1つ、右列に2つ相対移動します。セルの位置を確認しながら実行する上記のサンプルだと、一瞬のうちに移動してしまうので確認がしづらいです。分かりやすい様にメッセージを出しながら実行してみましょう。スクリプトは下記のようになります。コメントは受け付けていません。Cafeを開きます日ごろのご愛顧ありがとうございます。CAFEを開催します!今回は皆様からリクエストの多かったマンツーマンのセミナーになります。勉強を始めたけど、分からないところがあって止まっている作りたいスクリプトのアドバイスが欲しい勉強のやり方を教えて欲しいなどなど、できる限り参加していただく方の希望を叶えたいと思います。※必須ではありませんが、説明時などスムーズになります。め聞きたい内容をご連絡頂けると、スムーズに進むかと思います。下記のスケジュールで予約を受付けます。※予約状況の更新が遅れる場合がございます。※次のコマとの入れ替えの為残り5分を切った時点で、切りの良いところで終了する点ご了承ください。不参加メッセージ本文ご希望の時間帯を上記の表を参考にIDでご記載ください。第3希望くらいまであると予約が取りやすいです。コメントは受け付けていません。EXCEL.ActiveCell.Column上記のスクリプトを実行することで、結果を確認できます。ワークブックを新規追加すると、A1の位置にセルが置かれています。列の場合はAから採番されているので、対応する数値が返ります。セルの位置を変更してから取得してみる上記のサンプルだと、結果がどちらも1となります。分かりやすい様にセルの位置を変えてから、再度取得してみましょうサンプルは下記のようになります。コメントは受け付けていません。カテゴリー:UWSCとExcel最近のエントリーWebサイトからテーブルの内容をエクセルシートに保存ファイルへの追記書き出しについてエクセルの特定のセルにあるメルアドをiniファイルに書込する方法8桁のランダムなアルファベット数字の文字列を作成したい(先頭はアルファベット)ページ検索後に得られた単語にマウスを移動させたいCLKITEMを使ったマウス移動についてCLKITEMのマウスカーソル移動についてUWSCのススメUWSCは、こんな人に向いています。する対象セルを含む領域の終端を取得する特定の範囲を検索する検索を繰り返すセル内の値を数式や文字列で取得するオートフィルを実行する色を指定する特定の範囲を置換する[ファイルを開く]を表示する再計算を実行する[ファイルを開く]からファイル名を取得するワークブック名、シート名を取得・選択するブックを保存し閉じる相互リンク相互リンクFINAL人気の相互リンクシステムです。お問い合わせはこちらから我々へのお問い合わせ、メッセージはこちらから。コバヤシ式」内の「2012年11月」アーカイブ記事一覧です。Q&A掲示板スクリプトUWSCダウンロードリンク集サイトマップ問合せ。