VBA中with语句的应用
1、实例如下【请使用VBA,在A6单元格内,输入“好人一生平安!”,边框为蓝色,字体为楷体、加粗、斜体、红色、加下划线、字号16,将工作表命名为“with语句”!】

3、在VBA界面,点击菜单栏【插入】,在其下拉菜单中,点击【模块】!

5、在【代码编辑】窗口,输入如下代码。Sub with语句()With Sheet10.Range("a6") .Value = "好人一生平安!" .Borders.LineStyle = 1 .Borders.ColorIndex = 8 .Parent.Name = "with语句" With .Font .Name = "楷体" .Bold = True .Italic = True .ColorIndex = 3 .Size = 16 .Underline = True End WithEnd WithEnd Sub

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
阅读量:75
阅读量:61
阅读量:49
阅读量:58
阅读量:75