VBA/アプリケーション定義またはオブジェクト定義のエラーに関して

Question

前提・実現したいこと

VBAのマクロで規則性のあるピーク値を求めるため
プログラムを作成しています．

Range,Cellsのルールのようなところで躓いており
実行時エラー'1004', アプリケーション定義またはオブジェクト定義のエラーです．
というエラーが発生しました．

Range,もしくはCellsを使用する場合(x,y)と行・列を
記載するのですが、行・列ともに変数は使用できないというルールでしょうか？

発生している問題・エラーメッセージ

実行時エラー'1004'
アプリケーション定義またはオブジェクト定義のエラーです．

該当のソースコード

Sub Compare5_2()

Dim startRow As Integer
Dim startCol As Integer

Dim MAX_ROW As Integer

Dim i As Integer

Dim ValueA As Single
Dim ValueB As Single

Dim calValue As Single

Dim jdgVal As Single

Dim rsltCol As Integer

Dim FirstMaxRow As Integer

Dim myRng As Range

Dim startSearchRow As Integer
Dim myMatchMaxRow As Integer
Dim serchNum As Integer

Dim ws As Worksheet

startRow = 5
startCol = 19 'S列のaveだけを使用する

MAX_ROW = 4650 '20secまでで一旦決め打ち

jdgVal = 0.02 '閾値一旦決め打ち

rsltCol = 6 '初期値がF列

startSearchRow = 100 '100行目から探索． 約0.4secまでを対象から除く
serchNum = 100 '100セルずらして最大値探索していく

'Sheet00000005
  '最初の最大値を探る⇒最大値の行/列番号(実際は列固定なので行番号のみ)とそのセルの値が欲しい

'Set ws = ThisWorkbook.Worksheets("00000005")
'Set myRng = ws.Range(ws.Cells(startSerchRow, startCol), ws.Cells(startSerchRow + serchNum, startCol))
Set myRng = Range(Cells(startSerchRow, startCol), Cells(startSerchRow + serchNum, startCol))
'Set myRng = Range(Cells(100, startCol), Cells(200, startCol)) ' 通る
'Set myRng = Range(Cells(startSerchRow, 19), Cells(startSerchRow + serchNum, 19)) '通る

試したこと

ソースコードの下から3行目がエラーが出ている部分になります．
startSerchRowを整数に、もしくはstartColを整数にするとエラーは生じません．

初期値が0になっていることでエラーが生じる、シート指定をしていることは無いと思うのですが、、

補足情報（FW/ツールのバージョンなど）

Excel　2016

Comments

[jinoji]

とりあえず、
startSearchRow
startSerchRow
掲載時のスペルミスなだけで実際のコード上では正しいのでしょうか。

[sasamaru]

実際のコード上でもスペルミスでした．
申し訳ございません．

Answer 1

Cellsは行、列共に1始まりで指定します。
startSerchRowは0として扱われるのでエラーになりますね。

※本当に一番下はエラーにならないですか？

Comments

[sasamaru]

スペルミスでココが0になっていました．
ご指摘ありがとうございます．
行列ともに1~の値であれば変数でも問題ないということですね．

ありがとうございます．