在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。