vba - プロシージャ間での引数の受け渡し

Question

1 つのサブ (親を呼び出す) から別のサブに引数を渡そうとする非常に単純なコードがあります。いくつかの値を変更し、他のいくつかを変更せずに終了します。私は惨めに失敗したようです。理由がわからない。ここにいくつかのコードがあります

Sub Parent_sub()
Dim v1,v2,v3 as Integer

 v1 = 0 
 v2 = -1
 v3 = -2
      Child_sub v1, v2, v3
  msgbox "the variables are " & v1 & " ," & v2 & ", and " & v3
End Sub

Sub Child_sub(ByVal c1 as Integer, ByRef c2 as Integer, ByRef c3 as Integer)

c1 = 3
c2 = 4
c3 = 5

End Sub

コンパイル エラーが発生する理由がわかりません (コンパイル エラー、ByRef 引数の型の不一致、v2 引数の Child_sub 呼び出しで表示されます)。家庭用およびビジネス用の Excel 2016 を使用しています。役立つヒントはありますか？

潜在的に単純な応答から救うためだけに。同じ名前の 2 つのサブルーチンを定義していません (!)。コード内の他の場所で変数をさらに再定義していません (チェック済み)。それは私にとってかなり奇妙なものです。助けてください、私は馬鹿です！