以下是引用xl在2009-10-1 7:38:00的发言:
顶一下!
狐表该增加功能很多,如“追加表”,“表结构EXCEL导入”,“清零”等
追加表的问题,贺老师说过,不能增加,导入的问题,现在就可,全表清零的问题,贺老师曾做过一段代码,我找到后发上来
For Each c As DataCol In DataTables("表A").DataCols
If c.IsNumeric Then
For Each r As DataRow In DataTables("表A").DataRows
If r.IsNull(c.Name) = False And r(c.Name) = 0 Then
r(c.Name) = Nothing
End If
Next
End If
Next
[此贴子已经被作者于2009-10-1 9:22:22编辑过]