EXCEL VBA创建sheet/工作簿

1.需要创建以地市命名的系列sheet，但不想手动创建改名。 代码实现如下： Sub SheetAdd() Dim i As Long '定义一个长整型变量 Sheets.Add After:=Sheets(Sheets.Count), Count:=Sheets(1).Range("A" & Rows.Count).End(xlUp).Row

>>阅读原文<<