UC知道excel 位置名称 赋值
来源：百度知道 编辑：UC知道 时间：2024/06/07 02:53:56
请问比如任意选定一个excel单元格,如E4 要把E赋值给变量a,把4赋值给变量b
activecell.row
activecell.column
先申明一个字符串变量，如strActiveCellAddress
然后：
Sub ActiveAddress()
Dim strActiveCellAddress As String
Dim a$, b%
With ActiveCell
strActiveCellAddress = .Address(Rowabsolute:=False, columnabsolute:=False)
b = .Row
End With
a = Application.WorksheetFunction.Substitute(strActiveCellAddress, b, "")
End Sub
a、b就是你要的变量了。