9久久伊人精品综合,亚洲一区精品视频在线,成 人免费va视频,国产一区二区三区黄网,99国产精品永久免费视频,亚洲毛片多多影院,精品久久久无码人妻中文字幕,无码国产欧美一区二区三区不卡
學(xué)習(xí)啦 > 學(xué)習(xí)電腦 > 工具軟件 > 辦公軟件學(xué)習(xí) > Excel教程 > Excel2007教程 > excel2007怎么插入vba模塊

excel2007怎么插入vba模塊

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

excel2007怎么插入vba模塊

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

  excel2007中的vba編程的使用方法

  1:右擊需要插入代碼的表,如,本文要達(dá)成的目標(biāo)是單擊一個(gè)按鈕,然后實(shí)現(xiàn)對(duì)B列3-11單元格的成績進(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 '取得成績

  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:單擊剛添加的按鈕“按鈕1”:

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


猜你感興趣:

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

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

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

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

5.excel2007如何打開vba編輯器

2591419 主站蜘蛛池模板: 国产精品视频一区二区亚瑟| 久久精品国产亚洲av电影| 国产精品女人毛片在线看| 五月天中文字幕mv在线| 欧美人与动欧交视频| 亚洲中文精品一区二区| 午夜激情小视频一区二区| 野花韩国高清电影| 久久精品娱乐亚洲领先| 黄色舔女人逼一区二区三区| 亚洲av综合av一区| 亚洲一区二区三区在线播放无码| 久久综合亚洲鲁鲁九月天| 日韩精品人妻av一区二区三区 | 国产成人永久免费av在线| 亚洲自偷自偷在线成人网站传媒| 成人无码视频97免费| 日韩av中文字幕有码| 久久国内精品一区二区三区 | 久久亚洲精品成人av秋霞| 少妇真人直播免费视频| 久久久久人妻精品一区三寸| 亚洲av在线观看| 日韩幕无线码一区中文| 亚洲热视频这里只有精品| 国产一区二区亚洲精品| 香蕉乱码成人久久天堂爱| 亚欧乱色精品免费观看| 精品无码久久久久成人漫画| 中文字幕乱码一区二区免费| 久久夜色撩人国产综合av| 国产精品国产三级国av| 久久高潮少妇视频免费| 国产97人人超碰CAO蜜芽PROM| 国产精品自在自线视频| 视频一区视频二区制服丝袜| 亚洲精品麻豆一二三区| 亚洲一区二区三区激情视频| 人成午夜免费视频无码| 国产成人无码A区在线观看视频| 国产成人一区二区三区在线观看|