vba获取单元格的行号和列号（excel工作表当前显示在35行到44行,如何用VBA获取两行号）

：暂无数据 2026-08-21 23:45:10 ：0

大家好，如果您还对vba获取单元格的行号和列号不太了解，没有关系，今天就由本站为大家分享vba获取单元格的行号和列号的知识，包括excel工作表当前显示在35行到44行,如何用VBA获取两行号的问题都会给大家分析到，还望可以解决大家的问题，下面我们就开始吧！

本文目录

excel工作表当前显示在35行到44行,如何用VBA获取两行号
excel如何获取当前表格最后一行行号,最后一列的列号
vba如何读取excel中某单元格的行数或列数
VBA如何求一个区域的起始和截止的行号及列号
VBA如何得到选中的多行的行号和列号
vba第几行几列的值怎么表示
在EXCEL中如何取得具有特定内容的单元格的行号，或列号

excel工作表当前显示在35行到44行,如何用VBA获取两行号

ActiveWindow.Height,rows(i).height
然后去掉状态栏等4-5行。
Private Sub 屏显区域()
MsgBox "当前屏幕所显示的区域名称：" & ActiveWindow.VisibleRange.Address(0, 0)
Dim r1 As Long, r2 As Long
r1 = ActiveWindow.VisibleRange(1).Row
r2 = ActiveWindow.VisibleRange(ActiveWindow.VisibleRange.Count).Row
MsgBox "当前屏幕所显示的行号范围是：" & r1 & "至" & r2
Dim c1 As Integer, c2 As Integer
c1 = ActiveWindow.VisibleRange(1).Column
c2 = ActiveWindow.VisibleRange(ActiveWindow.VisibleRange.Count).Column
Dim z1 As String, z2 As String
z1 = Replace(Cells(1, c1).Address(0, 0), 1, "")
z2 = Replace(Cells(1, c2).Address(0, 0), 1, "")
MsgBox "当前屏幕所显示的列号范围是：" & z1 & "至" & z2
End Sub

excel如何获取当前表格最后一行行号,最后一列的列号

不知你想要在什么状况下获取行号和列号？一下几点或许能帮你。
1、在VBA中环境中
获取最后一行有数据的单元格的行号的代码如下
dim i as long
i=sheet1.range("a65536").end(xlup).row
获取最后一列有数据的单元格的列号的代码如下
dim i as long
i=sheet1.range("iv1").end(xlleft).column
2、想知道表格最多有多少行，在a1单元格输入公式
=countblack(b:b)
想知道表格最多有多少列，在a1单元格输入公式
=countblack(2:2)
3、在工作表中，想取得一列或一行中最后一个有数据的单元格的行号或列号
如果单元格是连续的，中间没有空单元格，可以输入公式=counta(a:a)或=counta(1:1)
如果单元格区域中间有空单元格，可以输入公式，然后按下Ctrl+Shift+Enter键结束公
式
=max(if(a1:a20000="",0,row(a1:a20000))
=max(if(1:1="",0,column(1:1))

vba如何读取excel中某单元格的行数或列数

1、将单元格所选单元格的行号和列号，分别用VBA显示在下面的两个单元格中，如下图所示：
2、按下Alt+F11，打开VBA界面，选择当前工作表编写代码，如下图所示：
3、下面代码是得到当前单元格的行号并放到当前单元格下一个单元格中：
4、下面代码是得到当前单元格的列号并放到当前单元格下面第二个单元格中：
5、代码编写完成，点击运行子过程按钮（或按下F5）
6、返回Excel中，就可以看到得到了当前单元格的行号和列号
可能以上的三种方式，你还是不太熟悉，我们举一个通俗一点例子：
1、对象.cells（rowsindex，colunmindex）
假如我们想在sheet1中的A1单元格输入100，是这样写代码的。
Worksheets("sheet1").Cells(1, 1) = 100
我们来说说cells（1,1）的含义，前面的一个数字1，代表的是第一行，后面的一个1代表的是第一列。是不是发现使用Cells比range更好理解一点呢？
PS：需要说明的是在我们excel种使用Cells这个时候，他的行和列是有最大值的，我们一旦超过最大值就会报错。行的最大值为1048576，列的最大值为16384.
2、对象.cells（rowindex）
这个使用方法很简单也很有意思，他的最大值为行和列的所有单元格数目相加，即他的最大值为17179869184.这个数字和我们的Excel中的单元格的数目是相等的。理解这个的时候，可以这么理解，单元格从A1到XFD1换行，然后A2到XFD2，如此进行循环。
假如我们想在第520个单元格输入这个值，那么代码是如何去写写呢？
其实很简单的, Worksheets("sheet1").Cells(520) = 520.
这代码的意思就是在第520个单元格输入520值。
3、对象.cells
这个的使用方法可以说是非常强大的，这种方法返回的是所有工作表上的单元格，请注意和前面的2种方法区分来。
例1，假如我们需要清除sheet1中的单元格的所有值，代码是这样写的。
代码为Worksheets("sheet1").Cells.Clear，这个的意思就是清除单元格中的所有内容。这个在我们清除单元格的内容的时候用的很多的。

VBA如何求一个区域的起始和截止的行号及列号

’先选中该区域
dim a,b,c,d
a=selection.row
b=selection.column
c=a+selection.rows.count-1
d=b+selection.columns.count-1
’a为选中区域起始行，b为选中预期起始列，c为选中区域截止行，d为选中区域截止列

VBA如何得到选中的多行的行号和列号

首先要知道行号、列号是已知还是未知的，知道行号、列号确定单元格以后，用CELLS就可以了，把下面的代码复制到VBA里面执行就看出来了：

Sub tt()
Dim a, b As Integer
a = InputBox("请输入行号")
b = InputBox("请输入列号")
Cells(a, b).Select
End Sub

这上面就是单元格选定。

vba第几行几列的值怎么表示

1、第一步，显示该单元格中所选单元格的行号和列号，并使用VBA在以下两个单元格中进行显示，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，按“Alt + F11”打开VBA界面，选择当前工作表以编写代码，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，以下代码是当前单元格的行号，并将其放在当前单元格的下一个单元格中，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，以下代码用于获取当前单元格的列号，并将其放在当前单元格下面的第二个单元格中，见下图，转到下面的步骤。
5、第五步，完成上述步骤后，编写代码完成，单击“运行”按钮（或按F5键），见下图，转到下面的步骤。
6、第六步，完成上述步骤后，当返回Excel时，可以看到当前单元格的行号和列号，见下图。这样，就解决了这个问题了。