Posted at

Excel を PDF 出力する際に謎の四角が表示されてしまうのを解消する

More than 3 years have passed since last update.

Excel を PDF 出力する際に が表示されることがあります。


原因

これはセル内の改行コードが CR+LF または CR となってしまっているためです。

セル内の改行コードは LF を想定しているようです。


解決方法

CR+LFCRLF に変換することで、四角()が表示されなくなります。

' A1 に CR+LF または CR の改行コードが入っているとした場合

Range("A1").Value = Replace(Replace(Range("A1").Value, vbCrLf, vbLf), vbCr, vbLf)

毎回 VBA 書いて置換するの面倒だよ!という方は、以下のような自作関数登録しておくと良いと思います。

Function normalizeNewLine(value As String) As String

normalizeNewLine = Replace(Replace(value, vbCrLf, vbLf), vbCr, vbLf)
End Function

それではステキな Excel ライフをお送りください。