実行時のエラーメッセージの意味は『21行のLOCATE文で範囲外』。 CCY-2と、なっていますがCCYのあたいは？ 多分21行まで代入してないのでは？ だとすると0なのでCCY-2は-2で画面外です。