到达想要的单元格——Offset属性( 三 )


rng.Offset(0, 16).Value =https://www.i8ku.com/2021/.Range(“D8”).Value
rng.Offset(0, 17).Value =https://www.i8ku.com/2021/.Range(“F8”).Value
rng.Offset(0, 18).Value =https://www.i8ku.com/2021/.Range(“B9”).Value
rng.Offset(0, 19).Value =https://www.i8ku.com/2021/.Range(“D9”).Value
rng.Offset(0, 20).Value =https://www.i8ku.com/2021/.Range(“F9”).Value
rng.Offset(0, 21).Value =https://www.i8ku.com/2021/.Range(“B10”).Value
rng.Offset(0, 22).Value =https://www.i8ku.com/2021/.Range(“B11”).Value
rng.Offset(0, 23).Value =https://www.i8ku.com/2021/.Range(“B12”).Value
End With
End Sub
这样,避免了“员工信息数据库”中的单元格采用“硬编码”(即在代码中使用固定的单元格对象 。使用“硬编码”的代码使得以后要修改代码时,需要逐个修改相应的单元格代码,很繁锁,也容易出错 。对于经常变换的单元格,最好使用对象变量,例如例子中“员工信息数据库”工作表,在填充数据时,单元格经常要变动 。而对于不会变化的单元格,可以使用固定的单元格,如例子中“员工基本信息表”中的单元格F2、B3、D3等) 。
【到达想要的单元格——Offset属性】上述优化后的代码,使今后代码需要扩展时,只需修改起始单元格即可,更加灵活 。

推荐阅读