VBA-04操作工作表worksheet

WorkSheet对象

 

 工作表对象,表示打开的Excel的一个个sheet页

每一个Excel 默认的工作表有三个,分别是Sheet1,Sheet2, Sheet3

Sheets

  • 表示Excel所有的Sheet页的集合
  • 不是单独的一个Sheet页
  • 在VBA代码中可以直接使用,表示所有的Sheet工作表集合

属性

  1.  index
    • 表示Sheets对象中的索引,顺序,通过index属性可以获取单独的Sheet页
    • Sheets(i)
    • ★ index 表示顺序,从开始
    • ★ 顺序指定是 Excel中下面Sheet页栏中的顺序,而不是创建的顺序
    • 因为Sheet页的很容易移动,导致顺序变化
  2.    name
    • 属于Sheet的属性,而不是Sheets的属性
    • Sheet页的名字,就是Sheet页栏中显示的名词,默认显示Sheet数字
    • 但是一般和Sheets搭配使用,用于获取单独的Sheet页
      1. Sheets("北京") :
  3.    count
    • 获取Sheets的数量
    • ★ sheets.count 表示最大的索引,也就是Sheet页栏中最后的Sheet页

方法

  1. Select
    • 字面意思:选择
    • 对象是: WorkSheet
    • 对于 Sheets 表示 激活当前Sheet
    • 即:单机Sheet页
    • Sheet1.Select
  2. Add
    • 表示添加一个Sheet页
    • 对象是: Sheets
    • 而不是新建一张Excel表
    • 注意: 当没有指定参数时
      • 会默认插入到Sheet页栏的第一个位置,即index=1的位置
      • Sheet对象是按照顺序依次添加,NAME属性就是Sheet对象最开始的名字 Sheet
    • 参数
      • Before: 表示插入到那个Sheet的前面
      • After :   表示插入到那个Sheet的后面
      • Type:    选中插入的类型,一般不用添加,使用默认情况
      • Count:   插入的Sheet的数量,默认一个
    • 常用: 在最后面插入新的Sheet页
      •   
         Sheets.Add after:=Sheets(Sheets.Count)               
  3. Delete
    • 删除Sheet页
    • 对象是:WorkSheet
    • 注意:☆
      • 删除表必须设置警告信息,也就是对话框
      • 删除表的时候,不能全部删除,必须保留一个
      • 删除表的过程中,不能通过for循环中的变量控制删除哪个表,只能删除第一张或者最后一张表
        • 当使用Sheets(变量)删除表,在删除的过程中,Index一直在变化,当删除到中间的时候,变量>Sheets.count, Sheets(变量)不存在,会报错  
    • ★ 不论是手动删除,还是VBA代码删除,都会出现程序级别的对话框
    • ' 删除开始之前,取消Excel显示对话框
      Application.DisplayAlerts = False
      ' 删除完成之后,恢复Excel显示对话框
      Application.DisplayAlerts = True
      

  4. Copy
      • Sheet的复制
      • 对象是:WorkSheet
      • 没有参数时
        • 会创建一些新的Exce存储Sheet页
        • 但是需要保存创建的Excel
      • 参数: 表示要将Sheet复制到那个地方
        • After:  复制到指定的Sheet后面
        • Before:复制到指定的Sheet前面
      • ☆ COPY 没有返回值,只是一个动作
  5. 复制过去的Sheet默认使用原来的Sheet.NAME
  6.  

Sheet和Sheets

  • Sheets 表示所有Sheet的集合
  • Sheet   表示一个 Sheet
  • WorkSheet的方法有的适合Sheet: 如Delete, Copy, Select
  • 有的适合Sheets, 如 Add
  • Sheets(index/ name)   --->> Sheet
  • 使用的时候需要注意
原文地址:https://www.cnblogs.com/ZhaoLong-study/p/13224538.html