Excel使用vba创建预设格式的工作表。
1.首先我们打开一个工作样表作为例子。
2.我们使用alt f11组合键进入vbe编辑器,插入一个新模块,并在模块中输入以下代码:
Sub CreateNewWorkbook2()
将wb标注为工作簿
将ws标注为工作表
暗淡我一样长
“MsgBox”将创建一个新工作簿并预设工作表格式。
设置wb=Workbooks。增加
设置ws=wb。床单(1)
Ws。Name='产品概要'
Ws.cells (1,1)='序列号'
Ws.cells (1,2)='产品名称'
Ws.cells (1,3)='产品数量'
对于i=2到10
ws。单元格(I,1)=i - 1
接下来我
末端接头
3.运行此代码将创建一个新的工作簿,并设置工作簿的基本样式。工作簿中工作表的示例1
4.首先,我们定义两个对象变量,wb和ws。Wb是新创建的工作簿,它是在workbooks对象后使用add方法新创建的。因为新创建的工作簿默认情况下有三个工作表,所以您可以直接定义使用set将ws定义为wb的第一个系列工作表。
5.这里,我们使用单元格选择代码直接为单元格赋值。Ws.cells (1,1)选择a1单元格,可以直接赋字符串“序列号”,以此类推。产品名称和产品数量按顺序设置。
6.然后,使用for循环语句来简化序列号。这里有一个小技巧。你可以通过在不断的实践中使用loop来学习如何优化代码。简而言之,A列第2-10行中的单元格被顺序选择并分配给1-10。