[[20121025124055]]　『マクロで改行をしたい』（じゅん）　ページの最後に飛ぶ

『マクロで改行をしたい』（じゅん）

Excel2007,2010

お世話になります。

エクセルのマクロを使用して、特定の文字列があったら、
改行させたいと思っています。
範囲は、sheet1全体です。

特定の文字列 ”_”

例）
改行前）
あああ_いいい_ううう

改行後）
あああ
いいい
ううう

マクロないし関数でできればと思っています。
よろしくお願いいたします。

 置換

 [検索する文字列] _
 [置換後の文字列] Alt + 0010 (Num pad 入力のみ有効)
 (seiya)

 検索する文字列　_
 置換後の文字列　Ctrlを押しながらJキー

 これの記録をとると、
　
Sub Macro1()
    Cells.Replace What:="_", Replacement:="" & Chr(10) & "", LookAt:=xlPart, SearchOrder _
        :=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub
 (ROUGE)

seiyaさん、ROUGEさんありがとうございました。

マクロの記録、非常に便利ですね。

ありがとうございました。

コメント返信：

[ 一覧(最新更新順) ]

[[20121025124055]] 『マクロで改行をしたい』（じゅん） ページの最後に飛ぶ

[[20121025124055]]　『マクロで改行をしたい』（じゅん）　ページの最後に飛ぶ