エクセルVBAであるキーワードを検索したセルの隣のセルの値を調べるユーザー定義関数 削除
Message#2 2015年2月6日(金)21時06分 From: ユーザー定義関数 |
コレクションとオブジェクトの違いがあまり分からないのではないですか? ところどころ間違いがありますね。 あとコレクションに対してのプロパティとオブジェクトに対してのプロパティは違うのでその辺も基礎を学んだほうがいいですね。 一応対応した形が以下になります。 こちらを元にがんばってください。 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).cells If cell = words2 Then Exit For End If Next cell set row = Sheets("特定のシート").Rows(cell.Row) For Each cell In row.cells If cell = words1 Then Exit For End If Next cell dublesearch = cell.Offset(0, 2) End Function |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。