Worksheet.Range 属性 (Excel)

#Worksheet.Range 属性 (Excel) | 来源: 网络整理| 查看: 265

Worksheet.Range 属性 (Excel) 项目 04/07/2023

返回一个 Range 对象，它表示一个单元格或单元格区域。

语法

表达式。Range (Cell1、 Cell2)

表达一个代表 Worksheet 对象的变量。

参数名称必需/可选数据类型说明 Cell1 必需 Variant 使用一个参数时，则是用作区域引用的 String。一个用作区域引用的 String；使用两个参数时，则为 Range 对象。 Cell2 可选 Variant 一个用作区域引用的 String 或一个 Range 对象。 Cell2 定义属性返回的另一区域极限。备注

Cell1 和 Cell2 可为宏语言中的 A1 样式引用。区域引用可包含区域运算符（冒号）、交集运算符（空格）或联合运算符（逗号）。它们还可包含美元符号（这些符号将被忽略）。本地定义的名称可为区域引用。如果使用名称，则假定该名称采用宏语言。

Cell1 和 Cell2 可为包含单个单元格、列、行或任何其他单元格区域的 Range 对象。

通常， Cell1 和 Cell2 是返回区域的左上角和右下角的单个单元格。

如果在没有对象限定符的情况下使用，此属性是 ActiveSheet.Range（返回活动工作表中的范围；如果活动工作表不是工作表，则此属性无效）的快捷方式。

当应用于 Range 对象时，该属性与 Range 对象相关。例如，如果所选内容为单元格 C3，Selection.Range("B1")则返回单元格 D3，因为它相对于 Selection 属性返回的 Range 对象。另一方面，代码 ActiveSheet.Range("B1") 始终返回单元格 B1。

示例

此示例将 Sheet1 上单元格 A1 的值设置为 3.14159。

Worksheets("Sheet1").Range("A1").Value = 3.14159

此示例在 Sheet1 的 A1 单元格中创建一个公式。

Worksheets("Sheet1").Range("A1").Formula = "=10*RAND()"

此示例对活动工作簿 Sheet1 上的单元格 A1：D10 进行循环。如果某个单元格的值小于 0.001，则此代码将用 0（零）来取代该值。

For Each c in Worksheets("Sheet1").Range("A1:D10") If c.Value < .001 Then c.Value = 0 End If Next c

此示例循环访问名为 TestRange 的区域，并显示区域中空单元格的数目。

numBlanks = 0 For Each c In Range("TestRange") If c.Value = "" Then numBlanks = numBlanks + 1 End If Next c MsgBox "There are " & numBlanks & " empty cells in this range"

本示例将活动工作簿 Sheet1 上单元格 A1：C5 中的字体样式设置为斜体。此示例使用 Range 属性的语法 2。

With Worksheets("Sheet1") .Range(.Cells(1, 1), .Cells(5, 3)).Font.Italic = True End With

此示例比较 Worksheet.Range 属性、 Application.Union 方法和 Application.Intersect 方法。

Range("A1:A10").Select 'Selects cells A1 to A10. Range(Range("A1"), Range("A10")).Select 'Selects cells A1 to A10. Range("A1, A10").Select 'Selects cells A1 and A10. Union(Range("A1"), Range("A10")).Select 'Selects cells A1 and A10. Range("A1:A5 A5:A10").Select 'Selects cell A5. Intersect(Range("A1:A5"), Range("A5:A10")).Select 'Selects cell A5. 支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。

【本文地址】

公司简介

联系我们