Excelで2行を1行にまとめるには?

Excelで2行を1行にまとめる方法を教えてください。下の6行を2行にするには、どうしたらいいのでしょうか?
よろしくおねがいします。

Excel2003です。


A little knowledge is a dangerous thing.
（生兵法はけがのもと）
空白行
After a storm comes a calm.
（雨降って地固まる）
空白行

↓
第1行：A little knowledge is a dangerous thing.（生兵法はけがのもと）
第2行：After a storm comes a calm.（雨降って地固まる）

No.12 ベストアンサー 回答者： imogasi 回答日時： 2004/09/24 20:03

(データ）A1:A100

（１）A little knowledge is a dangerous thing.
（２）（生兵法はけがのもと）
（３）空白行
（４）After a storm comes a calm.
（５）（雨降って地固まる）
（６）空白行
（７）・・・・（略）
（８）・・・・
（９）・・・・
（関数式）E1に（B1でも良いが）
=INDEX($A$1:$A$100,(ROW()-1)*3+1,0)&INDEX($A$1:$A$100,(ROW()-1)*3+2,0)
E2以下最下行の１／３行まで複写する。
（結果）
（１）A little knowledge is a dangerous thing.（生兵法はけがのもと）
（２）After a storm comes a calm.（雨降って地固まる）
（３）以下略

この回答へのお礼

ありがとうございました。参考になりました。
大変、助かっています。

お礼日時：2004/10/10 13:23

No.11 回答者： jindon 回答日時： 2004/09/24 18:38

#のjindonです。

ギャップなしで表示するには。
データがA列の：

１行目からの場合
B1に
=IF(ROW()<=COUNTA(A:A)/2,INDIRECT("a"&ROW()*2-1)&INDIRECT("a"&ROW()*2),"")

2行目からの場合
B2に
=IF(ROW()<=COUNTA(A:A)/2,INDIRECT("a"&ROW(A1)*2)&INDIRECT("a"&ROW(A1)*2+1),"")

として、下方コピー+ペースト

No.10 回答者： noname#176215 回答日時： 2004/09/24 18:18

済みません質問の意図を勘違いしたようです。

下の回答は忘れて下さい。入力のパターンが決まって
いるのなら

=INDEX(A:A,(ROW(A1)-1)*3+1)&INDEX(A:A,(ROW(A1)-1)*3+2)

で良いと思います。失礼しました。

No.9 回答者： noname#176215 回答日時： 2004/09/24 18:09

一発でやるのは難しいですね。

ひとつの式だと

=IF(A1="",CHAR(10),A1)
&IF(A2="",CHAR(10),A2)
&IF(A3="",CHAR(10),A3)
&IF(A4="",CHAR(10),A4)
&IF(A5="",CHAR(10),A5)

こうなります。作業列に分けた方が面倒がなく
て良いかもしれません。

この回答へのお礼

ありがとうございました。参考になりました。

お礼日時：2004/10/10 13:23

No.8 回答者： handomari 回答日時： 2004/09/24 18:01

＃７のhandomariです。

Excelの式でよければ、次の式が簡単ですよ。

●セルA1とセルA2の文字列を結合する。
　=A1&A2

●セルA1とセルA2の文字列を空白を空けて結合する。
　=A1&"　"&A2

この回答へのお礼

ありがとうございました。参考になりました。

お礼日時：2004/10/10 13:25

No.7 回答者： handomari 回答日時： 2004/09/24 17:58

私のやり方は、独特ですが、参考にしてください。

１．元のデータを、Wordにコピーします。
２．Wordでセルの結合をします。
３．手動で改行を削除します。
４．データをExcelにコピーして戻します。

いかがですか？

No.6 回答者： noname#8094 回答日時： 2004/09/24 17:43

4です、すみません、間違って解釈しておりました。

セルを結合すると、片方の中身は失われてしまうんですよね、そうじゃない方法でひとつにしたいということでしたら、やはりきりとり、はりつけしかないと思います。

No.5 回答者： POKIE 回答日時： 2004/09/24 17:42

上からA1～A6に元の文が入ってるものとします。

どこか開いているセルに
=concatenate(A1,A2)
=concatenate(A4,A5)
と入れれば出来ます。
英文と"（"の間にスペースを入れたければ
=concatenate(A1," ",A2)
とすればスペースも入ります。

この回答へのお礼

ありがとうございました。参考になりました。

お礼日時：2004/10/10 13:24

No.4 回答者： noname#8094 回答日時： 2004/09/24 17:38

通常、ひとつにまとめたいセルをクリックして、”書式”、”セル”、”配置”で、いちばん下の、セルを結合するにチェックを入れます。

あるいは、Altキーを押しながら、Enterキーを押すと、ひとつのセル内で改行できます。

No.3 回答者： hika_chan_ 回答日時： 2004/09/24 17:33

切り取り→貼り付け

これじゃめんどくさいですか？

（生兵法はけがのもと） を切り取ります
そして、thing.のところに貼り付けます。
そうすると、空白が2行現れると思うので、
その空白の右側の数字のところを消したい分だけドラッグして『右クリック』します。
そして、削除をクリックします。

これを繰り返します。