excel中使用vba对区域单元格赋值

1、首先我们打开一个工作样表作为例子。

2、在工作样表中选择一个区域，然后输入对应的数据，会发现所输入的数据只会出现在区域范围的左上角一个单元格内。

3、如果需要同时对区域范围内的单元格进行复制，那么我们可以在输入数据的同时按住ctrl键再回车，那么范围内所有的单元格都能同时获取新建的数据。

4、我们捂执涡扔使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：Sub Random()Dim myRange As RangeSet myRange = Worksheets("5月工资").Range("d7:l17")myRange.Formula = "=RAND()"End Sub

5、这里一定要对myrange变量进行正确的声明为range。范围的变量定义为set变量名加=工作表范围。

6、我们使用公式输入或者值属性输入所需要的数据，然后运行该代码，将会同时将数据填充至范围内所有单元格。