VBA转换数据 问题解决实例源码介绍，遇到一个数据转换的问题，带字符标识的绿色小图标的转换，其实很简单，用CDBL()即可。
Sub temp()

For i = 1 To ThisWorkbook.Sheets(1).UsedRange.Rows.Count

tmp = ThisWorkbook.Sheets(1).Cells(i, 1).Value
ThisWorkbook.Sheets(1).Cells(i, 1).Value = CDbl(tmp)
Next i

End Sub