观察代码,我们发现,宏录制器为设置字体和单元格背景的两段代码都使用了With … End With结构,这就是VBA为我们提供的处理对象的有效方法之一。 在这里,宏录制器自动优化了代码,在With … End With结构中对同一个对象执行多项操作。当需要对某个对象执行多项操作时(例如,为同一对象的多个属性赋值),使用With … End With结构的代码
With~对象引用> <语句1> End With 例如,要改变一个对象的多个属性,可在With控制结构中加上属性的赋值语句,只需引用对象一次而不必在每个属性赋值时都引用它。例如: With MyLabel ’给MyLabel对象的多个属性赋值 .Height=2000 .Width=2000 .Caption=\"This is MyLabel\" End With 注:由于程序进入With块后,...
可将一个With块放在另一个之中,产生嵌套的With语句。但在内层的With块中,要使用完整的对象引用来指出在外层的With块中的对象成员。With语句 在一个单一对象或一个用户定义类型上执行一系列的语句。语法 With object [statements]End With With语句的语法具有以下几个部分:部分描述object必要参数。一个对象或用户自...
结果: 怎么样是不是简便了很多,只需要一个With,末尾以End With结束,在获取属性值的之后就不需要再重复写对象名了,行了,大家实践一下吧,我相信你会喜欢上With语句的用法的,反正我当年第一次接触的时候就非常喜欢这个语句
解析 最佳答案 通俗点讲with的作用就是简化代码,让代码简洁易懂让你不需要输入重复的内容例如:With [A1].RowHeight = 10.ColumnWidth = 15End With相当于[A1].RowHeight = 10[A1].ColumnWidth = 15省去了输入很多[A1]也就是说with中以 .开头的就相当于WITH后的对象 .什么什么什么...
百度试题 结果1 题目请解释VBA中如何使用With...End With语句块来简化代码。相关知识点: 试题来源: 解析 答案:With...End With语句块允许对同一个对象进行多条属性或方法的设置,而无需重复对象名称。反馈 收藏
这样需要写很多对象(sheet5),不但看起来不美观,还过多地引用对象,会造成程序缓慢。End...End With结构正适合处理这个问题,在运用此结构的时候,记住,有End开头,必然有End With结尾。上面代码改写成With结构更加舒服,但请记得,那个 “点”,range前面的 ' . '不要写漏。假如第一个range('a1')...
with <对象> [语句代码] end with 结构相对简单,下面我们就将上节字体属性代码用with语句来修改如下: 代码中间所有属性的对象worksheets(1).range("b2").font 单独列出来,然后另起一行。加上英文逗号和属性,如.name等,代码如下: Sub test() With Worksheets(1).Range("b2").Font ...
电脑 Excel 方法/步骤 1 编写绘制边框的程序:'绘制置单元格边框Public Sub unitBorder() With Selection.Borders(xlEdgeLeft) '设置左边框 .LineStyle = xlContinuous .Weight = xlThin .ColorIndex = xlAutomatic End With With Selection.Borders(xlEdgeTop) '设置上边框 .LineS...