VBA 入门教程
Office 中的 VBA 入门：https://msdn.microsoft.com/zh-cn/vba/office-shared-vba/articles/getting-started-with-vba-in-office
Excel  VBA 参考：https://msdn.microsoft.com/vba/vba-excel

---

学习资源
VBA帮助手册

---

 
 
我的第一个 VBA 程序，会先弹窗，弹窗内容为”NiHao”自动给 A4 设置值”Nihao”

Option Explicit '强制要求所有变量必须定义
Public Sub mysub() ' 定义一个新的 module
Dim Str As String ' 定义一个变量
Const Status As String = "Hi"   ' 定义一个常量，其值必须在定义时给出
' 这里的内容会被注释掉
' 你可以以任意大小写来编写代码，VBE 会自动将其改为正确的格式，比如 end sub -> End Sub
Let Str = "Nihao"
MsgBox Str
Range("A4").Value = Str ' 设置 A4 格的内容为 Str 的内容
End Sub

如何判断字符串内是否有特定单词

instr("abc","c")   '大于0为包含。
"abc" like "*c*"   'TRUE为包含。

For 循环语法

For i = 2 To 10
        MsgBox Cells(i, "A") Like "*抽奖*"
Next i

 
判断是否包含指定字符，随后，执行特定的参数
Sub docheck()

Dim i  As Integer
i = 2
For i = 2 To 10
        If Cells(i, "A") Like "*somtext*" Then
            Cells(i, "D").Value = "other"
        End If
Next i
End Sub