excel怎么使用vba创建一个预设格式的工作表?
(福利推荐:你还在原价购买阿里云服务器?现在阿里云0.8折限时抢购活动来啦!4核8G企业云服务器仅2998元/3年,立即抢购>>>:9i0i.cn/aliyun)
excel中使用vba创建一个预设格式的工作表
1、首先我们打开一个工作样表作为例子。
2、我们使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:
Sub CreateNewWorkbook2()
Dim wb As Workbook
Dim ws As Worksheet
Dim i As Long
MsgBox "将创建一个新工作簿,并预设工作表格式."
Set wb = Workbooks.Add
Set ws = wb.Sheets(1)
ws.Name = "产品汇总表"
ws.Cells(1, 1) = "序号"
ws.Cells(1, 2) = "产品名称"
ws.Cells(1, 3) = "产品数量"
For i = 2 To 10
ws.Cells(i, 1) = i - 1
Next i
End Sub
3、运行这段代码,会创建一个新的工作薄,并设置工作薄的基本样式,工作薄中的工作表1例子如图。
4、首先我们定义了了两个对象变量,分别是wb和ws。wb是创建的新的工作薄,使用工作薄对象workbooks后的add方法新建。因为新建的工作薄有默认的三个工作表,所以可以直接定义使用set来定义ws为wb的第一个序列工作表。
5、这里我们使用单元格选择代码直接对单元格进行赋值。ws.cells(1,1)选取的就是a1单元格,可以对其直接赋值字符串“序号”,一次类推。顺序设置了产品名称和产品数量。
6、接着使用for循环语句来简写了序列号,这里是个小技巧,大家可以在不断的练习中学会这样使用循环来优化代码的方法。简单的说,就是顺序选择了a列2-10行的单元格并将其赋值为1-10。
相关推荐:
相关文章
- 有时在编写VBA程序时,会发现没有与Excel函数相对应的VBA指令,在此情况下,只能想办法通过引用Excel函数来达到目地,下面小编就为大家介绍在excel表格中vba使用day函数方2016-08-22
- 这篇教程是向程序员之家的朋友分享excel vba制作一个数字时钟方法,教程真的很不错,值得大家学习,推荐到程序员之家,喜欢的朋友可以参考本文,来看看吧2016-08-19
- excel表格中的日期怎么通过vba计算日期所在季度?excel表格中有很多日期,想知道这些日期都是哪个季度的,该怎么办呢?下面我们就来看看求出日期所在季度的教程,需要的朋2016-08-19
- excel如何使用vba函数计算指定间隔月后的日期?很多朋友并不是很清楚,所以下面小编就为大家详细介绍一下,不会的朋友可以参考本文,希望能对大家有所帮助2016-08-19
- 今天小编为大家分享利用excel vba编程在窗体上画盆子方法,教程很不错,值得大家学习,推荐到程序员之家,一起来学习吧2016-08-19
- 这篇教程主要是向程序员之家的朋友分享excel vba编程制作一个恶作剧小程序方法,教程比较基础,但很不错,推荐过来,一起来学习吧2016-08-17
- excel怎么借助vba画一个简笔画西红柿?excel中可以使用vba变成来绘制一些图形,今天我们就来看看绘制一个简笔画番茄的教程,很简单,需要的朋友可以参考下2016-08-17
- 这篇教程是向程序员之家的朋友分享excel vba编程怎么画西红柿方法,教程很不错,值得大家学习,推荐过来,一起来学习吧2016-08-17
- excel中怎么使用vba查看字符串的asc值?我们想要查看某个字符串的asc的值,就可以使用vba来查看,具体该怎么实现呢?下面我们就来看看详细的教程,需要的朋友可以参考下2016-08-17
- excel怎么借用VBA绘制小卡车?excel中直接绘制图形很困难,我们要借助vba窗体,下面我们就来看看详细的画法,很简单,需要的朋友可以参考下2016-08-16
最新评论