摘要: -- 新建表格:#单元格a1-a100全部等于1的代码 Sub test() Dim i As Integer For i = 1 To 100 Range("a" & i) = 1 Next End Sub -- 新建表格:#单元格a1-a100等于1-100的代码 Sub test() Dim i As Integ... 阅读全文
posted @ 2018-10-31 20:30 huihui1314520 阅读(828) 评论(0) 推荐(0) 编辑