// カウント by いかけん 2006/6/26 // // カーソルのある列のデータを基準に、連続したデータの行をカウントします。 // ソートと組み合わせることで、同じデータの数をカウントできます。 // ここから先は内容を理解した上で変更してください。 InsertCol(x+1); B = Bottom; for(y = 1; y <= B; y++) { key = [x,y]; for(i = 1; key == [x,y+1]; i++){ y++; } [x+1,y] = i; }