解决VBA生成Excel单元格显示"#"的问题

iteye_20812

于 2009-11-30 20:39:16 发布

阅读量534

点赞数

分类专栏：其他框架文章标签： Excel VBA

其他框架专栏收录该内容

11 篇文章

订阅专栏

因为生成的单元格的格式为Text,且数据比较多的时候会显示"##################"

所以在填充数据的时候设置下单元格的属性:

Sub WriteValue(ByVal sheet As Excel.Worksheet, ByVal rowNum As Integer, ByVal text As String, ByVal pos As String)
   Dim cell As Excel.Range
   Set cell = sheet.Range(pos & rowNum)
   cell.NumberFormat = "General"
   cell.value = text
   Set cell = Nothing
End Sub