亚洲欧美精品沙发,日韩在线精品视频,亚洲Av每日更新在线观看,亚洲国产另类一区在线5

<pre id="hdphd"></pre>

  • <div id="hdphd"><small id="hdphd"></small></div>
      學(xué)習(xí)啦 > 學(xué)習(xí)電腦 > 工具軟件 > 辦公軟件學(xué)習(xí) > Excel教程 > Excel2007教程 > excel2007怎么插入vba模塊

      excel2007怎么插入vba模塊

      時(shí)間: 宇能938 分享

      excel2007怎么插入vba模塊

        Excel中的VBA功能具體該如何使用呢?對(duì)于VBA這個(gè)功能相信沒有多少人懂吧,接下來學(xué)習(xí)啦小編舉例簡(jiǎn)單的例子告訴大家excel2007與vba編程的使用方法,歡迎大家來到學(xué)習(xí)啦學(xué)習(xí)。

        excel2007中的vba編程的使用方法

        1:右擊需要插入代碼的表,如,本文要達(dá)成的目標(biāo)是單擊一個(gè)按鈕,然后實(shí)現(xiàn)對(duì)B列3-11單元格的成績(jī)進(jìn)行等級(jí)評(píng)定。假設(shè)要實(shí)現(xiàn)目標(biāo)的數(shù)據(jù)位置在Sheet1上,則右擊Sheet1,依次單擊“插入,模塊”,即可打開代碼輸入框:

        2:在打開的代碼編輯框里面粘貼如下方的代碼,然后直接單擊VBA編輯器右上角的關(guān)閉按鈕:

        Sub 評(píng)定等級(jí)()

        Dim i As Integer

        For i = 3 To 11

        t = Sheets(1).Cells(i, 2).Value '取得成績(jī)

        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

        3:依次單擊“開發(fā)工具,插入,按鈕”:

        4:在合適的位置直接左鍵拖出一個(gè)按鈕,在彈出的“指定宏”對(duì)話框里面選擇“評(píng)定等級(jí)”,然后單擊“確定”:

        5:?jiǎn)螕魟偺砑拥陌粹o“按鈕1”:

        6:按下按鈕之后,即可在C列對(duì)應(yīng)的表格里面顯示成績(jī)等級(jí),如下:


      猜你感興趣:

      1.excel2007 vba如何加按鈕的教程

      2.Excel2007中創(chuàng)建并使用VBA代碼的操作

      3.excel2007中怎樣使用vba加按鈕

      4.excel2007 vba中如何加按鈕的方法

      5.excel2007如何打開vba編輯器

      2591419