2010年5月7日
摘要: Function Tidy(ByRef sheets() As Worksheet)Dim value As ObjectDim rang As Excel.RangeDim isNum As BooleanDim sheet As WorksheetFor k = 0 To UBound(sheets) '获取数组长度Set sheet = sheets(k) 阅读全文
posted @ 2010-05-07 17:19 刘宁Toby 阅读(2159) 评论(0) 推荐(0) 编辑