エクセルVBAであるキーワードを検索したセルの隣のセルの値を調べるユーザー定義関数
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#1 2015年2月6日(金)20時59分 From: ada51 | 返事 削除 変更 |
| エクセルVBAであるキーワードを検索したセルの隣のセルの値を調べるユーザー定義関数を作成しようと思っています。 検索は行単位で行いその中に該当するキーワードがあった場合はそのセルを取得し、 その行内で更に検索を行い特定のキーワードを探るといった内容です。 一応こちらで試しにVBAで作成してみたのですが、なかなかうまくいきません。 どのようにすればよろしいでしょうか？ Function dublesearch(words1 As String, words2 As String) As Variant Dim row As Range Dim cell As Range For Each cell In Sheets("特定のシート").Columns(1) If cell = words2 Then Exit For End If Next cell row = cell.row For Each cell In row If cell = words1 Then Exit For End If Next cell dublesearch= cell.Offset(0, 2) End Function |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
