用VBA写一段代码,求A1和B3单元格的和

以下是用VBA写的代码，求A1和B3单元格的和：

Sub SumCells()
    Dim sum As Integer
    sum = Range("A1").Value + Range("B3").Value
    MsgBox "A1和B3单元格的和为：" & sum
End Sub

在Excel中，打开Visual Basic编辑器，选择Insert -> Module，将以上代码复制粘贴到新模块中。接着运行Sub函数SumCells()，即可弹出一个消息框显示A1和B3单元格的和。