2016-04-19 11 views
1

これは簡単な修正であるはずですが、検索して検索して何が間違っているか把握できません。Excel VBAの範囲変数を宣言するタイプの不一致エラー

私は、 "ファイル名を指定して実行時エラー13:型が一致し":取得しています

Dim rng As Range  
Dim endRW As Integer, endCol As Integer 
endRW = 30 
endCol = 10 
Set rng = Sheets("Sheet1").Range(Sheets("Sheet1").Cells(2,3),Sheets("Sheet1").Cells(endRW,endCol)) 

^^^最後の行は

答えて

0

Set rng = Sheets("Sheet1").Range(Cells(2, 3), Cells(endRW, endCol)) 
を試してみてください^^^^エラーの原因となっています

証拠はありません。

enter image description here

+0

を試みるが、それは動作しませんでした、それを試してみました。同じエラー。 –

+0

それからあなたは私が投稿したものとは違ったことをしています。スクリーンショットを参照してください。コードは正常に動作します。 – teylyn

+0

あなたは正しいです。問題は、私がエラーを見つけるために使用していたMsgBoxで実際には、hahaでした。申し訳ありませんが、あなたの助けをありがとう。 –

0

この

Sub temp() 
    Dim rng As Range 
    Dim endRW As Long, endCol As Long 
    endRW = 30 
    endCol = 10 
    Set rng = Worksheets("Sheet1").Range(Cells(2, 3), Cells(endRW, endCol)) 
End Sub 
関連する問題