[[20150502111203]]　『セル内改行』（Golden中恐縮）　ページの最後に飛ぶ

『セル内改行』（Golden中恐縮）

例えば、以下の場合、
　Å　Ｂ　Ｃ
1 猫　犬　URL

セルD1に、

好き：猫　　　→つまり、文字列（好き：）セルA1
嫌い：犬　　　→つまり、文字列（嫌い：）セルB1
リンク：URL（例えばhttp://www.google.com）　　→つまり、文字列（リンク：）セルC1

と、セルA1、B1、C1を改行した状態で入力したいと思っています。
その際、セルD1には改行されたデータが入っていればいいので、ワークシート上では改行表示したくないのと（「折り返して全体を表示」したくない）、セルD1をコピーしてテキストファイル等に張り付けた際に、数式ではなく、改行された結果でペーストできたらと思っています。

そんな条件ですがD1に入力すべき関数をお手すきでお願いします。

＜使用アプリ：、使用 OS：Windows7 ＞

 途中に改行が入ると、コピーしたときに先頭と末尾に " が付くようですが、
=CONCATENATE("好き：",A1,CHAR(13)&CHAR(10),"嫌い：",B1,CHAR(13)&CHAR(10),"リンク：",C1)
 のような式でしょうか。

（Mook） 2015/05/02(土) 11:54

早速恐縮です。

正にその通りです。

しかし、この例ではその通りになるのですが、当方のデータで試してみると上手くいきませんでした。

具体的には、セルL2に、
=ONCATENATE("社名：",D2,CHAR(13)&CHAR(10),"住所：",N2,CHAR(13)&CHAR(10),"リンク：",P2)

を入力しましたが、この関数のまま表示されてます。
（なお、それ以外の2行目は埋まっていたり、いなかったりします）

ちなみに、例にて、セルD1を選択してF2を押すと、選択されているセル（例A1）と、関数内の同じセル（例A1）が同じ色で表示されますが、当方のデータでは、F2を押しても（）（カッコ）が緑色になるだけで、選択されているセル、及び関数内のセル共に、黒い文字のままです。
（Golden中恐縮） 2015/05/02(土) 13:49

度々恐縮です。

当方のデータ（2行目（1行目は見出し））を、新しいワークシートにペーストして試みたところ、何かの拍子に「その通り」の表示になりました。その何かの拍子は現在確認中です。

前回のF2を押すと云々の話は、
例の場合、F2を押すだけで、セル及び関数内のセル文字の色が変わる。
当方のデータの場合、F2を押すだけでは色は変わらず、カーソルをどこでもいいので移動しなければならない。
の違いだけでした。（これが意味あるのかないのか不明ですが）

また今更ですが、今はこの手法で問題ないですが、先々「先頭と末尾に " 」がないほう、、、とも思われます。
もし、「先頭と末尾に " 」がない方法がありましたら、お手すきでアドバイス願います。

ちなみに、「ワークシート上では改行表示したくない」は、ワークシート上で改行されていても問題ありませんが、（見づらくなるので）幅はそのままで変わらなければ問題ないです。改行以降が見えなくなっていれば問題ないです。
（Golden中恐縮） 2015/05/02(土) 14:52

 なぜCONCATENATE関数の中で&(文字列結合演算子)を使っているのか分からないが。

 >この関数のまま表示されてます。
 セルの表示形式が文字列になっていないか？
 標準にしてからF2キーで編集、その後Enterとしてくれ。

 あと、「ONCATENATE」というのはこちらに書き込む際に頭のCを付け忘れただけなのだろうか？

 =CONCATENATE("社名：",D2,CHAR(13),CHAR(10),"住所：",N2,CHAR(13),CHAR(10),"リンク：",P2) 
 または
 ="社名："&D2&CHAR(13)&CHAR(10)&"住所："&N2&CHAR(13)&CHAR(10)&"リンク："&P2
（ねむねむ） 2015/05/02(土) 14:54

 >なぜCONCATENATE関数の中で&(文字列結合演算子)を使っているのか分からないが。
 「CHAR(13)&CHAR(10)」で一セットというのをわかりやすくするためか？
（ねむねむ） 2015/05/02(土) 15:00

 >セルの表示形式が文字列

その通りでした。これでなんとかなります。

Google Earthの目印の説明で利用しようと思ってます。

AG2KMLというフリーソフトを使って、CSVファイルを読みこむのですが、説明セル（見出しは「description」としておく）に、見やすい状態（改行した状態）で入力しておく必要がありました。

説明セルをコピーしテキストファイルに張り付けは、とあえずまだ必要はないのでなんとかこれでやってみます。

ありがとうございました。
（Golden中恐縮） 2015/05/02(土) 16:13

度度々恐縮です。

新たな質問に回すべきか迷いましたが、もしご存じであればお願いします。

例えば、1行目が見出し、2行目以降はデータとします。
　Å　　　Ｂ　　Ｃ　　　Ｄ
1 住所　氏名　URL 　説明
2 ○　　　　　　 △

このとき、
説明セル（Ｄ2）には、
住所：○
氏名：
URL：△

関数
=CONCATENATE("住所：",A2,CHAR(13),CHAR(10),"氏名：",B2,CHAR(13),CHAR(10),"URL：",C2)
または
="住所："&A2&CHAR(13)&CHAR(10)&"氏名："&B2&CHAR(13)&CHAR(10)&"URL："&C2

ではなく、データがないセル（Ｂ2）を省いて、
住所：○
URL：△
としたいとき、D2に入力すべき関数はどのようになるでしょうか。
（Golden中恐縮） 2015/05/02(土) 16:49

 =SUBSTITUTE(TRIM(IF(A2="","",A1&":"&A2)&" "&IF(B2="","",B1&":"&B2)&" "&IF(C2="","",C1&":"&C2))," ",CHAR(13)&CHAR(10))
 ではどうか？

（ねむねむ） 2015/05/02(土) 18:04

ねむねむ様、完璧です。

後は、見出しの一行目を絶対参照にしてオートフィルで2行目以下にコピーすればいいと思います。

ありがとうございました。
（Golden中恐縮） 2015/05/02(土) 18:24

追伸

ちなみに、以下のデータ（1行目見出し、2列目以降データ）のD列に、
=SUBSTITUTE(TRIM(IF(A2="","",$A$1&":"&A2)&" "&IF(B2="","",$B$1&":"&B2)&" "&IF(C2="","",$C$1&":"&C2))," ",CHAR(13)&CHAR(10))
を入力し、D列のセルをコピーし、テキストファイルに張り付けたところ、3つのデータセルの内、1セルしかデータがない場合（6、7、8列目）は、先頭と末尾に " が付きませんでした。

　A　B　C　D
1 A　B　C　D
2 1　2　3
3 1　2
4 1　　3
5 　2　3
6 1
7 　2
8 　　3

結果
"A:1
B:2
C:3"

"A:1
B:2"

"A:1
C:3"

"B:2
C:3"

A:1

B:2

C:3

参考までに。
（Golden中恐縮） 2015/05/02(土) 18:45

コメント返信：

[ 一覧(最新更新順) ]

[[20150502111203]] 『セル内改行』（Golden中恐縮） ページの最後に飛ぶ

[[20150502111203]]　『セル内改行』（Golden中恐縮）　ページの最後に飛ぶ