[已解决]求 with 的用法实例 和with 用法注意

CCTV20092009

只求原创         


求 各位给几个with用法实例，  另外求大师 给几个在用with 的时候遇到的注意事项！

最佳答案

月排行榜 / 总排行榜

sunjing-zxl

2011-12-25 21:22

with sheets("1")
  .[A1]            
  .name
  with sheet("2")
    .[A1]
    .name
  end with
end with

前面的[A1]和name表示是sheets("1")工作表下的
等同于：
sheets("1").[A1]
sheets("1").name
后面的就表示sheet("2")工作表下的
等同于：
sheets("2").[A1]
sheets("2").name

跳转到最佳答案楼层

macky591

自己录个宏一下，设置一下格式，字体，边框等等

CCTV20092009

macky591 发表于 2011-12-25 12:30
自己录个宏一下，设置一下格式，字体，边框等等

求大师 给几个在用with 的时候遇到的注意事项，，就是你用with的时候一些心得！ 和技巧

黄花菜

with  变形金刚
    .身高 = 175
    .体重 = 140
    .胸围 = 95
    .腰围 = 29
end with

使用with 的语句就能省略，简化它！

如果不用with 那就是

变形金刚.身高 = 175
变形金刚.体重 = 140
变形金刚.胸围 = 95
变形金刚.腰围 = 29

liuguansky

with没什么要注意的事项吧。
with 后面的引用是

对象

就可以了。

Select

以下都是打比方哈


对象A.对象B.属性x = 1
对象A.对象B.属性y = 2
对象A.对象B.属性z = 3

不用with，这么写很烦，要敲那么多相同的内容(对象A.对象B)；如果用with就方便了，而且速度更快

With 对象A.对象B
    .属性x = 1
    .属性y = 2
    .属性z = 3
End With

这是为突出with的好处，有关说明还是看帮助（F1）吧

sunjing-zxl

with sheets("1")
  .[A1]            
  .name
  with sheet("2")
    .[A1]
    .name
  end with
end with

前面的[A1]和name表示是sheets("1")工作表下的
等同于：
sheets("1").[A1]
sheets("1").name
后面的就表示sheet("2")工作表下的
等同于：
sheets("2").[A1]
sheets("2").name

CCTV20092009

下面求一点关于WITH  application....  和    WITH.... ACTIVE sheet 的一些经典用法 ，

CCTV20092009

。。。。。。。。

凉皮

学习了，这个with好像vb里面没有。