用語集の変換の話で、Excel のセル内にタブや改行があると変換が失敗すると書いたのですが、実際にこれらを検索するのは結構むずかしいように思います。^^;

普通、Excel のセルにはタブを入力できないのですが、別のファイルから Excel に変換されている場合などは、タブが入っていることがあります。
しかし、タブを検索しようとしても、検索文字列にタブを入力できず、そのままでは検索できません。

改行の場合は、検索文字列のところに Ctrl ＋ J と入力すれば、検索できるようです（今日初めて知りました ^^;）。

ただし、Ctrl ＋ J は、Chr(10)（LF：ラインフィード）のようで、Chr(13)（CR：キャリッジリターン）は検索できないようです。
手持ちのファイルで、Ctrl ＋ J をスペースに置き換えたのですが、一部の改行が残ってしまいました。

結局、Excel のマクロで改行とタブを半角スペースに置き換えることにしました。


Sub 改行をスペースに置換()
'
Cells.Replace What:=Chr(10), Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
'
Cells.Replace What:=Chr(13), Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

End Sub


Sub タブをスペースに置換()
'
Cells.Replace What:=Chr(9), Replacement:=" ", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False

End Sub

[0回]