VBA基本用法

Visual Basic for Applications 宏语言

打开VB编辑器

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

加载宏

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

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           

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"           '消息框