討論群組

匯入資料庫 EXCEL 斷行 vbCrLf 問題 ~"~

garfield hsu
個人積分：2分
文章編號：34765925

2分

樓主

2012-03-27 19:58

Execl表另存TXT
會出現 "xxxx" 引號代表有斷行 ?

錄製批次
For i = 1 to 10000
Range("A" & i).Value = Replace(Range("A" & i).Value, vbCrLf, "")
Next
來排除斷行

還是有特定的文字欄位另存TXT會出雙引號
如下面這樣

"xxxx■" <~ 像這樣黑色方塊實際上複製不出來會變成下一行
會變成這樣

"
xxxx
"

請問該如何排除這個問題

2012-03-27 19:58 發佈

文章關鍵字資料庫問題 excel vbcrLF

Jimmy Yang
個人積分：1761分
文章編號：34767198

1761分

2樓

2012-03-27 21:08

請善用記事本中>>取代功能。

mictzen6116
個人積分：146分
文章編號：34767604

146分

3樓

2012-03-27 21:25

你要用vbcr 跟vblf 個別的取代或是用CHR(10) CHR(13) 個別取代
因為有時候只有一個字元有時候順序不同

garfield hsu
個人積分：2分
文章編號：34767812

2分

樓主

2012-03-27 21:34

我不太懂可否詳述賜教一組巨集寫法
非常感恩 ~"~

mictzen6116
個人積分：146分
文章編號：34767937

146分

5樓

2012-03-27 21:40

For i = 1 to 10000
Range("A" & i).Value = Replace(Range("A" & i).Value, vbCr, "")
Range("A" & i).Value = Replace(Range("A" & i).Value, vbLf, "")
Next

garfield hsu
個人積分：2分
文章編號：34768002

2分

樓主

2012-03-27 21:43

非常感恩我明天一早上班就試試看

vbCr + vbLf
了解 ~

太感恩了

X

X