2016-07-21 16 views
0

組織から退出した他の人のマクロを引き継ぎました。ランタイムエラーのタイトルに記載されている以下のエラーが表示されます。VBA実行時エラー91.問題設定変数のデバッグ

以下は、デバッグするコードです。問題はこれがVBAマクロの初めてのことで、どこでエラーを解決するのかがわかりません。

私はこの点を過ぎて行くことができないので、どんな助けも素晴らしいでしょう。

Cells.Find(What:="Top 10 Rank", After:=ActiveCell, LookIn:=xlValues, _ 
     LookAt:=xlPart, SearchOrder:=xlByRows, _ 
     SearchDirection:= xlNext, MatchCase:=False, _ 
     SearchFormat:=False).Activate 
+0

可能性のある重複した[エクセルVBAは調子range.find](http://stackoverflow.com/questions/21403916/excel-vba-range-find-acting-up) –

答えて

1

値が検索範囲内に見つからない場合は、別々の操作にあなたのコードを分割するのがベストですので、あなたは、エラーになりますが:

Dim f As Range 
Set f = Cells.Find(What:="Top 10 Rank", After:=ActiveCell, LookIn:=xlValues, _ 
        LookAt:=xlPart, SearchOrder:=xlByRows, _ 
        SearchDirection:= xlNext, MatchCase:=False, _ 
        SearchFormat:=False) 

If Not f Is nothing Then 
    'do somthing with f 
Else 
    Msgbox "not found!" 
End If 
+0

は助けてくれてありがとう。 –

+0

@MarkMeiring on Stack Overflow(そして一般的なスタック交換)最高の「ありがとう」はチェックマークです。上/下の投票ボタンの下にある緑色のチェックマークアイコンを参照してください。それはいくつかの愛を与え、あなたはそれのために+2を取得し、世界にこれを言うだろう!これは、ここで見て、これは答えです! –

1

データが見つからなかったので、.FindこのMicrosoft Support pageで説明したように、ヌルオブジェクト参照(VBAでNothing)を返さ:

このマクロエラーが発生Visual Basicの検索方法は、NULL値を返すため細胞の活性化を不可能にする。

関連する問題