2012-08-03 60 views
2

我寫在VBA一個腳本,從文本文件號碼將被插入到工作表。插入值後,Excel建議我將字符串的值轉換爲數字。在單元格內,出現一個綠色三角形。選擇單元格後,可以選擇不同的選項來格式化單元格內的值。更改值從字符串到數

我也試圖轉換值在VBA與CDbl(string)但沒有任何反應一倍。

更改NumberFormat也不起作用。我在VBA和Excel中嘗試了不同的值。

我也試圖錄制宏在選擇的方法,但沒有任何保存在萬客隆內。

任何人都知道如何做到這一點?

enter image description here

+0

這可能是最好的修改宏(腳本)。發佈這樣做的代碼,我可能會修改它作爲數字插入。 – 2012-08-03 09:38:29

回答

0

試試這個。我以A1單元爲例。此外,如果有十進制值,則代替Long使用Double並相應地更改NumberFormat

Sub Sample() 
    Dim clVal As Long 

    With Sheet1.[a1] 
     clVal = Val(.Value) 
     .NumberFormat = "0" 
     .ClearContents 
     .Formula = clVal 
    End With 
End Sub 
+0

謝謝。忘記數組中的值包含一種類型。我把它轉換成插入它,但再次從循環訪問後,它再次是一個字符串。 – 2012-08-03 10:00:21

0

這可能看起來有點傻,但是你試過Range("A1").Value = Range("A1").Value

更一般地,你可以通過myrange循環,假設它是要修復的範圍:即把文本文件數據到表

For Each c in myrange 
    c.Value = c.Value 
Next 
+0

如果單元格被格式化爲文本,這將無濟於事。 :) – 2012-08-03 09:44:21