• ベストアンサー

EXCELで空白行を詰めるには

WindowsXP Excel2000 です。 下の図の「表1」を「表2」の様にしたいのですが Excelの基本操作だけで出来るでしょうか? やりたい事は以下の通りです。 (1)空白行は削除する (2)ダブっている行を削除する (表1) +====+=======+=======+==== | | A | B |・・ +====+=======+=======+==== | 1 | 1011 | xxxxx | +----+-------+-------+---- | 2 | | | +----+-------+-------+---- | 3 | | | +----+-------+-------+---- | 4 | 1011 | xxxxx | +----+-------+-------+---- | 5 | | | +----+-------+-------+---- | 6 | 1012 | yyyyy | +----+-------+-------+---- | 7 | | | +----+-------+-------+---- | 8 | 1012 | yyyyy | +----+-------+-------+---- ↓ ↓ ↓ (表2) +====+=======+=======+==== | | A | B |・・ +====+=======+=======+==== | 1 | 1011 | xxxxx | +----+-------+-------+---- | 2 | 1012 | yyyyy | +----+-------+-------+---- [注]表は等幅フォントで見てください。 以上よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • mshr1962
  • ベストアンサー率39% (7418/18948)
回答No.3

方法1 1行目にタイトルを追加 A B 別の空いている列で A >0 と入力 「データ」「フィルタ」「フィルタオプションの設定」で リスト範囲をA,B列 検索条件範囲を先ほどタイトルと条件を入れた2セルにして 「重複するレコードは無視する」にチェックしてOK A B 1011 xxxxx 1012 yyyyy の表示になるのでコピーして別のシートに貼り付ける 方法2 1行目にタイトルを追加 A B C C2=COUNTIF($A$2:$A2,$A2) として最終行までコピー、A,B,C列を選択して 「データ」「フィルタ」「オートフィルタ」 C1の▼を押して1を選択 A B C 1011 xxxxx 1 1012 yyyyy 1 の表示になるのでA,B列をコピーして別のシートに貼り付ける 方法3 1行目にタイトルを追加 A B 「データ」「ピボットテーブル」で行にA B、データにAを設定して完了 データの個数 : A A B 計 1011 xxxxx 2 1011 計 2 1012 yyyyy 2 1012 計 2 (空白) (空白) (空白) 計 総計 4 になるので計の行を右クリックで「表示しない」にする。 A,Bの列をコピーして別シートに値として貼り付け

kon3
質問者

お礼

Excelのヘルプを何度も見てやってみたら 出来ちゃいました。 A列の内容が数値である事を利用して空白行を 対象外データにしてしまうのですネ。 大変助かりました。ありがとうございます。

kon3
質問者

補足

方法1を試してみました。重複データが無くなるので これでOKなんですが、空白行を対象外とする方法が いまいちわかりません。 「別の空いている列でA>0と入力」の意味ですが、 C1セルに"A>0"と入力し、「フィルタオプションの設定」画面で検索条件範囲(C)にC1セルを指定すると いう事なのでしょうか? よろしくお願いします。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (3)

回答No.4

ちょっと手順が多いので面倒ですが、私の場合はこれで大丈夫でした。貴方様の場合も多分これでいけると思いますが、Officeのバージョンによっても機能や挙動の違いがありますので、念のため、該当シート全体をコピーしてから、以下を実行して頂けますか? 1.まず、空白行を削除します。 (1) A列全体を選択します。 (2) [編集]-[ジャンプ]-[セル選択]-[空白セル]をクリックして、[OK]します。 (3) 青く反転しているデータ行の上で右クリックして[削除]を選択します。 (4) [行全体]をクリックして、[OK]します。 2.次に重複行を削除します。 (1) 1行目の上に行を挿入して適当な見出しをつけます。(既に見出しがある場合は不要です) (2) 上記で記載した見出しを選択して、[データ]-[フィルタ]-[フィルタオプションの設定]を選択します。 (3) 行を特定できないなどのダイアログが表示された場合は、[OK]します。 (4) 全てのデータが青く反転して範囲選択されていることを確認してから[フィルタオプションの設定]ダイアログで[範囲選択内]と[重複するレコードは無視する]にチェックをつけて[OK]します。 (5) 2.(1)で適当につけた見出し行を削除します。 (6) 2.(1)で適当につけた見出し行を除いた全てのデータを範囲選択して、右クリックで[コピー]を選択します。 (7) 別の空のシートの適当な場所で右クリックで[貼り付け]を選択します。 もしうまくいったとして、これらの作業を何度か実行する必要がある場合は、[ツール]-[マクロ]-[新しいマクロの記録]を選択してから上記の操作を行うと、次回からはとても楽になると思います。

kon3
質問者

お礼

[編集]-[ジャンプ]-[セル選択]-[空白セル]という のは知っていましたが、そこで「削除」とは 目からウロコでした。 どうもありがとうございました。 大変参考になりました。

全文を見る
すると、全ての回答が全文表示されます。
  • ThunderV2
  • ベストアンサー率58% (119/205)
回答No.2

こんにちは。 空白行の削除は、データのフィルタのオートフィルタを 設定し、空白行を選択して結果を行削除で可能です。 ダブってる行の判断ですが、EXACT関数使えば可能です。 但し、ソートされてないときちんとした結果が求められません。 例)=EXACT(B2,B1)で結果がTRUEならダブり。 これも、結果が出てからオートフィルタで「TRUE 」を 選択して行削除で消せます。 但し、質問の表では、1011に対してxxxxxしか入力されて いませんが、1011でxxyxxなんてデータはダブりと見なさない 場合は、ダブっているか判断するためのキーが必要です。 CONCATANATE関数でも使用してキーを作った方がいいですね。 例)=CONCATENATE(A2,B2) 1011xxxxx となります。 この結果をキーとして、EXACT関数で比較させてみてください。

全文を見る
すると、全ての回答が全文表示されます。
  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.1

安直ですが、並び替えを行いうと、空白行、重複行がグループ化になりますので、目視にて行削除する方法が簡単だと思います。 並び替えは、データ⇒並び替え⇒最優先されるキーをA列にして実行して下さい。 これ以外は、マクロになると思いますので、過去のレスを検索して下さい。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • 空白行を省いた 表をつくりたい

    第1表 A列 B列 1行 CODE 名前 100行 1001 あいうえお 333行 1002 ああいうえ 441行 1003 おあいうえ 512行 1004 えおいうえ 625行 1005 うえおあい 725行 1006 うえああい 第2表 第1表の空白行を省いた表 1行 CODE 名前 2行   1001 あいうえお 3行 1002 ああいうえ 4行 1003 おあいうえ 5行 1004 えおいうえ 6行 1005 うえおあい 7行 1006 うえああい 第1表は空白が多くて 見ずらいので A2 からB725を 検索して 空白行を省いた表を作りたい。

  • エクセルで一つのセル内で空白の行だけ削除したい

    WindowsXP エクセル2003を使用しています。 一つのセル内の空白の行だけを削除したいのですが、方法はありますか? 具体的にはA1内に下記のように入力があります。 -------------------------------------------------------------------- あいうえお かきくけこ さしすせそ たちつてと -------------------------------------------------------------------- 「かきくけこ」と「さしすせそ」の間の空白の行だけ削除したいのですが、可能でしょうか? 他の行の改行はそのまま残したいので、CLEANだと無理でした。

  • エクセルで空白セルを寄せたい

    エクセル2002使用です VBAは使わずに関数だけで空白セルがあるセルを詰めて表示したいのですが・・・   A|B|C|D|E|F|G 1 あ い う え お か き 2 ○   ○ ○   ○ の表を   A|B|C|D|E|F|G 1 あ う え か  2 ○ ○ ○ ○ のように表を書き換えたいのです。 1行目には必ず文字が入力されています。 2行目には入力されているセルと空白セルが不定期に入力されています。 2行目のセルが空白ならば、1行目のセルも削除して左へ詰めて 表を転記したいのです。 よろしくお願いします。

  • Excel 空白行を上に詰めるマクロ

    関数を使用して、sheet1からsheet2に必要なデータを抜き取りました。 sheet2のセルには関数が入っています。 sheet2の抽出データには1行単位(まれに2~3行続けて)空白が発生します。 この行を削除し、かつ上に詰めて表示をしたいのですが、下記の条件で実行可能でしょうか? (例) sheet1 ⇒ sheet2   A   B   C     A  B  C 1 あ  い  う   1 あ  い  か 2        か   2 (空白行) 3 き  く   け    3 き  く  し   4 こ  さ   し   4 (空白行) ●2行目、4行目を削除し、且つ5行目以降に入力されている関数は削除したくない ●空白行削除のマクロは自動?(sheet1のデータを変更したら)で実行できるようにしたい よろしくお願いします。

  • Excelで空白行を削除したい

    2500行位使用しているシートのなかに、どのセルも空白になっている不要な行が300行くらい混ざっています。 この行を自動的に削除するにはどうすれば良いでしょうか。 ただ、その行のA~Eセルは空白でもFセルに値が入っているなど完全に空白でない行は削除できません。 メニュー、関数、VBAなど有れば教えてください。

  • Excel テーブル内の空白行の削除について

    テーブルの任意の行のデータを削除し、空白削除ボタン(cmd_Blank)をクリックすると削除したデータ行(空白行)を削除するVBAを作ったのですが空白行が1つの場合は問題なく動作するのですが(添付左)、 ・空白セルがあるとその行がすべて削除されてしまう(添付中央)。 ・空白行が2つ以上あるとエラーになってしまう(添付右) という問題に悩んでいます。 空白削除ボタンクリック時のコードは Private Sub cmdBlank_Click() ActiveSheet.ListObjects("T住所").DataBodyRange.SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub になります。 添付の図がわかりにくいかと思いますが、ボタンクリックすると テーブル内の空白行があったら、その行のみ削除され、上詰めに したいということです。 どなたか教えていただきたいです。

  • Excel2000で連続データの空白行を挿入したい。

    Excel2000で連続データの空白行を挿入したい。 A1=B1+C1 A2=B2+C2 A3=B3+C3 (あと続く) と連続データになっているものに空白行を2行入れる方法を教えてください。 結果的に下記のようにしたいのです。 A1=B1+C1 A2=空白 A3=空白 A4=B2+C2 A5=空白 A6=空白 A7=B3+C3 (あと続く) ジャンプ機能を使うとできた気がするのですが・・・。 よく覚えていなく、わかりません。 どなたか教えてください。 よろしくお願いします。

  • 行挿入+貼付けと空白行削除を同時に行うには?

    行挿入+貼付けと空白行削除を同時に行うには? VBA初心者です。 仕事でエクセルを使っていますが、 no  工程1 工程2 工程3 1   A   B   C 2   B   _   A 3   C   A   _ 4   _   C   A という表を no  工程 1   A     B     C 2   B     A 3   C     A 4   C というように並び替えたいのですが、 現在は各番号ごとに3行挿入して工程をコピー、行と列を入れ替えて貼付けをしています。 これだと no  工程 1   A     B     C 2   B      A 3   C     A 4     C     A のように空白行ができてしまいます。これをもう一度、マクロで消しているのですが、 データ量が多いため、行挿入と空白行を消す作業を同時に行わないとシート最大行数である 65536行を超えてしまう可能性があります。 同時にやるにはどのようにすればよいのでしょうか? よろしくおねがいします。

  • エクセル2002で、ある列が空白なら、その空白のある行は削除する方法

    エクセル2002で、 ある列に空白のセルがあった場合、その行を削除する方法を教えてください。 例えば、B列を選択して、 編集、ジャンプ、セル選択、空白セル、OKとたどって、 セルB11、セルB22、セルB33が空白セルなら、 11,22,33の行を削除する方法を教えてください。

  • エクセルマクロで、空白行の一つ下の行を削除したい

    下記のようなデータがあるとき、空白行の一つしたの町名を一括で削除するには、どのようなマクロがあるでしょうか。 一定の行数なら私にもわかるのですが…、どなたか教えていただけないでしょうか。 町名   男  女  計 青山    86  183  269 →これが下の四つの町の小計になります。 ○○町  25  43  68 ××町  11  45  56 ▽▽▽  30  55  85 ◆◆◆  20  40  60                  →空白行 北山町   41  100 90 →これが下の二つの町の小計になります。 △△町  11  45  56 ■■■  30  55  85 このような表が、8000行あります。必ず空白行の下の行が小計になります。 空白行の一つ下の行、「青山」と「北山」の行を、マクロを使って一度に削除できるでしょうか?

専門家に質問してみよう