大家好，对VBA实例：给当前或某个单元格赋值感兴趣的小伙伴，下面一起跟随三零脚本的小编来看看VBA实例：给当前或某个单元格赋值的例子吧。

'来自：三零脚本（www.q3060.com）
Sub MyNZ()
ActiveCell.Value = "你好！！！" ’给活动单元格赋值
Range("a1").value="hello" ’给指定单元格a1赋值
sheets("sheet2").select
range("a1").value="hello" ’给sheet2的Ａ１单元格中插入" hello "
Sheets("sheet1").Range("a1").Value = "hello" ’给sheet2的Ａ１单元格中插入" hello "
End sub

代码的解析及说明：上述代码第一行是给活动的单元格赋值；第二行是给活动的工作表的A1单元格赋值；第三四行先将sheet2选中，然后在将“HELLO"赋到A1单元格中；第5行sheet2不必被选中，即可“HELLO"赋到sheet2 的A1单元格中。