こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

締切り済みの質問

エクセル マクロ セルを一気に移動させる(再投稿)

すみません、質問が慌てていたので、再投稿させてください。

WINDOWS-XP、エクセル2003を使っています。

A列に下記のようになっているエクセル表があります。
図番の下に個数の表示がされています。
これは規則的に交互交互に登録されています。
図番******の下にある数値は、個数です。
そこで、その個数の部分だけを図番の隣のセル、つまりB列に移動させたいのです。
さらに、図番の下に空欄ができるので、その空欄を上につめて1つの表にしたいのです。
以上のことが、完了するマクロを教えてください。
このようなデータが3千件つらなっています。

 A列   B列
SK108700 
1
AB911100
5
DS310500
1
DS310500
1

以上、わかりにくい説明ですみませんが、なにとぞよろしくお願いします。

投稿日時 - 2007-04-26 22:48:01

QNo.2953284

暇なときに回答ください

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

ANo.1

操作でマクロを作ればいいでしょう。マクロは2つ要ります。
なお、マクロ実行前にはシートのバックアップを取っていてください。

(1)数値の移動
・カーソルを値が1のところに合わせて、マクロスタートする。
・セルを選択してSK108700の右のB列に移動かコピーする。
・値5にカーソルを移動する。ここでマクロを停止する。

 あとは3000回繰り返すか、マクロを編集して3000回行えるようにする。

(2)行の削除
・数値1のところの行番号へカーソルを合わせて、マクロスタートする。
・その行を選んで削除する。
・数値5のところにカーソルを合わせてマクロを終了する。

 あとは3000回繰り返すか、マクロを編集して3000回行えるようにする。

投稿日時 - 2007-04-30 15:34:50

あなたにオススメの質問