摘要: Sub ins_line() '1插入空行,行数等于原本数据行数 x = InputBox("插入多少个空行?") For i = 1 To x Cells(i * 2, 1).Select Selection.EntireRow.Insert Next iEnd SubSub Copydata() ' 2Copydata Macro 复制数据,行数等于添加后的总行数 x = InputBox("... 阅读全文
posted @ 2009-12-04 10:29 huggins 阅读(354) 评论(0) 推荐(0) 编辑
摘要: 1.Authorization setting requirements of saving workbook:需要的权限对象为:S_GUI:60S_BDS_DS:03,302.Authorization setting requirements of saving workbook to roles:S_USER_AGR:01,02,22S_USER_TCD: RRMX注释:需要在Role中Me... 阅读全文
posted @ 2009-12-04 01:12 huggins 阅读(456) 评论(0) 推荐(0) 编辑