VBA如何輸入控制測試資料 - 會計

Hedda avatar
By Hedda
at 2017-01-08T14:46

Table of Contents


VBA如何輸入控制測試資料

網誌圖文版:

http://www.b88104069.com/archives/4150

待過事務所,都有執行過內控查核。在瞭解公司的內部控制制度之後,辨認
風險,評估對應的內部措施是否在設計上能有效降低風險、接著驗證該內控
實際上是否有在執行。這個驗證執行的過程,便是審計工作中的控制測試。
實務上,通常會請客戶提供一整年的明細報表,抽樣選出十幾二十個樣本,
根據這些樣本檢視憑證,確定內部程序有效執行。在Excel操作時,是配合
滑鼠移動一格一格輸入,不過藉由VBA,可以設計成填寫視窗的輸入模式,
免去滑鼠移動的小麻煩,以下分享:

一、銷貨收入控制測試。上方是關於這項查核程序的說明,下方左邊是抽到
的出貨單樣本,右邊是要再進一步翻閱該出貨單的訂單,驗證內控制度是否
有效執行。

二、進入VBA編輯環境:「插入」、「自訂表單」。

三、在左上方的「專案」視窗中,可以看到多一個「表單」資料夾,裡面有
一個「UserForm1」,然後在右下方的「屬性」視窗中,是關於「UserForm1
」這個表單的所有屬性,類似像Excel中的儲存格格式那樣的東西。預設依
照字母順序排列,有興趣可以更改每一個屬性設定值試看看。

四、將「(Name)」(名稱)改為「銷貨收入控制測試」,將「Caption」
(標題)改為「輸入樣本資料」、將「Font」(字型)改為「微體正黑體」
,其餘屬性保持預設值。

五、移到表單。會自動跳出「工具箱」輔助視窗,裡面有許多控制項,這裡
使用「A」,建立「日期」、「訂單」、「客戶」、「單價」、「核准」等
標籤,再使用「Ab」,在標籤左邊建立相對應的文字輸入方塊,最後是如圖
示的「命令按紐」。在表單裡面添加控制項,和在Excel插作圖形方塊的手
法是一樣的,讀者可自行嘗試,於此不細述。

六、設計完表單,接著是編寫表單控制項的程式。延用微軟系統一貫模式,
在表單按下滑鼠右鍵,在跳出來的快捷視窗選取「檢視程式碼」。

七、輸入如圖所示的程式,關於此程式的說明,將在下一節作詳細介紹。

八、建立一個的模組:「插入」、「模組」。於該模組編寫一段程式:「插
入」、「程序」。物件是前面步驟設計好的表單,方法是在Excel顯示表單
,以VBA語言陳述即為:「銷貨收入控制測試.Show」。

九、在Excel執行「輸入資料」巨集。在視窗中輸入完資料,按「確定」,
VBA會自動將資料寫入G10到K10儲存格中,再輸入資料,「確定」後會再將
資料寫入G11到K11。

以往Excel資料,都是直接於儲存格中輸入,這篇文章所介紹的表單,是用
VBA設計一套介面,使用者在介面上輸入資料,VBA程式再決定怎麼將這些資
料寫入Excel。這個範例是相對較簡單的一小步,但卻是在VBA學習上的一大
步,因為熟悉了表單建置,等於開了一扇門,跨過這道門檻,我們擁有設計
操作界面的能力,這個界面可以自行規劃按紐或欄位(控制項),透過這些
控制項將資料或命令傳給Excel,這一節重點在表單,下節繼續介紹表單的
程式碼編寫說明。


延伸閱讀:


VBA如何另存檔案備份

http://www.b88104069.com/archives/4149

VBA如何定期自動儲存檔案

http://www.b88104069.com/archives/4148

VBA如何同時兩列以上VLOOKUP

http://www.b88104069.com/archives/4146

--


周末,我們繼續Excel:精華區=>21.心得=>5.其他=>3.office

會計人的Excel小教室: https://www.facebook.com/acctexcel


--
Tags: 會計

All Comments

AICPA很難很難嗎

Bennie avatar
By Bennie
at 2017-01-07T22:08
小妹我在美國唸大學 讀的是經濟 但是我修過幾堂會計後覺得對會計蠻有興趣的 尤其是稅這一方面 因此下定決心畢業後要考CPA 往會計一路發展 我今年六月就要畢業了 雖然還沒開始準備考試 但是就已經開始擔心會不會考不過orz 常常聽到人家說美國會計多難考 我是那種天生不是很聰明的人 常常需要比別人多努力才能達到相 ...

IFRSs釋例3th及鄭漢財政學題庫

George avatar
By George
at 2017-01-07T22:00
IFRSs釋例範本3th   我國上市上櫃公司於2013年起全面採用國際財務報導準則 (IFRSs)編製財務報表,由於IFRSs係原則基礎,為協助我國 企業在實際適用IFRSs之規定於各類交易時有所依循,並使財 務報表使用者較易了解IFRSs之重要規定,會計研究發展基金 會特延攬產、官、學界等多位學者專家, ...

誰的悠遊卡??

Mia avatar
By Mia
at 2017-01-07T16:45
andlt;andlt;andlt;失物招領andgt;andgt;andgt; http://imgur.com/eXmcmd4.jpg 靠北會計師 昨天 11:39 · #靠北會計師2696 今天早上秘書發信給5樓所有的員工,因為有人掉了這張悠遊卡...... 投稿日期: 2017年1月6日 09 ...

高點中會鄭泓 & 登峰美語首堂免費試聽

Kumar avatar
By Kumar
at 2017-01-07T01:32
高點台中班 - and#34;中會and#34;鄭泓 限額免費試聽 鄭 泓 老師 主講 詳細課程試聽內容 及 預約方式 http://board.get.com.tw/cpa/board/board/ ============================================= 賀! ...

公司法大修 會計師憂衝擊

Bennie avatar
By Bennie
at 2017-01-06T16:10
會計師公會全國聯合會昨(5)日針對公司法全盤修法,就適用法系、董事責任、關係企 業、公司章程、股東權益等五大面向提出疑義,建議應漸進式修法不要一步到位。 由政大法學院教授方嘉麟領軍的公司法全盤修正修法委員會於去年2月成立,去年12月正 式上網公告公司法全盤修正建議,提供經濟部參考,做為未來大修公司法的重要依 ...