Excel VBA 基础教程——With和Parent的使用

Sub 过程名()

ThisWorkbook.Activate
'这个工作簿.激活

ThisWorkbook.Sheets("Sheet1").Select
'这个工作簿.工作表Sheet1.选择

ThisWorkbook.Sheets("Sheet1").Range("A1").Select
'这个工作簿.工作表Sheet1.单元格A1.选择

'等同于:

With ThisWorkbook.Sheets("Sheet1")

    .Parent.Activate
    '这个对象的父对象即ThisWorkbook.激活
    
    .Select
    '这个对象即ThisWorkbook.Sheets("Sheet1").选择
    
    .Range("A1").Select
    '这个对象的子对象Range("A1").选择
    'Range("A1")也可以写成[A1]
    
End With

'With就是为了把点前相同的内容写在一个位置方便修改与阅读

End Sub

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

发表于

我来说两句

0 条评论
登录 后参与评论

相关文章

来自专栏CIT极客

【奇淫巧技】成为网站开发工程师的捷径!

3529
来自专栏HTML5学堂

JavaScript基础考核真题——你能全做对吗?

正文 JavaScript基础考核真题——你能全做对吗。刘国利 - 独行冰海 : 每位讲师在授课、管理的同时,还需要不断的涉猎各种知识,提升本职技术。本文章的考...

2866
来自专栏源码之家

图片类杂志域下载思路

1013
来自专栏互联网软件技术

Vue脚手架搭建项目

? Author ProsperLee <lcsshengsss@outlook.com>

703
来自专栏游戏杂谈

Node.js文件编码格式的转换

项目很多 lua 文件不是 utf-8格式,使用 EditPlus 查看的时候,显示为ASCII。还有的是带BOM的,带BOM倒好处理,之前写过,有一定规律。

1014
来自专栏小狼的世界

基于Vue、Bootstrap的Tab形式的进度展示

最近基于Vue、Bootstrap做了一个箭头样式的进度展示的单页应用,并且支持了对于一个本地JS文件的检索,通过这个单页应用,对于Vue的理解又深入了一些。在...

1042
来自专栏从零开始学自动化测试

appium+python自动化56-微信小程序自动化

最近微信的小程序越来越多了,随之带来的问题是:小程序如何做自动化测试? 本篇以摩拜小程序为例,介绍如何定位小程序里面的元素

1151
来自专栏张高兴的博客

张高兴的 Xamarin.Forms 开发笔记:TapGestureRecognizer 的简单介绍与应用

3387
来自专栏游戏杂谈

Unity的Input输入

Unity中的输入管理器由Input类进行操控。官方文档地址:https://docs.unity3d.com/ScriptReference/Input.ht...

532
来自专栏生信技能树

【直播】我的基因组70:比对文件并不能完美的还原出测序文件

前面我们说到过可以用软件或者自己写脚本从已经比对到参考基因组的sam/bam格式文件提取出原始的测序fastq文件。 但是我在IGV里面检查bam文件的时候发现...

3257

扫码关注云+社区