2005.01.17

Excelの改行コード

Accessにて、ExcelデータをSQL SERVERに取込むというプログラムを作成しました。
その際、セルデータの中に改行があった場合は、その改行記号を半角スペースに変換すると
いう仕様があり、Replace(セルの値, Chr(13) & Chr(10), " ")とReplace関数を間に入れたが
うまくいきませんでした。

悩んだ末、とある個人のHPで、テキストボックス内の改行記号は、Chr(13) & Chr(10)であるが
ワークシートのセル内の改行記号は、Chr(10)である。という説明を発見し、
Replace(セルの値, Chr(10), " ")と変えて実行したところ、うまく動作しました。

個人のHPで、このような技術的な内容を公開していて頂いている事を改めて、感謝しました。

photo
admin