Visual Basic for Applications 宏语言

打开VB编辑器

首先打开Excel,组合键Alt+F11

加载宏

找到相应的宏,点击“执行”

VBA基本用法-LMLPHP

举例

Sub 评分()
Dim i As Integer
For i = 3 To 11
t = Sheets(1).Cells(i, 2).Value '取得成绩
If t >= 90 Then
j = "A"
ElseIf t >= 80 Then
j = "B"
ElseIf t >= 70 Then
j = "C"
ElseIf t >= 60 Then
j = "D"
Else
j = "E"
End If
Sheets(1).Cells(i, 3) = j
Next
End Sub

VBA基本用法-LMLPHP

常用语法

Sheets(1).Name                  '工作表名字
Sheets.Count '工作表数量
Sheet1.UsedRange.Rows.Count '指定工作表已使用的行数
ThisWorkbook.Sheets(1).UsedRange.Columns.CountSheet1 '已使用的列数
Sheets(1).Cells(r, c).Value '获取单元格的值
ActiveSheet.Cells(r, c) '活动工作表单元格
MsgBox "hello furong" '消息框
05-23 19:23