六合开奖结果现场直播欢迎诸位!收藏本站注 册登 陆
常用三肖中特马:基础知识网络知识操作系统WPS网页制作数据库算法网页成功之路网络安全最新技术古典mid流行midmid背景下载中心
您现在的位置:首页 > 三肖中特马 > 文章页

excel中的VBA中的With语句的使用介绍及实例

Admin | 2009-10-23 19:10:36 | ReadNums | 18621 | 标签 六合开奖结果现场直播 | 打印本页
     

  在Excel中,我们都知道,可以通过VBA引用各种对象的名称,从而,利用名称,就可以设置该对象的各种属性,诸如工作表、选择的区域或单元格的各种属性等。

  本文,为您介绍With的语句使用方法;

  ①With语法

  With 对象名称
   '语句
  End With

  ②语句介绍

  对象名称的使用,必须先定义;即在With语句之前先定义,这样,才能正确的引用,否则,将导致莫名的错误!

  ③语句使用实例

  Set MySheet = ThisWorkbook.Sheets(1)
  With MySheet
   .Cells(1, 1) = 1
   .Cells(1, 2) = 2
   .Cells(1, 3) = 3
   .Cells(1, 4) = 4
   .Cells(1, 5) = 5
   .Cells(1, 6) = 6
  End With

  上述代码解释:先定义一个对象名称:Set MySheet = ThisWorkbook.Sheets(1)

  然后,通过With引用该对象的名称;接下来,就是针对该对象的各种属性进行设置;.Cells(1, 1) = 1相当于设置A1=1;.Cells(1, 2) = 2相当于设置B1=2…依此类推!

  上述的代码,其实就等于:

  ThisWorkbook.Sheets(1).Cells(1, 1) = 1
  ThisWorkbook.Sheets(1).Cells(1, 2) = 2
  ThisWorkbook.Sheets(1).Cells(1, 3) = 3
  ThisWorkbook.Sheets(1).Cells(1, 4) = 4
  ThisWorkbook.Sheets(1).Cells(1, 5) = 5
  ThisWorkbook.Sheets(1).Cells(1, 6) = 6

  既然两种代码都一样,为什么还要使用With语句呢,为什么不直接使用ThisWorkbook.Sheets(1).的方式直接调用呢?

  原因在于:

  一方便输入,可以省去重复输入同一个名称的麻烦;

  二更在于,代码的执行效益高;第一种代码的执行效益远远比第二种代码的执行效益高。

  就因为这样,一图方便,二图效益,所以,很多场合的VBA代码,都喜欢使用with。


问题未解决:在线咨询

网友评论

(访客)
内容实用原创,讲得很好。
20xx年x月x日
(站长)
有问题请在线咨询。
20xx年x月x日