- 締切済み
エクセルで不要な行を一括削除できますか？
a00000aの回答
- a00000a
- ベストアンサー率25% (1/4)
質問の意味が良くわかりませんが 1行とびに削除するだけなら 1.作業用の列を2列作成 （１）左端に2列挿入する 2.今の並び順を登録する （１）a列に1からの番号を割り振る 1,2,3,4,5・・・ 3.削除するか残すかの識別コードをつける （１）b列に識別番号を入力 ・1行目に「0」 ・2行目に「1」など （２）そのセル（0と1）を対象の行までコピー。 4.b列でデータを並べ替える。 5.削除するデータが集約されます。 たとえばb列が「0」なら その範囲を一括で範囲指定して、行ごと削除。 6.a列でデータを並び替える。 7.a列を削除すれば、元通り。 てな感じでどうでしょーか。
関連するQ&A
- Excelで空白行を削除したい
2500行位使用しているシートのなかに、どのセルも空白になっている不要な行が300行くらい混ざっています。 この行を自動的に削除するにはどうすれば良いでしょうか。 ただ、その行のA～Eセルは空白でもFセルに値が入っているなど完全に空白でない行は削除できません。 メニュー、関数、VBAなど有れば教えてください。
- ベストアンサー
- オフィス系ソフト
- Excel 空白行を上に詰めるマクロ
関数を使用して、sheet1からsheet2に必要なデータを抜き取りました。 sheet２のセルには関数が入っています。 sheet2の抽出データには１行単位（まれに２～３行続けて）空白が発生します。 この行を削除し、かつ上に詰めて表示をしたいのですが、下記の条件で実行可能でしょうか？ （例） sheet1 ⇒ sheet2 A B C A B C 1 あ い う 1 あ い か 2 か 2 （空白行） 3 き く け 3 き く し 4 こ さ し 4 （空白行） ●２行目、４行目を削除し、且つ５行目以降に入力されている関数は削除したくない ●空白行削除のマクロは自動？（sheet1のデータを変更したら）で実行できるようにしたい よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel テーブル内の空白行の削除について
テーブルの任意の行のデータを削除し、空白削除ボタン（cmd_Blank）をクリックすると削除したデータ行（空白行）を削除するVBAを作ったのですが空白行が１つの場合は問題なく動作するのですが（添付左）、 ・空白セルがあるとその行がすべて削除されてしまう（添付中央）。 ・空白行が２つ以上あるとエラーになってしまう（添付右） という問題に悩んでいます。 空白削除ボタンクリック時のコードは Private Sub cmdBlank_Click() ActiveSheet.ListObjects("T住所").DataBodyRange.SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub になります。 添付の図がわかりにくいかと思いますが、ボタンクリックすると テーブル内の空白行があったら、その行のみ削除され、上詰めに したいということです。 どなたか教えていただきたいです。
- ベストアンサー
- Excel（エクセル）
- エクセルで空白行を挿入するには
一つの列に２００ほどデータがあるとします。 そこで１行おきに空白行を挿入していきたいのですが手でいちいち空白行を挿入していてはらちがあきません。 関数等も含めて、なにか良い方法はないでしょうか。 例 セルＡ１ セルＡ２ セルＡ３ 以下続く ↓ セルＡ１ 空白行（セル） セルＡ２ 空白行（セル） セルＡ３ 空白行（セル） 以下続く といった具合です。
- ベストアンサー
- オフィス系ソフト
- エクセル 行の挿入について
EXCEL2002を使用しています。 行を挿入しようとしましたら、次のようなエラーメッセージがでました。 『データの消失を防ぐため、空白でないセルをワークシートの外にシフトすることはできません。 Ctrl+Endキーを押して最後の空白でないセルに移動し、そのセルとデータを削除、またはクリアしてください。 その後、セルA1を選択し、ブックを保存して最後のセルをリセットしてください。 または、データを新しい位置に移動し、もう一度行ってください』と。 データを入力した後、入力漏れに気がついたので、行の途中に入力漏れしたデータを挿入したいのですが、どのようにすれば、行の挿入ができるでしょうか。 （例えば、1行目から100行目までデータを入力した後に、10行目に新たにデータを挿入したい場合） よろしくご教示願います。 なお、ＯＳはウィンドウズＸＰです。
- ベストアンサー
- オフィス系ソフト
- 空白行のみ一括削除≪Ｅｘｃｅｌ≫
データ（ひらがな）が入っている行と、空白の行が混在しています。 空白行のみ削除し、ギュっと行を縮めたいのですが良い方法は無いでしょうか？ 項番を振り、並び替え後削除し、再び項順に並べ直してみましたが 時間がかかって仕方ありません。 良い方法をご存知の方、ご教授下さい。
- ベストアンサー
- オフィス系ソフト
- 空白セルのある行を削除する関数をご教示下さい。
空白セルのある行を削除する関数をご教示下さい。 ただし、条件付で、特定の列の空白セルに該当する行しか削除しない という条件付の関数を作成したいと考えています。 文章だけでは分かりにくいため、図を添付します。 エクセルに詳しい皆様の回答を心よりお待ちしています。
- ベストアンサー
- オフィス系ソフト
- 空白のセルを行削除する。EXCELマクロなのですが・・
VBA初心者です。 データーをHPから、単純にコピーしてきて、 EXCELに貼り付けています。 フィルターをかけても、画像かなにかがセルに張り付いているのか、 空白行をすべて削除できません。 いろいろ試して（HPから、空白セルの行削除について書かれてあるマクロを貼り付けて）動いたのが、このVBAです。 しかし、遅いので、早いVBAに簡略できればいいのですが。。 大体、1000行ぐらいの文字を貼り付けて、3/1ぐらいが空白行です。A行のセルの空白のみを、削除したいのですが。 まったくの素人なので、わかりません。 どうかよろしくお願いいたします。 Sub 空白の削除() x% = Worksheets("sheet1").Range("A65536").End(xlUp).Row For i = x% To 1 Step -1 If Worksheets("sheet1").Cells(i, 1).Value = "" Then Worksheets("sheet1").Rows(i).Delete Next End Sub
- ベストアンサー
- オフィス系ソフト
お礼
お礼が遅くなりました。 参考にします。 ありがとうございました。