|
▼SS様
すみません、ちゃんと動作してるというのは嘘でしたorz
SS様のように新規でファイルを作ってやってみましたところ
移動処理部分での判定がすべて
myMOVE = False
になっているようでして、SS様の言う通り各シートは動いてるようです
(確認用のコードはキチンと動いておりました。感謝です!)
ということは、内容のミスですね・・・もう一度追って見直してみたいと思います
どうしてもわからなかった場合は、またお力をお借りするかもしれませんが
そのときは宜しくお願い致します!
数々の助言ありがとうございました!
>▼Ex初心者 さん:
>
>こんにちは、提示されたマクロを新規作成したbookの標準モジュールに貼り付けてSheet名を『1』『12』『23』に書換え、実行したところ行の移動されましたよ?
>良く分かりませんが
>1.複数のbookを開いていてそれが影響(対象bookの指定していない)
>2.WorkSheet名が違う 全角/半角 後ろにスペース(これはMsgBoxが表示される)
>3.例題に移動条件に合致するものがなかった(これはないですかね^^;)
>なんかが原因ですか?ちなみに関係ないとは思いますが私の環境XP+2003です。
>例えば
>> Loop Until myRow > myRowMax
> MS.Range("A1").Value = myCnt
>>End Sub
>とすれば、各ワークシートに処理がされているか、移動処理に入っているかなど
>確認できると思います。試してみてください。
>
>>▼SS様
>>
>>先ほどはご助言ありがとうございます。
>>あれから一度試してみまして、SS様のものを参考(ほとんど真似てますが・・・)にさせていただき、こちらの条件に合うように作ってみました(内容は引き続き超初心者様のものを使用させて頂いております!)
>>
>>下記のものを実行したところ、デバックで追って見るとちゃんと機能しているのですが
>>全作業終了後、他のシートを見てみると並び替えも移動もされていない状態でした・・・
>>
>>ただ反映されてないだけなのかな?と更新もしてみましたが 中身は変化なく、どうやらマクロが反映されていないようです・・・
>>
>>度々の質問、申し訳ありませんが
>>ここが違う!というような場所があれば是非ご指摘をお願いたします!
>>
|
|