这是一个Range对象基本操作实例,对指定单元格赋值,然后使用弹窗获取值。
代码如下:
Sub test1()
Worksheets("Sheet1").Range("A5").Value =
MsgBox "工作表Sheet1内单元格A5中的值为" _
& Worksheets("Sheet1").Range("A5").Value
End Sub
2023-08-08 19:25:10
这是一个Range对象基本操作实例,对指定单元格赋值,然后使用弹窗获取值。
代码如下:
Sub test1()
Worksheets("Sheet1").Range("A5").Value =
MsgBox "工作表Sheet1内单元格A5中的值为" _
& Worksheets("Sheet1").Range("A5").Value
End Sub