excel vba：特定の値を持つセルの行を見つけ、その行番号を別のセルに入れます。

特定の値（range("C1").valueと同じ値）を持つセルの行を見つけようとしています。他のセルの番号。私は2時間それに固執しています。excel vba：特定の値を持つセルの行を見つけ、その行番号を別のセルに入れます。

私のコードは次のよう：を（私は前にシート1をアクティブに）

Set found = sheet1.Columns("B").Find(what:= sheet1.range("C1").Value, LookIn:=xlValues, lookat:=xlWhole)  
sheet1.range("A2").value= found.Address

このコードは、このエラーの原因は何のエラーメッセージObject variable not set

を得ましたか。

出典

2016-03-21 kitty

ワークシートやコードの残りの部分が表示されていないと、検索値が見つかりませんでした。 – Comintern

@ Comintern19ご回答いただきありがとうございます。問題は、私の目にはB24が検索値（sheet1.range（ "C1"）。value）と同じ値を持つことがわかりますが、vbaコードはこの場合24の行番号を与えません。 ..................あなたが話している「検索価値」を誤解しましたか？助けてください！どうもありがとうございます！ – kitty

Find（）は一致する値を見つけず、見つかった変数に何も設定しないため、見つかった変数は空です。

Dim found As Range 

Set found = Sheet1.Columns("B").Find(what:=Sheet1.Range("C1").Value, LookIn:=xlValues, lookat:=xlWhole) 

If Not found Is Nothing Then 
    Sheet1.Range("A2").Value = found.Address 
End If

出典

2016-03-21 03:49:03 Sixthsense

ありがとうございます！あなたのコードはうまくいった！：D – kitty

excel vba：特定の値を持つセルの行を見つけ、その行番号を別のセルに入れます。

答えて

関連する問題