天天看點

VBA基本用法

Visual Basic for Applications 宏語言

打開VB編輯器

首先打開Excel,組合鍵Alt+F11

加載宏

找到相應的宏,點選“執行”

VBA基本用法

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