スキルアップ・問題解決なら、モーグにおまかせ！

このプログラムはFractal図形を描画するはずです。
 
Sub List63()
   BX=320 : BY=200
   H=199 : W=.02 : OX=-.11:OY=.899
   S=1 : N=300
   FOR I=-H TO H STEP S : U=W*I/H +OX
   FOR J=-H TO H STEP S : V=W*J/H +OY
   X=0 :Y=0 : FOR L=1 TO N
           ZX=X^2-Y^2+U
        ZY=2*X*Y +V
   X=ZX:Y=ZY : IF X^2+Y^2>10 THEN GoTo Sub1
        NEXT L
   Sub1     : CC=INT(7*L/N)
        IF L>=N THEN CC=0
        Cells(BX+I, BY-J).Interior.Color = VBA.RGB(10, 10, i * 10)
   Next J, I
End Sub
 
「Cells(BX+I, BY-J).Interior.Color = VBA.RGB(10, 10, i * 10)」のところで
「プロシージャの呼び出し、または引数が不正です。」というメッセージが出て進めません。
対策方法についてアドヴァイスお願いします。

ﾁ策方法は、あなた自身が考えることです。
デバッグを他人に依頼することは、やめてください。
 
まずは、ステップ実行して、原因を特定しましょう。
ステップ実行すれば、変数の値が分かります。

了解しました。