- ベストアンサー
【Excel】置換で改行を入れる方法をおしえてください。
- みんなの回答 （3）
- 専門家の回答
質問者が選んだベストアンサー
abc1deの文字列がA1にあるとして, B1セルに=SUBSTITUTE(A1,"1","x")を入れると、B1は abcxdeになります。一般に「改行」は文字コードでは CHAR(10)なので、=SUBSTITUTE(A1,"1",CHAR(10))とB2に入れると、B2セルは"abc・de"となりますが、改行（ALTを押しつつENTERを入れると同じ効果）はしません。 なぜかは私の知識の限界外なんですが。 しかしVBAで Sub test01() Cells(3, "B") = Replace(Cells(1, "A"), "1", Chr(10)) End Sub を実行すると改行します。 Function kaigyo(a) kaigyo = Replace(a, "1", Chr(10)) End Function にして,例えば A6セルにabc1deと入れ B6セルに=kaigyo(A6)とすると"abc・de"となり改行しません。 値としてセットするか、Char(10)の作用・動作として発揮させるかの違いがあるようです。 結局VBAで Sub test02() Dim cl As Range For Each cl In Selection cl = Replace(cl, "1", Chr(10)) Next End Subを実行すると望み通りになります。 これは置換したいセル範囲（複数でも可）を指定して 実行すれば、１は消え、その位置でセル内の改行になります。
その他の回答 (2)
- comv
- ベストアンサー率52% (322/612)
こんばんは ご質問をそのまま解釈すると ・範囲選択 ・編集 置換 検索文字列 「*」 置換文字列 「Ctrl+Jキー」 （「」の部分は文字入力 間のCtrl+J はキー操作です キー操作では、なにも表示されませんがＯＫです） 全て置換後 改行されなければ 書式設定 配置 折り返して全てを表示 にチェック
お礼
ありがとうございます。 おかげさまで、これまでできなかった作業をマスターできそうです。 ご丁寧な回答をありがとうございました。
関連するQ&A
- メモ帳またはwordで改行を置換したい。
お尋ねします。 メモ帳、またはwordで「,」＋「改行」となっている部分だけ、改行を削除したいのですが、何がいい方法はありませんか？ 「置換」を使えばいいかとは思うのですが、置換の「検索する文字列」に「改行」を打ち込む方法がわかりません。 どうかよろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- Excelの置換で改行
Excelの置換で、 ある言葉のあとに改行を入れる方法を教えてください。 「AAA」という言葉を指定したら、AAAのあとに必ず改行（セル内での改行）を入れる方法です。 正規表現のようなもので改行が指定できたら、それでできると思うのですが、やり方がわかりません。 （そもそも置換で正規表現が使えるかどうかも知りません） Excel2000です。 （ただ、申し訳ないのですが、VBAなど難しいことはよくわかりません。）
- ベストアンサー
- オフィス系ソフト
- MacOS10.6 エクセル2008 改行コード 置換方法
MacOS10.6 にてExcel2008を使用しています。 いま処理しようとしているデータのセル中に改行が含まれており、これらを置換にて一括消去をしたいのですが改行コードの入力方法がわかりません。 Windowsでしたら「Ctrl+J」で検索文字列の欄に入力できるようなのですがMacで行うと変な文字がでて当然ながら置換はできません。 セル中で「Control+Option+Return」にて改行を入力する事はできますが、これを上記の置換の検索文字列欄で行うと最終セルまで移動してしまうだけで置換はされません。 大量のデータで、しかも今後定期的な作業が必要となる為に途方にくれてます。 どなたか検索置換にて「検索文字列欄」に改行コードを入力する方法ご存じでしたら教えてください。 お願いいたします。
- ベストアンサー
- オフィス系ソフト
- フリーソフトYokkaGrepでの置換時の改行作業
フリーソフトYokkaGrepでの置換時の改行作業 「改行 置換」でググると、改行を置換でなくす…という方法はでてくるのですが、 置換する時に改行をつける方法がよくわかりませんでした やりたいことは aaaa bbbb </body> という文に 検索文字列 </body> 置換後文字列 [改行]ccc[改行]</body> 最終的に aaaa bbbb ccc </body> という文章にしたいです。 YokkaGrepというフリーソフトを使っているのですが 改行の指定方法がわかりません。。。 よろしくお願いいたします
- ベストアンサー
- オフィス系ソフト
- EXCEL VBAにて、WORDへ置換
EXCEL VBAにて、WORD文書への文字列置換を行っております。 文字列の置換自体はできています。 が、 置換文字列に「改行」(vbCRやvbLF）をいれて置換すると、 word側での表示が□になってしまいます。 vbCrだけでもvbLFだけでも、vbCRLFでも□と表示されてしまいました。 chr(13) & chr(10)でも□になりました。 EXCEL VBA にて WORDへ文字列置換する場合に送る、改行コード （たぶん「^p」と予測をつけているのですが）を chr関数等での 表示方法を教えてください。 EXCEL2003 WORD2003 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- WordVBA 置換処理での改行文字の可否
（実際にはExcelのVBAからWordファイルを開いての処理になるのでExcelのVBAで組んでいますが、） WordのVBAで、置換処理を作成しています。 keyword1 = "検索文字" keyword2 = "置換文字" With objSelection.Find .Text = keyword1 .Forward = True .MatchWholeWord = True .Replacement.Text = keyword2 .Execute Replace:=wdReplaceAll End With 置換処理自体は出来ています。上記処理は置換部分の抜粋です。 しかし行いたいことはタイトルにもあります通り、置換文字中に改行を含めた状態での置換処理です。 長い文字列を置換するだけなら問題ないのですが、改行を含めてしまうと改行文字が別の文字に置き換えられてしまうようです。 置換先でも改行された状態にしたいのですが、これは書き方に問題があるのでしょうか？ もしくは置換処理ではなく、他の方法を取る必要があるのでしょうか？ 教えてください。よろしくお願いいたします。
- ベストアンサー
- その他MS Office製品
- 文字＋改行コードの置換について
文字＋改行コードの置換についてご教授ください。 テキスト内の数字「9」とそれに続く改行コードのみ置換(削除)対象にしています。 全ての改行コードが対象ではないため、下記のようにエディタ(sakuraエディタ)で指定しました。 置換前： 9\r\n ※削除したいため、置換後の欄は空欄にしています。 しかし、この設定だと置換前の文字列を置換対象として認識しません。(検索対象としても) \r\n だけだと改行コードを認識するので、文字と改行コードのセットを認識していないようです。 指定に誤りがあるのでしょうか。詳しい方ご教授お願いします。
- ベストアンサー
- その他MS Office製品
- MS-Wordで改行を検索・置換する方法
MS-Wordで改行を検索・置換する方法をご存知の方があれば教えてください。 以前(2010年)のご回答に、 「検索と置換画面の「置換」タブ画面で [オプション] を選択し、右下にある「あいまい検索」のチェックを外します。 検索する文字列にカーソルを置いて、[特殊文字] ボタン → 段落記号(P) を選択すると、検索する文字列に 「^p」が入力されます。（直接キー入力してもOKです）」がありました。 しかし、私が使っている、Word 2010には「段落記号(P) 」がなく直接「^p」を指定してもエラーになり、代わりに改行らしい「任意指定の改行(O)」「任意指定の行区切り(L)」では、Word文書の改行マークにヒットしません。 よろしくお願いします。
- ベストアンサー
- Word（ワード）
- word置換で改行は置換できますか？
word置換で改行は置換できますか？ 一斉にEnterでの改行されている部分を置換する方法はないでしょうか？ あればよろしくおねがいします。
- ベストアンサー
- その他MS Office製品
- Excel2000でのVBAでの改行の置換方法
Excel2000でVBAを利用しています。 Dim buf As string buf = "あいうえお" buf = Replace(buf, Chr(10), Chr(13) & Chr(10)) Excel2007では上記のプログラムで「あいうえお」の間に入っている、 改行コード\nを\r\nに置換することができたのですが、 Excel2000では上記のコマンドで置換ができませんでした。 なんでも良いので、何か助言頂けると嬉しいです。 答えでもなくても良いのでなんでも思いついた事をお願い致します。
- 締切済み
- Visual Basic
お礼
詳細かつ丁寧にご回答くださって、ありがとうございます。 仕事でよく使うことがあり、なにかよい方法がないか調べていたのですが、自力では解答にたどりつけずにいました。 ありがとうございます！