excel学习库-学习利用VBA代码操作EXCEL，提高工作效率

今天和大家分享VBA中常用的精彩代码赏析之五，其实也不是什么精彩的，就是常用的吧，对这些语句仔细的理解后，能对自己的工作有很大的帮助，今天主要讲解些工作薄语句相关的一些常见的语句。对于工作薄，相信大家不很陌生，工作簿是在Excel中，用于保存数据信息的文件。在一个工作簿中，可以有多个不同类型的工作表，默认情况下包含3个工作表，最多可达到255个工作表。可以说，Excel文档就是工作簿，它为用户提供了一个计算操作环境。在下面的代码中你会看到工作表区域的命名，工作表的增加，工作薄的隐藏等等丰富的内容，虽然只是七则语句，但内容还是挺多的。希望朋友要仔细的理解掌握，对于自己的工作会帮助很大，这些语句是我从大量的VBA代码中筛选出来，可以作为特定的通用语句来掌握，当然，更丰富的内容以后还会陆续的推出。 1 Range(“A1：C3”).Name=“pengyou” 语句说明：命名A1：C3区域为pengyou Range(“D1：E6”).Name=“Sheet1!book123” 语句说明：命名局部变量，即Sheet1上区域D1：E6为book123 Names(“pengyou”).Name=“diren” 语句说明：将区域computer重命名为diren 备注：上述的语句讲解了如何在VBA中实现区域命名的办法，相信很多朋友对于EXCEL中的区域命名很熟悉了，在VBA中实现此目的的方法也要掌握。 2 Application.ScreenUpdating= True/False 语句说明：显示/关闭屏幕刷新备注：屏幕刷新有刷新率的概念，是指图像在屏幕上更新的速度，也即屏幕上的图像每秒钟出现的次数，刷新频率越高，屏幕上图像闪烁感就越小，稳定性也就越高，换言之对视力的保护也越好。但如果过高会影响到其他程序的运行，当关闭屏幕刷新时，无疑会增加其他程序的运行效率。注意：上述语句要成对的出现，当关闭时务必在程序运行完了后恢复。 3 Set ExcelSheet = CreateObject("Excel.Sheet") 语句说明：创建一个Excel工作表对象 ExcelSheet.Application.Visible = True 语句说明：设置 Application 对象使 Excel 可见 ExcelSheet.Application.Cells(1, 1).Value = "Data" 语句说明：在表格的第一个单元中输入文本 ExcelSheet.SaveAs "C:\TEST.XLS" 语句说明：将该表格保存到C:\test.xls 目录 ExcelSheet.Application.Quit 语句说明：关闭 Excel Set ExcelSheet = Nothing 语句说明：'释放该对象变量备注：上述的几则语句说明了文件的创建，显示，修改，保存的基本操作。注意：很多的属性是相通的，如.Visible是指对象的可见性，对于其他的控件也是一样的

如上面的例子，我们建立了一个FORM1的窗体，并建立了一个标签，将他的VISIBLE属性设置为TURE:运行截图如下：

将他的VISIBLE属性设置为FALSE时:运行截图如下：

4 Workbooks.Close 关闭操作语句说明：关闭所有打开的工作簿备注：完全关闭，会提示是否保存。 5 Application.Visible = False 语句说明：隐藏工作簿 Application.Visible = True 语句说明：显示工作簿备注：可与用户窗体配合使用,即在打开工作簿时将工作簿隐藏,只显示用户窗体.可设置控制按钮控制工作簿可见，这个例子可以参考上面第三则的属性讲解。 6 ActiveSheet.Columns("B").Insert 列的操作语句说明：在A列右侧插入列，即插入B列 ActiveSheet.Columns("E").Cut ActiveSheet.Columns("B").Insert 语句说明：将E列数据移至B列，原B列及以后的数据相应后移 ActiveSheet.Columns("B").Cut ActiveSheet.Columns("E").Insert 语句说明：以上两句将B列数据移至D列，原C列和D列数据相应左移一列备注：这是列的操作 7 ThisWorkbook.Worksheets.Add Count:=2,Before:=ThisWorkbook.Worksheets(2) 或 ThisWorkbook.Workshees.Add ThisWorkbook.Worksheets(2), , 2 语句说明：在第二个工作表之前添加两个新的工作表备注：这是工作表的添加的操作今日内容回向： 1 今日讲解的例子中，是用VBA代码对EXCEL的操作，是否理解了？ 2 Visible 属性的意义是什么？

一	二	三	四	五	六	日
						1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31

excel学习库

excel表格_excel函数公式大全_execl从入门到精通

学习利用VBA代码操作EXCEL，提高工作效率2024-04-11 10:02:42