获取有关指定范围的单元格的行号

帝斯曼

我正在尝试获取用vba指定的范围内的单元格的行号。我想获取该范围内单元格的行号,但是我得到的是工作表中单元格的行号。

这是我当前正在使用的VBA代码。我设置了一个范围,并在该范围内搜索包含文本字符串“ C”的单元格。找到单元格后,我想更改范围第二列中的值。

Sub trial2()

Dim ActiveWB As Workbook
Dim ActiveWS As Worksheet
Dim rng As Range, findCell As Range

Set ActiveWB = ActiveWorkbook
Set ActiveWS = ActiveWB.ActiveSheet

Set rng = ActiveWS.Range("B4", "C10")

With rng
    Set findCell = .Cells.Find(what:="C")
End With

rng.Cells(findCell.Row, 2).Value = "change to something."

End Sub

在运行代码之前:

在此处输入图片说明

运行代码后:

在此处输入图片说明

包含“ C”的单元格值在工作表的第6行中,但在范围的第3行中。我想知道如何获得范围的第三行。我知道我可以将单元格偏移1列来解决此问题,但是我很好奇要获取相对于定义范围的单元格的行数。

大本钟

一种选择是rng使用简单的数学运算根据第一行的数量进行调整

rng.Cells(findCell.Row - rng.Row + 1, 2).Value = "change to something."

在这种情况下6 - 4 + 1= 3

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

vba-获取具有指定范围内的特定值的单元格的行号

获取有关单元格中条件的最新日期

在单元格之间有间隙的选定范围内获取值和行号?

如何通过引用单元格获取具有行号和列号的单元格

从范围获取单元格

如何获取给定范围内最后使用的单元格的行号

使用VBA从表中选定范围内的每个单元格中获取行号?

禁用有关 OfficeOpenXml 中包含数值的 Excel 文本单元格的警告

Excel:禁用有关尝试更改BeforeDoubleClick上受保护单元格的警报

查找多列的匹配单元格值并发送有关匹配信息的邮件

查找范围或单元格的相对行号和列号

使工作表在指定的单元格中输入行号

如何使用python获取值的excel单元格/行号?

如何获取每个循环中的单元格的行号

获取MATLAB中已命名Excel单元格的行号

根据单元格值向下复制指定范围的单元格范围

是否有单元格返回其自己的行号的公式?

如何遍历Aspose.Cells for .Net中指定范围内的所有单元格?

比较具有指定范围的单元格以进行条件格式化

从Github企业API获取有关日期范围的问题

通过使用公式获取单元格地址来获取单元格范围

jQuery获取两个单元格之间的表格单元格范围

如何获取单元格范围以根据单元格值进行选择和复制

如果范围中的单元格与键匹配,则列出行号的功能

来自 Excel 中另一个单元格的范围行号引用

正在尝试从POI引入空单元格。甚至有关如何从电子表格中引入值的示例也将非常有帮助。

获取合并范围内的单元格值

从单元格获取范围并应用于getRangeList

VB按单元格名称获取范围