excel - ExcelVBAタイプの不一致

Question

行If infl > (fc - WC(j)) * dz(j) Thenで「TypeMismatch」というエラーが発生し続け、行でが強調表示さ-れます。私は今、このエラーの原因を知っていますか？

Option Explicit

Dim dz() As Double
Dim WC() As Double
Dim fc() As Double
Dim NL, i As Integer

Dim sumdrain As Double
Dim infl As Double

Sub infilt()
  Dim j As Integer
  j = 1

  While (infl > 0) And (j <= NL)
    If infl > (fc - WC(j)) * dz(j) Then
      infl = infl - (fc - WC(j)) * dz(j)
      WC(j) = fc
    Else
      WC(j) = WC(j) + infl / dz(j): infl = 0
    End If
    j = j + 1
  Wend

  If infl > 0 Then
    sumdrain = sumdrain + infl
    infl = 0
  End If

End Sub

Answer 1

fcは配列です。あなたはそれから差し引くことはできません。あなたはおそらく意味しfc(something)ました。