这是一个Range对象基本操作实例,对指定单元格赋值,然后使用弹窗获取值。
代码如下:
Sub test1()Worksheets("Sheet1").Range("A5").Value = 22MsgBox "工作表Sheet1内单元格A5中的值为" _& Worksheets("Sheet1").Range("A5").ValueEnd Sub
本文共 228 字,大约阅读时间需要 1 分钟。
这是一个Range对象基本操作实例,对指定单元格赋值,然后使用弹窗获取值。
代码如下:
Sub test1()Worksheets("Sheet1").Range("A5").Value = 22MsgBox "工作表Sheet1内单元格A5中的值为" _& Worksheets("Sheet1").Range("A5").ValueEnd Sub
转载于:https://www.cnblogs.com/OliverQin/p/5753789.html