主题：关于显示0的问题！

生成以后，循环每一个单元格，改成空值

For Each r As Row In Tables("表a").Rows
    For Each c As Col In  Tables("表a").cols
        If c.IsNumeric AndAlso r(c.name) = 0 Then
            r(c.name) = Nothing
        End If
    Next
Next