| |
▼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様のものを参考(ほとんど真似てますが・・・)にさせていただき、こちらの条件に合うように作ってみました(内容は引き続き超初心者様のものを使用させて頂いております！)
>>
>>下記のものを実行したところ、デバックで追って見るとちゃんと機能しているのですが
>>全作業終了後、他のシートを見てみると並び替えも移動もされていない状態でした・・・
>>
>>ただ反映されてないだけなのかな？と更新もしてみましたが 中身は変化なく、どうやらマクロが反映されていないようです・・・
>>
>>度々の質問、申し訳ありませんが
>>ここが違う！というような場所があれば是非ご指摘をお願いたします！
>>
|
|
Ex初心者
- 10/1/14(木) 16:38 -
