新建一个Excel,在开发功能处,点开“查看代码”

在代码窗口输入以下代码:

Sub Second()

Dim Context As String
Dim title As String
Rem 将内容存入Conetext 变量
Context = "欢迎打开Excel 2010!"
title = "Welcome !"
MsgBox Context, vbOKOnly, title
End Sub

第一个VBA程序代码

然后运行程序

第一个VBA程序代码

相关文章: