DIM文は1回でいいです。この場合5行目がいらないです。 エラー5行目になってません? あとCO$も配列にしてC0$[0]="アカ"とかにすれば短くできます。