エラー内容は
並び替え（列ＡＨ以降）がきちんと行われない です。
以下が前回の質問
http://q.hatena.ne.jp/1229390550
そして現在使用のプログラムになります。
http://oskuni7.sakura.ne.jp/hatena/question4/saisyupin.txt
前回私の説明が悪かったのですが、列ＡＨ以降にまだ列ＡＩ～ＣＨのデータがあり、プログラムを行うとＡＨ以降のデータがそのまま並び替えされずに残ってしまいます。
これを行ごと並び替えがされるようにしたいです。
ＡＨ以前のデータは0にあるデータを１に移動する。
ＡＨ以降のデータは１のデータをそのまま残すようにしたいです。
時間がある方で変更できる方おりましたらよろしくお願いいたします。
No.1
125
8
50pt
ソースを拝見しました。
並び替えの範囲をしているのは
Range("A4:AG65535").Sort _
の部分になりますので、これを
Range("A4:CH65535").Sort _
とAG→CHを書き換えればご希望の結果が得られると思います。
いかがでしょうか？
No.1
1258
ここでベストアンサー
50pt
ソースを拝見しました。
並び替えの範囲をしているのは
Range("A4:AG65535").Sort _
の部分になりますので、これを
Range("A4:CH65535").Sort _
とAG→CHを書き換えればご希望の結果が得られると思います。
いかがでしょうか？
ご回答ありがとうございます。変更できました。
No.2
135391198
50pt
Range("A4:AG65535").Sort _
という行がありますが、これが ソートする範囲を指定しています。
AH以降も指定したいならば
Range("A4:IV65535").Sort _
とすればいいですが
Ａ１からＡ３まで ソートしてもいいのではあれば
Range("A1:IV65535").Sort _
で行単位となります。
あと すみませんが、
＞ＡＨ以前のデータは0にあるデータを１に移動する。
＞ＡＨ以降のデータは１のデータをそのまま残すようにしたいです。
の意味がちょっとわからないのですが・・・。
ご回答ありがとうございます。変更できました。
Mook
2008/12/23 02:09:03
269
267
aiomock
1
1
1
ご回答ありがとうございます。変更できました。