![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
エクセル 空白を無視して並び替える方法を教えてください。
こんにちわ。
下記のようにしたいのですが、方法が思いつきません。ぜひアドバイスをお願いします。
例
A B C D E
1 あああ 空白 いいい ううう 空白
2 空白 えええ 空白 おおお かかか
3 ききき 空白 くくく 空白 けけけ
このように空白がところどころに混ざっている状況で
F G H
1 あああ いいい ううう
2 えええ おおお かかか
3 ききき くくく けけけ
のように空白を除き並び替えたいです。
私の頭で思いつかなかったため、アドバイスをお願いします。
今回はできればマクロを使用しないで行いたいです。
ちなみに使用しているのはOffice2003です。
No.4ベストアンサー
- 回答日時:
一例です。
F1に以下の数式を貼り付け→shift+ctrl+enterキーを同時押下→縦横にコピー
=IF(COUNTA($A1:$E1)>=COLUMN(A1),INDEX($A1:$E1,SMALL(IF($A1:$E1<>"",COLUMN($A1:$E1),999),COLUMN(A1))),"")
No.7
- 回答日時:
適当な列(ここでは仮にZ列)を作業列として使用し、
まずはZ1セルに次の数式を入力して下さい。
=IF(COUNTIF($A1:$E1,"><")=0,"",SUBSTITUTE("(株)(有)"&$A1&"(株)(有)"&$B1&"(株)(有)"&$C1&"(株)(有)"&$D1&"(株)(有)"&$E1&"(株)(有)","(有)(株)",))
次に、Z1セルをコピーして、Z2以下に貼り付けて下さい。
次に、F1セルに次の数式を入力して下さい。
=IF($Z1="","",MID($Z1,3,FIND("(株)(有)",$Z1,2)-3))
次に、G1セルに次の数式を入力して下さい。
=IF(3+SUMPRODUCT(LEN($F1:F1)+2)>LEN($Z1),"",MID($Z1,3+SUMPRODUCT(LEN($F1:F1)+2),FIND("(株)(有)",$Z1,3+SUMPRODUCT(LEN($F1:F1)+2))-3-SUMPRODUCT(LEN($F1:F1)+2)))
続いて、G1セルをコピーして、H1~J1の範囲に貼り付けて下さい。
次に、F1~J1の範囲をコピーして、同じ列の2行目以下に貼り付けて下さい。
以上です。
No.6
- 回答日時:
No.5です!
たびたびごめんなさい。
E列まで元データがあるのを勘違いしていました。
F1セルの数式を
=IF(COUNTA($A1:$E1)<COLUMN(A1),"",INDEX($A1:$E1,SMALL(IF($A1:$E1<>"",COLUMN($A$1:$E$1)),COLUMN(A1))))
(前回同様配列数式になります。)
としてJ1セルまでコピーしてください。
どうも何度も失礼しました。m(__)m
No.5
- 回答日時:
こんにちは!
簡単は方法はすでに回答が出ていますが、
関数での方法をご希望のようなので・・・
質問通りにデータはD列の4列をF列以降に表示させるとします。
F1セルに
=IF(COUNTA($A1:$E1)<COLUMN(A1),"",INDEX($A1:$E1,SMALL(IF($A1:$E1<>"",COLUMN($A$1:$E$1)),COLUMN(A1))))
これは配列数式になってしまいますので、この画面からコピー&ペーストしただけではエラーになると思います。
F1セルに貼り付け後、F2キーを押す、またはF1セルをダブルクリック、または数式バー内で一度クリックします。
編集可能になりますので、Shift+Ctrlキーを押しながらEnterキーで確定します。
数式の前後に{ }マークが入り配列数式になります。
このF1セルをI1セルまでオートフィルでコピーした後に下へコピーすると希望に近い形にならないでしょうか?
以上、参考になれば良いのですが・・・m(__)m
No.3
- 回答日時:
該当するセル範囲をがばっと選択して、「編集」メニューからジャンプ→セル選択→空白セルでOK。
選択されたセルのどこかにカーソルを置いて、右クリックで削除。オプションで「左に詰める」を
選んでOKすれば、お望みの通りになりませんか?
ただし、データ量が多すぎる場合は、フリーズする可能性があるので、そのときは分割して
やってみてください。
データの左端、下端から分割して実行するのがいいと思います。
No.2
- 回答日時:
並べ替えというか、空白詰めですね。
ファイル~名前を付けて保存
ここでファイルの種類を「csv」にします。
保存が終わったら、ファイルを閉じます。
テキストエディタ(メモ帳など)で、いまのCSVファイルを開きます。
編集~置換(違う場合もあります)で、
置換前 「,,」
置換後「,」
で、全て置換を実行します。空白が連続する場合は、置換候補が無くなるまで繰り返し実行します。
行の先頭が「,」の場合には、正規表現に対応したテキストエディタなら置換できますが、わからなければ取りあえず直接編集して下さい。
(Excelの並び替えなどで、あらかじめ先頭が空白のセルを消しておくのもいいかも)
上書き保存してExcelで開くと、空白が抜けたものになっています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルの表でダブりを解消する方法を、教えてください。 5 2023/04/12 12:11
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- Excel(エクセル) 列の複数ある空白セルを飛ばして、セルに並べて表示したい 3 2023/02/12 16:49
- Excel(エクセル) セルに入力があれば表示させるには? 3 2023/05/14 22:08
- Excel(エクセル) エクセルの関数を教えてください。② 9 2023/05/25 15:28
- Excel(エクセル) 特定文字(数字)で行挿入、挿入された行で合計したい 2 2023/03/13 14:30
- 財務・会計・経理 経理仕訳について教えていただきたいです。 ※発生仕訳必須 1月分給与(1/1−1/31分)に12月の 1 2023/02/24 16:16
- Excel(エクセル) エクセル データの入力規制について 3 2022/03/30 17:16
- Excel(エクセル) エクセルで、対象セルが10時までと、空白なら空白をそれ以外は、対象セルから10時を引いた時間を算出す 1 2023/04/13 08:17
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
エクセル2003で並べ替えする場合で、空白行を先頭ではなく末尾に表示し
Excel(エクセル)
-
エクセルの並び変えで、空白セルを一番上にもってくる方法を教えてください。
Excel(エクセル)
-
エクセルVBA 最終行を選んで並び替え (空白セルを一番上に表示したい)
Excel(エクセル)
-
-
4
日付を昇順で並び替えし、空白は最後にしたいです。
その他(データベース)
-
5
空白セルのあるエクセル表の並び替え
Excel(エクセル)
-
6
excelで、空白を除いてデータを抽出する方法について
Excel(エクセル)
-
7
エクセルで0を除いて昇順に並べ替えできますか
Excel(エクセル)
-
8
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
9
入力後に日付順になるように自動で並び替えしたいのです。
Excel(エクセル)
-
10
エクセルVBA 最終行を選んで並び替え
Excel(エクセル)
-
11
『エクセル』特定の文字を無視した並べ替えをするには?
Excel(エクセル)
-
12
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
13
特定セルの内容を更新したら、その更新日を自動的に表示する方法について
Excel(エクセル)
-
14
数式による空白を無視して最終行までコピーするマクロ
Excel(エクセル)
-
15
VBAで重複するデータがあれば1個だけ残して他の重複セルを"(空白)にしたいのですが
Excel(エクセル)
-
16
【ExcelVBA】マクロの入ったシートをコピーしても新しいシート内でマクロを動作させるには?
Excel(エクセル)
-
17
空白行を無視してコピーするマクロについて
Excel(エクセル)
-
18
Excelで数式の入っているセルを空白と認識させたい
Excel(エクセル)
-
19
VBAで繰り返しコピーしながら下へ移動させる方法
Excel(エクセル)
-
20
【EXCEL】【VBA】空欄は飛ばして処理する方法を教えて下さい。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelデータをコピペして、ペー...
-
スプレッドシート、Excelでの数...
-
エクセルの関数について教えて...
-
スプレッドシートで使う数式を...
-
Microsoft Officeの中古は信用...
-
エクセルで会社の従業員のデー...
-
Excelで50個のセルに同じ文字を...
-
エクセルの表で1年間の曜日を...
-
エクセルでの特別な文字を上に...
-
エクセルで不等号記号(≠)が上に...
-
エクセルでB列でフィルターをか...
-
エクセルでセルに標準で入力さ...
-
Excelで、項目の種類ごとにカウ...
-
【マクロ】アクティブセルにブ...
-
EXCELの質問です 119から足した...
-
【マクロ】アクティブセルの、...
-
【マクロ】アクティブセルの行...
-
エクセルの空欄をつめて、次の...
-
Excelの数式について教えてくだ...
-
非表示列の再表示に失敗
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBA、別ブックへ転記す...
-
エクセルでの作業計算方法について
-
時間によってファイル名が変わ...
-
【関数】適切な文字数の数字を...
-
Excelについて教えてください
-
エクセル初心者です 関数の入れ...
-
【マクロ】ファイル名の変更に...
-
UNIQUE関数が使えないバージョ...
-
エクセルの計算
-
【関数】先頭だけにある、半角...
-
Excelで、決まった行を繰り返し...
-
Excelでセルの値が同じか...
-
LOOKUP関数を使えばいいのでし...
-
Excel
-
はがきについて。
-
エクセルの条件付き書式につい...
-
エクセルのデーターが2か月前の...
-
エクセル②
-
エクセルで「-0.0」と表示さ...
-
Microsoft1Officeの互換ソフト...
おすすめ情報