视察代码,我们发现,宏录制器为设置字体和单元格背景的两段代码都使用了With … End With结构,这就是VBA为我们提供的处理对象的行之有效的方法之一。 在这里,宏录制器自动优化了代码,在With … End With结构中对同一个对象履行多项操作。当需要对某个对象履行多项操作时(举例来看,为同一对象的多个属性赋值),使用...
With结构由With和End With两个语句构成，对象的属性和方法都写在两者之间。基本语法如下：With [对象].[属性] = [数据].[方法]'其他属性和方法 End With With结构里，对象的属性和方法均由点 (.)符号开始，后接对象的属性名和方法名。With 结构实例 现在看一个实际的例子，需要将工作簿中 Sheet1 工作表设置...
观察代码,我们发现,宏录制器为设置字体和单元格背景的两段代码都使用了With … End With结构,这就是VBA为我们提供的处理对象的有效方法之一。 在这里,宏录制器自动优化了代码,在With … End With结构中对同一个对象执行多项操作。当需要对某个对象执行多项操作时(例如,为同一对象的多个属性赋值),使用With … E...
可以看到，对于很多对象的操作，VBA使用了End...End With结构。又如下面代码，需要对单元格A1作如下编辑。这样需要写很多对象（sheet5），不但看起来不美观，还过多地引用对象，会造成程序缓慢。End...End With结构正适合处理这个问题，在运用此结构的时候，记住，有End开头，必然有End With结尾。上面代码改写成...
可以看到,对于很多对象的操作,VBA使用了End...End With结构。 又如下面代码,需要对单元格A1作如下编辑。 这样需要写很多对象(sheet5),不但看起来不美观,还过多地引用对象,会造成程序缓慢。 End...End With结构正适合处理这个问题,在运用此结构的时候,记住,有End开头,必然有End With结尾。
With语句可以针对某个指定对象执行一系列的操作。使用With语句不仅可以简化程序代码,而且可以提高代码的运行效率。With…End With结构中以“.”开头的语句相当于引用了With语句中指定的对象。 在With…End With结构中,无法使用代码修改With语句所指定的对象,也就是说不能使用一个With语句来设置多个不同的对象。
With Selection.Interior .Pattern = xlSolid .PatternColorIndex = xlAutomatic .Color = 65535 .TintAndShade = 0 .PatternTintAndShade = 0 End With End Sub 观察代码,我们发现,宏录制器为设置字体和单元格背景的两段代码都使用了With … En...
End Sub 观察代码，我们发现，宏录制器为设置字体和单元格背景的两段代码都使用了With … End With结构，这就是VBA为我们提供的处理对象的有效方法之一。在这里，宏录制器自动优化了代码，在With … End With结构中对同一个对象执行多项操作。当需要对某个对象执行多项操作时（例如，为同一对象的多个...
With~对象引用> <语句1> End With 例如,要改变一个对象的多个属性,可在With控制结构中加上属性的赋值语句,只需引用对象一次而不必在每个属性赋值时都引用它。例如: With MyLabel ’给MyLabel对象的多个属性赋值 .Height=2000 .Width=2000 .Caption=\"This is MyLabel\" End With 注:由于程序进入With块后,...
"秒"End Sub 代码解析：MyWithSta过程在单元格填充时使用With语句来引用工作表对象从而获得较快的运行速度。运行WithSta过程，消息框显示两种方法的运行时间，可以看出使用With语句来引用工作表对象的运行速度较快.代码窗口：运行窗口：今日内容回向：1 今日讲的优化代码是什么方式？2 with语句是如何能够优化代码呢？