在下面的代码中你会看到工作表区域的命名，工作表的增加，工作薄的隐藏等丰富的内容，虽然只是七则语句，但内容还是挺多的。希望朋友要仔细地理解掌握，对于自己的工作会帮助很大，这些语句是我从大量的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 属性的意义是什么？
联系客服
