2009年4月20日
excell宏的应用
摘要： Sub Macro1()'' Macro1 Macro'' 快捷键: Ctrl+z' Dim i As IntegerDim str As StringDim rowmax As Integer '最大行号 rowmax = 100For i = 1 To rowmax str = i & ":" & i Range(str).Select If Selection.RowHei... 阅读全文
posted @ 2009-04-20 11:11 kuailewangzi1212 阅读(577) 评论(0) 推荐(0) 编辑