在线观看亚洲精品专区-在线观看亚洲免费-在线观看亚洲免费视频-在线观看亚洲欧美-欧美freexxx-欧美free嫩交video

VIP標識 上網做生意,首選VIP會員| 設為首頁| 加入桌面| | 手機版| RSS訂閱
食品伙伴網服務號
 

Excel:妙用自定義函數讓班級名稱自動化

放大字體  縮小字體 發布日期:2006-06-17

大家知道,我們在編輯Excel工作表時,除了可以用其內置的函數處理表中的數據外,還可以根據自己的實際需要,自定義函數來處理表中的數據。

  如圖1所示是一個學生基本情況登記表,學號的編制原則是:前4位是年份,第5位是初、高中代碼(1是初中,2是高中),第6位是年級代碼(1分別代表初、高一等),第7、8位是班級代碼,后面是序號。下面,我們以一個具體的實例,自定義一個函數,根據學號來自動填寫班級名稱(即圖中的D列內容)。

  1.啟動Excel 2003(其它版本請仿照操作),打開相應的工作表。

  2.執行“工具→宏→Visual Basic編輯器”命令(或者直接按“Alt+F11”組合鍵),進入Visual Basic編輯狀態(如圖1)。


圖1編輯器

  3.執行“插入→模塊”命令,插入一個新模塊。再雙擊插入的模塊,進入模塊代碼編輯狀態。

  4.將下列代碼輸入其中:

  Function bj(xh)

  Select Case Mid(xh, 5, 1)

  Case 1

  bj = '初' && Mid(xh, 6, 3) && '班'

  Case 2

  bj = '高' && Mid(xh, 6, 3) && '班'

  End Select

  End Function

  [友情提醒]

  ①上述代碼中,“bj”是函數命令,“xh”是變量名稱,二者均可以隨意修改。

  ②自定義函數結構是(如果有多個變量,請用英文狀態下的逗號分隔):

  Function函數名稱(變量名稱)

  代碼

  End Function

  ③使用下面的代碼,可以達到同樣的效果:

  Function bj(xh)

  If Mid(xh, 5, 1) = 1 Then

  bj = '初' && Mid(xh, 6, 3) && '班'

  Else

  bj = '高' && Mid(xh, 6, 3) && '班'

  End If

  End Function

  5.代碼輸入完成后,關閉Visual Basic編輯窗口,返回Excel編輯狀態。

  6.選中D2單元格,輸入公式:=BJ(A2),再用“填充柄”將上述公式復制到D列下面的單元格區域中,班級名稱即可自動填入相應的單元格中(參見圖2)。


圖2學生登記表


 
[ 網刊訂閱 ]  [ 食品專題搜索 ]  [ ]  [ 告訴好友 ]  [ 打印本文 ]  [ 關閉窗口 ] [ 返回頂部 ]

 

 
推薦圖文
推薦食品專題
點擊排行
 
 
Processed in 0.018 second(s), 18 queries, Memory 0.88 M
主站蜘蛛池模板: 国产―笫一页―浮力影院xyz | 亚洲精品福利你懂 | 在线观看免费av网 | 一级片特黄 | 99久久伊人一区二区yy5099 | 99久久精品免费看国产免费 | 国产亚洲3p无码一区二区 | 2级毛片| 国产欧美亚洲精品第二区首页 | 亚欧精品一区二区三区 | 国产精品天天影视久久综合网 | 国产香蕉在线精彩视频 | 日本人视频-jlzz jlzz jlzz | 亚洲一级毛片在线观播放 | 一区二区三区高清在线观看 | 欧美一级日韩在线观看 | 日夜操在线视频 | 米奇777色狠狠8888影视 | 免费毛片网 | 91aaa免费观看在线观看资源 | 欧美午夜视频一区二区三区 | 久久香蕉综合色一综合色88 | 色综合色综合 | 欧美成人一区二区三区在线电影 | 美女视频很黄很暴黄是免费的 | 美女视频很黄很a免费国产 美女视频很黄很暴黄是免费的 | 午夜神马福利影院 | 人与禽交免费网站视频 | 大又大又粗又爽女人毛片 | 欧美天天搞| 亚洲伦理一区二区 | 国产欧美久久久精品影院 | 美欧毛片 | 求av网站| 久久久久99精品成人片三人毛片 | 丁香亚洲综合五月天婷婷 | 国产成人91青青草原精品 | eee在线播放成人免费 | 国产精品美女自在线观看免费 | 国产视频二区 | 国产一级大片免费看 |