2014-01-24 33 views
0

我嘗試遍歷包含(n).CSV文件的文件夾(這些文件已導入並分離(分割))。複製CSV值更改格式

i將源文件中的特定列(S:V)複製到我的工作簿(Makrofile.xlsm)中。

問題:

數的在Sourcefiles格式是:用於實施例5,8987複製這些數字後和粘貼它們,之前改變格式後的格式改變到558.97

在最好的情況下

從複製的SourceFile我改變格式

列( 「S:S」)。選擇 Selection.NumberFormat = 「0.000」

然後複製和關閉的資源文件,然後我粘貼到m y(Makrofile.xlsm)結果是:5.5897

我有德文Excel和逗號ist(,)。我不能用這個數字來操作。

任何想法保持粘貼後CSV值的格式?

謝謝大家非常

回答

0

您是否嘗試過使用Range.PasteSpecial方法?我對CSV文件沒有太多的工作,所以我可能在這裏稍微有點偏,但是因爲我還沒有看到你的代碼,所以你可能還沒有嘗試過。

expression.PasteSpecial(Paste, Operation, SkipBlanks, Transpose) 
'Implementation: 

Workbooks("YourWorkbook").Sheets("Sheet1").Range("A1").PasteSpecial xlPasteValuesAndNumberFormats 

或者這裏是從MSDN

With Worksheets("Sheet1") 
    .Range("C1:C5").Copy 
    .Range("D1:D5").PasteSpecial xlPasteValuesAndNumberFormats 
End With 

你有這樣幾件事情之間選擇一些代碼:xlPasteFormats xlPasteValuesAndNumberFormats,xlPasteValues,xlPasteAll。你可能想要試驗一下最適合你的東西。

如果這不是'你在找什麼,只是讓我知道,我會刪除它。