怎样用vba显示选择区域的第一个单元格的行的数值，列的数值
选择区域为a,a表示的是一个较大的选择区域，a.rows表示的是选择区域所有的行的数值吗，怎样把行的最小数值显示出来 求求哪位高手帮帮忙，我在此先谢过了
实现的方法和详细的操作步骤如下：
1、第一步，显示该单元格中所选单元格的行号和列号，并使用VBA在以下两个单元格中进行显示，见下图，转到下面的步骤。
2、第二步，完成上述步骤后，按“Alt + F11”打开VBA编辑界面，选择当前工作表以编写代码，见下图，转到下面的步骤。
3、第三步，完成上述步骤后，以下代码是当前单元格的行号，并将其放在当前单元格的下一个单元格中，见下图，转到下面的步骤。
4、第四步，完成上述步骤后，以下代码用于获取当前单元格的列号，并将其放在当前单元格下面的第二个单元格中，见下图，转到下面的步骤。
5、第五步，完成上述步骤后，编写代码完成，单击“运行”按钮（或按F5键），见下图，转到下面的步骤。
6、第六步，完成上述步骤后，当返回Excel时，可以看到当前单元格的行号和列号，见下图。这样，就解决了这个问题了。
a.rows的编号是从1开始的,a.rows(1)表示的就是a区域的第一行
如果你要获取a区域的第一个单元格的单元格地址
可以这样写: a.rows(1).cells(1).address(0,0) 或者:a.cells(1,1).address(0,0)
如果你要获取a区域的第一个单元格的单元格行号
可以这样写:a.rows(1).cells(1).row 或者:a.cells(1,1).row
如果你要获取a区域的第一个单元格的单元格列号
可以这样写:a.rows(1).cells(1).column 或者:a.cells(1,1).column
给你一个例程你参考一下：
Dim a As Range
Dim rng As Range
Set a = Range("A1:G7")
For i = 1 To a.Rows.Count 'a.rows.count 为a区域包含的总行数
For ii = 1 To a.Rows(i).Cells.Count 'a.Rows(i).Cells.Count 为a区域指定行包含的单元格数（也就是指定行的总列数）
myvalue1 = a.Rows(i).Cells(ii)
myaddress1 = a.Rows(i).Cells(ii).Address(0, 0)
h1 = a.Rows.Cells(ii).Row
l1 = a.Rows.Cells(ii).Column
MsgBox "工作表名称: " & ActiveSheet.Name & vbCrLf & "行标、列标: 第" & h1 & "行,第" & l1 & "列" & vbCrLf & "单元格地址: " & myaddress1 & vbCrLf & "单元格的值: " & myvalue1, , "用rows对象的cells对象获得"
myvalue2 = a.Cells(i, ii)
myaddress2 = a.Cells(i, ii).Address(0, 0)
h2 = a.Cells(i, ii).Row
l2 = a.Cells(i, ii).Column
yn = MsgBox("工作表名称: " & ActiveSheet.Name & vbCrLf & "行标、列标: 第" & h2 & "行,第" & l2 & "列" & vbCrLf & "单元格地址: " & myaddress2 & vbCrLf & "单元格的值: " & myvalue2, 1, "直接用cells对象获得")
If yn = 2 Then Exit Sub
Next
Next
End Sub本回答被提问者和网友采纳
Dim Rng As Range
Set Rng = Range("C1:F5")
MsgBox "区域最小行:" & Rng.Row & Chr(13) & _
"区域最小列:" & Rng.Column
Set Rng = Nothing
End Sub
怎样用vba显示选择区域的第一个单元格的行的数值,列的数值
1、第一步，显示该单元格中所选单元格的行号和列号，并使用VBA在以下两个单元格中进行显示，见下图，转到下面的步骤。2、第二步，完成上述步骤后，按“Alt + F11”打开VBA编辑界面，选择当前工作表以编写代码，见下图，转到下面的步骤。3、第三步，完成上述步骤后，以下代码是当前单元格的行号，并...
vba如何读取excel中某单元格的行数或列数
1、将单元格所选单元格的行号和列号，分别用VBA显示在下面的两个单元格中，如下图所示：2、按下Alt+F11，打开VBA编辑界面，选择当前工作表编写代码，如下图所示：3、下面代码是得到当前单元格的行号并放到当前单元格下一个单元格中：4、下面代码是得到当前单元格的列号并放到当前单元格下面第二个单...
如何在vba中得到当前单元格的行号和列号
1、第一种方法： ActiveSheet.Range("A" & Rows.Count).End (xlUp).Row 2、第二种方法：ActiveSheet.Range("a1048576").End(xlUp).Row 如果是低版本的OFFICE用ActiveSheet.Range("a65536").End(xlUp).Row 3、第三种方法：ActiveSheet.Cells(Rows.Count,1).End(3).Row 4、第四种方法：ActiveSh...
...如果说selection(1)表示选择的区域第一个单元格
两种方法实现，如下：Sub aaa() Set Rng = Selection(Selection.Cells.Count) MsgBox Rng.Address With Selection Set Rng = .Cells(.Rows.Count, .Columns.Count) End With MsgBox Rng.AddressEnd Sub
Excel在VB代码中如何返回当前单元格的行值和列值?
VBA代码如下：Sub RC()R=Selection.rows.row ActiveSheet.Range("a1).Value =R '选择单元格的第一行行号 送入A1 C=Selection.Columns.Column ActiveSheet.Range("a2").Value =C '选择单元格的第一列列号 送入A2 End Sub
在EXCEL中 如何用VBA查找某特定单元格并返回该单元格的行和列值?
代码解析：RngFind过程使用Find方法在工作表Sheet1的A列中查找InputBox函数对话框中所输入的值，并查找该值所在的第一个单元格。第6到第13行代码在工作表Sheet1的A列中查找InputBox函数对话框中所输入的值。应用于Range对象的Find方法在区域中查找特定信息，并返回Range对象，该对象代表用于查找信息的第...
VBA怎么调用EXCEL里某个单元格的行值?类似ROW()
一、第一个要求：(假如数据不超过1000行)n=MAX(IF(B1:B1000<>"",ROW(B1:B1000)))二、第二个要求：(假如选定单元格为A10)n=row(A10)
excel,如何获取被选中单元格所在的行数
使用VBA代码解决 Excel版本参考：2010 1、ALT+F11,打开VBE对话框 2、双击对应的工作表标签，复制以下代码，粘贴 Private Sub Worksheet_SelectionChange(ByVal Target As Range)[B5] = ActiveCell.RowEnd Sub3、关闭，查看效果
用VBA语句在EXCEL中选定由上向下的第一个空白单元格的行数
range（"a" & Range("A" & Rows.Count).End(xlUp).Row + 1).select
EXCEL vba选择指定区域,A1的值等于指定区域中选中单元格的值,该如何...
工作表事件，代码如下：Private Sub Worksheet_SelectionChange(ByVal Target As Range)If Target.Count = 1 And Target.Row <= 9 And Target.Column = 9 Then Range("a1").Value = Target.Value End If End Sub 对照图：
