エクセルでＣＲＬＦ（改行）コードが「・」で表示される

質問

見積りデータ（アクセス）をエクセルにエクスポートして使用しているのですが、
その中のデータに改行コード（ＣＲＬＦ）が含まれている物があります。
エクスポートされたエクセルファイルを開くと
パソコンによってＣＲＬＦが「・」で表示されたり、何も表示されなかったりします。
　※同じファイルを開いてもパソコンよって表示が異なっています。

ＣＲＬＦがあっても何も表示しない様にしたいのですが
対応方法を教えてください。

上記の２台の差ですが
「・」表示されるＰＣのＯＳはＷｉｎ２０００で
ＣＲＬＦが何も表示されないＰＣのＯＳはＸＰくらいです。
共通部分は
Ｏｆｆｉｃｅ２０００（ＥＸＣＥＬ２０００）
ＰＣはＤＥＬＬのＤｉｍｅｎｓｉｏｎ４１００

以上、お願いします。

回答No.1

maruru01 · ベストアンサー

こんにちは。maruru01です。

「・」だけで、セル内改行はされないのでしょうか。
そうなら、LF（CHR(13)）のみの改行だと思います。
Excelのセル内改行はCR（CHR(10)）なので、CRLFがあれば、「・」があってしかもセル内改行するはずです。

どちらにしろ、Excelの標準機能では難しいので、VBA（マクロ）を使用するしかないと思います。
VBAでは、Replace関数を使用して、改行コードを""（長さ0の文字列）に置換します。

もしくは、Accessで改行コードを削除（クエリなど）してからエクスポートするかですね。

ちなみに私の環境はWin2000なので、XPについてはわかりません。

補足

こんにちはmaruru01さん
回答ありがとうございます。

>「・」だけで、セル内改行はされないのでしょうか。
セル内で改行もされています。
こんな感じです。

***正常なＰＣ***
ＡＡＡ
ＢＢＢ
ＣＣＣ

***「・」がつくＰＣ***
ＡＡＡ・
ＢＢＢ・
ＣＣＣ

最終的に行いたいことは、アクセスで入力されたデータに改行（ＣＲＬＦ）が
あれば、エクセルの方でも「・」を表示せずに改行したいという事です。

自分の事例では、同じエクセルファイルを開いても
「・」が表示されるＰＣと表示されないＰＣが存在します。
全く同じファイルですからデータ内容は同じという事になります。
開く側のアプリケーションも同じＥＸＣＥＬ２０００ですし
普通で考えれば、どのＰＣで開いても同じ状態になるはずだと思うのですが
実際は「・」が有ったり無かったり、異なる表示になってしまっています。
何かＰＣの設定やエクセルの設定で対応できると思うのですが

質問の書き方がわかりにくく、迷惑をかけました。
わかる範囲で教えてください。

回答No.3

ryuu001

No.2ですが、出来ましたでしょうか？

まだ締め切られていませんでしたので、関数を作りました。
これをモジュールに入れておきます。

クエリーから使用できます。
クエリーの結果は　見た目　フィールド内での改行はありませんが、
これを　コピーし　エクセルへ　貼り付けると、
エクセルのセル内で改行しています。

モジュールへ登録する内容
Function test2(In_Data As String) As String
test2 = Replace(In_Data, vbCrLf, Chr(10))
End Function

この関数（test2）はクエリーから　普通の関数と同じに使用できます。

お礼

お礼が遅くなってすみません。

問題はＶＢで解決しました。
やはり改行コードがＡＣＣＥＳＳとＥＸＣＥＬで
異なってるのが原因みたいです。

しかし、完全に納得できません。
同じエクセルファイルを開いても
「・」が表示されるＰＣとされないＰＣがあるのか？
この点は、ＡＣＣＥＳＳとＥＸＣＥＬの改行コードが違うという
問題点とは関係ないですし
何にせよ、相変わらずＭＳ的な仕様らしさをあらためて実感しました。

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

回答No.2

ryuu001

アクセスの　vbcrlfは　chr(13) & chr(10) だと思います。
文字列内の　chr(13) を削除します。

反対に、エクセルからアクセスに出力した時、
chr(10)　が有れば、chr(13) を挿入します。