VBA 创建一个工作簿

一、代码

Sub test()Dim wb As Workbook, sht As Worksheet    '定义一个Workbook对象和一个Worksheet对象Set wb = Workbooks.Add                  '新建一个工作簿Set sht = wb.Worksheets(1)With sht.Name = "另存工资表"                '修改第一张工作表的标签名称.Range("A1:F1") = Array("序号", "姓名", "部门", "职位", "基本工资", "实际到账")     '设置表头End Withwb.SaveAs ThisWorkbook.Path & "\另存工资表.xls"     '保存新建的工作表到本工作簿所在的文件夹中ActiveWorkbook.Close                                '关闭新建的工作簿End Sub

二、运行结果

VBA 创建一个工作簿相关推荐

EXCEL VBA创建sheet/工作簿
1.需要创建以地市命名的系列sheet,但不想手动创建改名. 代码实现如下: Sub SheetAdd()Dim i As Long'定义一个长整型变量Sheets.Add After:=Sheets ...
使用vba把一个工作簿的多个sheet拆分成两个sheet为一个工作簿的多个工作簿
假如一个工作簿有10个sheet,一下代码就是把10个sheet拆分成两个工作簿,一个工作簿有2个sheet,并且包含原sheet的数据 Sub SplitWorksheet() '定义对话框变量 D ...
VBA学习笔记1：将同个文件夹中的工作簿汇总为一个工作簿，并建立目录超链接
VBA学习笔记1:将同个文件夹中的工作簿汇总为一个工作簿,并建立目录超链接 1.将文件夹中的xlsx文件名复制到新工作簿: 2.将文件夹中的xlsx数据簿中的sheet复制到新表并重命名: 3.插入超 ...
创建到另一个工作簿中已定义名称的外部引用的帮助(Excel)
创建到另一个工作簿中已定义名称的外部引用的帮助(Excel) 打开将包含外部引用的工作簿(目标工作簿)和包含要链接到的数据的工作簿(源工作簿). 在源工作簿中,单击快速访问工具栏上的"保存& ...
VBA将excel中的多个工作表sheet合成一个工作表，多个工作簿的多个工作表合并为一个工作簿
1 将excel中的多个工作表sheet合成一个工作表工作表合成前: 工作表合成后: **第一步:**在文件中新建一个工作表sheet,用来存放合成后的数据,如图所示: 第二步:点击"开发 ...
Excel VBA 合并不同工作簿的工作表到一个工作簿的不同工作表
命令从下面第一个Sub开始: Sub 合并不同工作簿的工作表到一个工作簿的不同工作表() Excel.Application.ScreenUpdating = False Dim ARR() Dim ...
VBA：快速把另一个工作簿里的列值根据列名填充进来
前言:之前在使用工作簿与工作簿之间的数据连接时,使用的是vlookup手动做链接,然后断开连接并另存为的方式,虽然做好一次后很方便,但是每次变动需求要修改的话都好累.比如我这里有36个,也就是相当于要 ...
VBA基础，工作簿workbook相关的方法和属性
0 我觉得VBA和VB,VBS最大的区别就在A(application)上了所以application里的 workbook , worksheet range ,cell等应该是VBA语言的 ...
excel合并多个工作表_如何快速的合并多个 Excel 工作簿至一个工作簿中的工作表？...
作者:汪汪家的宝贝链接:https://www.jianshu.com/p/c8ae6852f1da 前言在日常工作过程中,我们有可能需要把多个Excel工作簿的内容汇总到一张Excel工作表中. ...

VBA 创建一个工作簿

一、代码

二、运行结果

VBA 创建一个工作簿相关推荐

最新文章

热门文章