excel vba "表1"A1:J10区域单元格等于L12:N12区域单元格的,其结果对应显示在L1:U10区域。如图?
- 函数AVERAGE(A1:C3)引用哪些单元格区域。解释其功能 急急急,
- 在excel中如何用VBA对指定单元格区域a1:k12打印,求帮改下列代码
- 怎样用vba显示选择区域的第一个单元格的行的数值,列的数值
- VBA 写个命令按钮代码,使单元格A1为1
函数AVERAGE(A1:C3)引用哪些单元格区域。解释其功能 急急急,
连续矩形区域的单元格引用,是以左上角和右下角单元格的名字来定义的,所以这个包括A1、A2、A3、B1、B2、B3、C1、C2、C3。
在excel中如何用VBA对指定单元格区域a1:k12打印,求帮改下列代码
试试将
Range("a1:k12").Select
改为:
ActiveSheet.PageSetup.PrintArea = "A1:K12"
怎样用vba显示选择区域的第一个单元格的行的数值,列的数值
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
给你一个例程你参考一下:
Sub test()
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
VBA 写个命令按钮代码,使单元格A1为1
VBA 写个命令按钮代码,使单元格A1为1
殃各矿晨标服浴复爪吃