VBAのコードに関する質問です。

いまM2から不特定数の列にそれぞれの行に不特定数の数値データが入力されており、各列の最初の値でその列のすべての数値を引いた後に各行の平均と標準偏差を求めるというコードを教えてほしいです。 イメージとしては以下のような感じで列の数が未知です。 For i = i To Cells(Rows.count, 13).End(xlUp).Row Cells(i, 13) = Cells(i, 13) - Cells(2, 13) For j = j To Cells(Rows.count, 14).End(xlUp).Row Cells(i, 14) = Cells(i, 14) - Cells(2, 14) For k = k To Cells(Rows.count, 15).End(xlUp).Row Cells(k, 15) = (Cells(k, 13) + Cells(k, 14)) / 2 For l = l To Cells(Rows.count, 16).End(xlUp).Row Cells(l, 16) = "=STDEVP(Cells(l,13):Cells(l,14))"