亚洲免费av电影一区二区三区,日韩爱爱视频,51精品视频一区二区三区,91视频爱爱,日韩欧美在线播放视频,中文字幕少妇AV,亚洲电影中文字幕,久久久久亚洲av成人网址,久久综合视频网站,国产在线不卡免费播放

        ?

        用EXCEL VBA 實現(xiàn)獎金發(fā)放

        2011-08-22 02:58:34方莊
        科技視界 2011年26期
        關(guān)鍵詞:菜單欄匯總表鼠標

        梁 方莊 莉

        (1.南通大學(xué)現(xiàn)代教育技術(shù)中心 江蘇 南通 226019;2.南通市財政局 江蘇 南通 226001)

        0 引言

        近年來,許多部門、單位都要在工資金額以外發(fā)放加班費等補貼。如市財政局每年按市政府要求發(fā)放的招商引資獎、目標考核獎。這些獎金一般要求直接發(fā)放到員工工資卡上,需要將數(shù)據(jù)以電子文檔(如DBF XLS)發(fā)送到銀行。

        以前獎金發(fā)放是由機房專業(yè)人員幫助會計通過VFP完成數(shù)據(jù)的整理、上報,管理責(zé)任不明、操作流程不順,因此迫切需要一個程序,由會計自行使用。

        目的:充分運用EXCEL VBA的功能,開發(fā)實用程序,實現(xiàn)獎金發(fā)放。

        內(nèi)容:運用EXCEL VBA技術(shù),在EXCEL表的菜單中新建獎金發(fā)放菜單欄,菜單欄包含生成獎金、生成匯總表、生成上報數(shù)據(jù)、數(shù)據(jù)解鎖及幫助功能;同時程序具備隱藏指定系統(tǒng)表及VBA代碼的密碼保護功能。

        1 EXCEL VBA的技術(shù)簡介及獎金發(fā)放程序的設(shè)計目標

        1.1 EXCEL VBA的技術(shù)簡介

        Visual Basic for Application Visual Basic是Windows環(huán)境下開發(fā)應(yīng)用軟件的一種通用程序設(shè)計語言,功能強大,直觀易用。一方面,它是可視性程序設(shè)計語言,許多復(fù)雜的用戶界面設(shè)計都可以直觀地利用鼠標拖放以及對各種對象屬性的設(shè)置、修改完成,幾乎無需編程。另一方面,程序的控制普遍采用了事件驅(qū)動機制,根據(jù)用戶操作觸發(fā)的事件,執(zhí)行不同的動作,完成相應(yīng)的功能,因而都是一些短小精練的過程,容易設(shè)計和調(diào)試。例如Excel2003的VBA,主要增加了關(guān)于Excel工作簿、工作表、區(qū)域、數(shù)據(jù)透視表等對象的屬性、事件和方法。

        1.2 獎金發(fā)放程序的設(shè)計目標

        改變原有由專業(yè)技術(shù)人員用VFP直接對數(shù)據(jù)庫手工輸入命令修改獎金的操作方法為利用EXCEL2003應(yīng)用程序中加入特定菜單欄、菜單項,由會計人員自己通過點擊菜單項完成生成獎金、生成匯總表、生成上報數(shù)據(jù)、數(shù)據(jù)解鎖等功能。

        2 獎金發(fā)放程序結(jié)構(gòu)

        2.1 獎金發(fā)放程序結(jié)構(gòu)

        該程序的使用環(huán)境是Microsoft Excel2003,采用的是EXCEL VBA技術(shù)實現(xiàn)程序功能。

        2.2 數(shù)據(jù)字典

        2.2.1 獎金表

        2.2.2 部門匯總表

        3 獎金發(fā)放程序的功能實現(xiàn)

        3.1 菜單欄的實現(xiàn)

        功能:提供獎金發(fā)放程序的操作功能菜單。

        輸入項目:鼠標或鍵盤事件。

        輸出項目:無。

        界面如圖4-1所示:

        圖4-1 菜單欄

        3.2 生成獎金

        功能:根據(jù)需要,輸入獎金基數(shù)、選擇系數(shù)及離退休項目,完成獎金數(shù)據(jù)生成。

        輸入項目:鼠標或鍵盤事件。

        輸出項目:無。

        界面如圖4-2所示:

        圖4-2 生成獎金窗體

        3.3 生成匯總表

        功能:按獎金發(fā)放部門生成金額及人數(shù)的匯總表。

        輸入項目:鼠標或鍵盤事件。

        實現(xiàn)此項功能的代碼段:

        3.4 生成上報數(shù)據(jù)

        功能:將獎金表轉(zhuǎn)換為TXT文件,保存在獎金發(fā)放表的同級目錄中。

        文件名定義格式:“獎金發(fā)放表之獎金”+“匯總金額”

        輸入項目:鼠標或鍵盤事件。

        實現(xiàn)此項功能的代碼段:

        3.5 數(shù)據(jù)解鎖

        功能:表中數(shù)據(jù)除金額列外全部加鎖保護。解鎖后可修改基礎(chǔ)數(shù)據(jù)。

        輸入項目:鼠標或鍵盤事件。

        實現(xiàn)此項功能的代碼段:

        Sheets(1).Protect DrawingObjects:=True,contents:=True,Scenarios:=True

        4 結(jié)論

        本文給出了用EXCEL VBA實現(xiàn)獎金發(fā)放的方法。程序成功開發(fā)和運行證明利用VBA能夠快速部署和解決日常工作中實際問題,提高工作效率和提升工作質(zhì)量。

        [1]伊利奇,王保眾.透視 EXCEL VBA應(yīng)用與開發(fā)[M].北京:人民郵電出版社,2008,1.

        猜你喜歡
        菜單欄匯總表鼠標
        2022年7月板帶材產(chǎn)量匯總表
        2022年6月板帶材產(chǎn)量匯總表
        2022年3月板帶材產(chǎn)量匯總表
        Progress in Neural NLP: Modeling, Learning, and Reasoning
        Engineering(2020年3期)2020-09-14 03:42:00
        2019年河南省水土流失治理統(tǒng)計匯總表(本年達到)
        自編翻譯程序
        CHIP新電腦(2015年10期)2015-10-15 12:48:23
        如何導(dǎo)出GIF動畫?等
        分秒必爭,讓“自動存盤”快人一步
        新手玩Win7收發(fā)自如菜單欄
        45歲的鼠標
        国产中文久久精品| 国内精品卡一卡二卡三| 亚洲人成人无码www影院| 久久久久香蕉国产线看观看伊| 永久免费不卡在线观看黄网站| 亚洲色大成网站www在线观看| 久久精品国产乱子伦多人| 免费av一区男人的天堂| 在线观看日本一区二区三区四区 | 一本久久a久久精品综合| 国产女人av一级一区二区三区 | 国产顶级熟妇高潮xxxxx| 车上震动a级作爱视频| 亚洲AV秘 无套一区二区三区| 亚洲免费在线视频播放| 亚洲av福利院在线观看| 久久久无码人妻精品无码| 最新国产av无码专区亚洲| 亚洲A∨无码国产精品久久网| 久久精品国产精品亚洲婷婷| 东风日产车是不是国产的| 国产av一区二区精品凹凸| 越猛烈欧美xx00动态图| 成人激情四射网| 成人综合激情自拍视频在线观看| 国产自拍高清在线观看| 久久精品国产精品| 日韩爱爱网站| 亚洲欧美v国产蜜芽tv| 亚洲无精品一区二区在线观看| 熟妇人妻久久中文字幕| 乱人伦中文字幕成人网站在线| 午夜精品一区二区三区无码不卡 | 亚洲AV无码一区二区三区少妇av| 国产精品久久三级精品| 桃红色精品国产亚洲av| 国产精品9999久久久久| 亚洲国产一区二区三区最新| 丁香婷婷激情俺也去俺来也 | 中国妇女做爰视频| 国产精品久久久久久久久免费|