VBA之Excel应用第四章第七节:单元格区域的整行或整列扩展(excel中vba的经典应用)

VBA之Excel应用第四章第七节:单元格区域的整行或整列扩展(excel中vba的经典应用)

VBA之Excel应用》(版权©️10178983)是非常经典的,是我推出的第七套教程,定位于初级,目前是第一版修订。这套教程从简单的录制宏开始讲解,一直到窗体的搭建,内容丰富,实例众多。大家可以非常容易的掌握相关的知识,这套教程共三册,十七章,都是我们在利用EXCEL工作过程中需要掌握的知识点,希望大家能掌握利用。今日讲解的内容是:VBA之Excel应用第四章第七节:单元格区域的整行或整列扩展(Entire Rows and Columns)

【分享成果,随喜正能量】255人不争,一身轻松,事不比,一路畅通,心不求,一生平静。一杯清茶足以。过度的清醒,会让人觉得薄凉冷漠,过度的沉醉,又会让人感到浮浅迷离,所以,完美的人生,当是留一半清醒,留一半醉意。。

第四章 单元格(Range)对象

大家好,我们这章开始学习单元格对象。单元格(Range)对象是Excel VBA中最重要的对象之一。本章概述了Range对象的属性和方法,包括如何声明一个单元格对象,如何选择单元格对象,以及对行、列的操作,还讲解了如何对单元格进行复制、粘贴、清除、计数,以及对当前区域CurrentRegion的讲解,还涉及到单元格的联合与交叉等。通过这章的学习,大家会更清楚地看到VBA的结构,以及在实际工作中VBA的综合利用。

第七节 单元格区域的整行或整列扩展(Entire Rows and Columns)

大家好,我们在上节讲解了用Resize属性来调整单元格区域的大小,这讲我们讲解单元格的整行或整列的扩展方法。单元格区域的扩展是一块非常重要的内容,我们要认真掌握。

1 Range.EntireRow 属性

这个属性返回一个Range对象, 该对象代表包含指定区域的整行 (或多行)。 此为只读属性。

语法:expression.EntireRow

其中 expression 一个表示 Range 对象的变量

2 Range.EntireColumn 属性

这个属性返回一个Range对象, 该对象代表包含指定区域的整列 (或多列)。 此为只读属性。

语法:expression.EntireColumn

其中 expression 一个表示 Range 对象的变量

3 行和列的一般选择方法

1)下面的代码将选择整个工作表

Cells.Select

2)下面的代码将选择整个第二个工作表

Worksheets(2).Activate

Worksheets(2).Cells.Select

3)下面的代码将选择第二列

Columns(2).Select

4)下面的代码将选择第五行

Rows(5).Select

5)下面代码将选择五到七行

Rows("5:7").Select

6)下面代码将选择B到E列

Columns("B:E").Select

4 EntireRow和EntireColumn的应用实例

1)我们先选择一个单元格,然后利用下面代码就可以选择这个单元格所在的整行:

ActiveCell.EntireRow.Select

2) 我们先选择一个单元格,然后利用下面代码就可以选择这个单元格所在的整列:

ActiveCell.EntireColumn.Select

3) 实例应用:选择任意一个单元格,然后将值2输入到包含这个活动单元格的列的第一个单元格中。

ActiveCell.EntireColumn.Cells(1).Value = 2

4)实例应用:选择任意一个单元格,然后将值2输入到包含活动单元格的行下面的第一个单元格中。

ActiveCell.EntireRow.Offset(1, 0).Cells(1).Value = 2

5)实例应用:

点击任意一个单元格,在整个行输入“NZ”,在整个列输入“VBA”,在活动单元格的行下面的行中第一个单元格中输入“欢迎”。

我们看下面的代码,代码是写在了Worksheet_SelectionChange事件中:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells.ClearContents

ActiveCell.EntireRow.Value = "NZ"

ActiveCell.EntireColumn.Value = "VBA"

ActiveCell.EntireRow.Offset(1, 0).Cells(1).Value = "欢迎"

End Sub

代码截图:

代码的讲解:Cells.ClearContents 是先清空整个工作表。其余的就不再多讲了。

代码的实现效果:

今日内容回向:

1) 单元格的EntireRow和EntireColumn属性意义是什么,有什么作用?

2) 如何实现整行下一行单元格区域的定位?

3) 单元格的EntireRow和EntireColumn属性的返回值是什么?

本讲内容参考程序文件:工作簿04.xlsm

我20多年的VBA成果全在下面的资料中:

特别声明:[VBA之Excel应用第四章第七节:单元格区域的整行或整列扩展(excel中vba的经典应用)] 该文观点仅代表作者本人,今日霍州系信息发布平台,霍州网仅提供信息存储空间服务。

猜你喜欢

向日葵16超级桌面功能上线!轻薄本也有高性能,远控像本地一样顺畅(向日葵菜单)

向日葵16一键成为副屏功能:每一台设备,都是你的另一块屏幕远控过程中,最容易打断操作节奏的就是被控端设备锁屏,还需要你输入密码才能进入桌面。现在只要保存一次密码,之后向日葵就能在锁屏时自动输入,远控设备瞬间…

向日葵16超级桌面功能上线!轻薄本也有高性能,远控像本地一样顺畅(向日葵菜单)

相对论与量子力学的鸿沟:藏着更高级理论的宇宙密码!(相对论与量子纠缠)

或许,当我们找到那套更高级的理论时,不仅能解开相对论与量子力学的矛盾,还能为寻找外星人提供新的思路 —— 比如,利用新理论解释 “虫洞”是否存在,让星际旅行从科幻变为现实;或者理解 “暗物质”“暗能量” …

相对论与量子力学的鸿沟:藏着更高级理论的宇宙密码!(相对论与量子纠缠)

2025新款国风旗袍裙|女童双面人丝锦鲤设计,夏日新中式『穿搭』爆款(国旗轿车价格)

这款2025新款女童夏季新中式旗袍裙采用双面人丝面料,融合经典锦鲤元素与传统立领盘扣设计,兼具清凉透气与文化韵味。适合3-12岁女孩日常『穿搭』、节日演出或国风主题活动。材质亲肤轻盈,不易起球变形,支持多场景穿着。本文详解其面料特点、设计亮点、

2025新款国风旗袍裙|女童双面人丝锦鲤设计,夏日新中式『穿搭』爆款(国旗轿车价格)

“李鬼”冒充“李逵” 制假售假非法牟利

近日,上海市公安局虹口分局在市公安局知识产权犯罪侦查总队指导下,破获一起生产、销售假冒某品牌『香氛』及服装案,抓获汪某、黄某等犯罪嫌疑人32名,捣毁制假、售假窝点18处,查获假冒『香氛』、睡衣等产品一批,模具、假冒…

“李鬼”冒充“李逵” 制假售假非法牟利

辛芷蕾威尼斯影后 梦想成真时刻(取环需要去大医院取吗)

2025年9月7日凌晨,第82届威尼斯电影节奖项揭晓。辛芷蕾凭借电影《日掛中天》获得最佳女演员奖,成为继『巩俐』、叶德娴之后第三位获此殊荣的华语女演员

辛芷蕾威尼斯影后 梦想成真时刻(取环需要去大医院取吗)