摘 要: 講述了在建立數據庫和SQL查詢的基礎上,使用程序方法訪問數據庫中的表和查詢,同時引用電子表格文件作為對象,對其進行自動填寫的思路和實現方法。將該方法與電子表格內嵌公式和程序的傳統方法進行了對貼片電感器比。最后使用該方法實現了對機場氣候表的自動填寫。
關鍵詞: 電子表格; 數據庫訪問; Excel引用; 民航氣象
制作填寫電子表格在今天已是一項非常常見的工作了。很多時候,都需要將手頭的數據統計匯總填寫成表格樣式以供閱讀和報告。為了完成復雜一些的功能,需要在電子表格中嵌入公式和程序代碼,以減少人工的工作量,并減少錯誤的發生,提高工作效率[1-2]。鑒于Microsoft Excel電子表格軟件的強大功能,它基本成為電子表格的代名詞,因此,以下主要以Excel為例進行討論。
然而,在Excel表格中嵌入公式和程序代碼(經常也被稱為宏)會帶來一些其他的問題。例如運行效率不高,在代碼比較多時,會使電子表格文件變得很大,不利于發布和交換等。
1 電子表格中嵌入公式和程序代碼的不足
內嵌公式和程序代碼的電子表格有它的好處,首先不需要安裝任何軟件,交換文件的同時就相當于交換了程序。然而,表數量多、代碼量較大時,就會存在下面的不足:(1) 電子表格文件變大
雖然簡單的代碼不會造成這種情況,或者說無關緊要,但當http://www.szfpc.net/扁平線圈電感需要完成的計算和填寫代碼很多(往往表格只有幾百千字節的文件,加上代碼后就會有幾兆字節)時,對交換和保存這類表格文件顯然不利。
(2) 嵌入代碼不利于使用
當電子表格制作完成,就會將其文件用于發布和交換。這時大多數使用文件的人都是非專業人員,一旦打開文件時提示是否啟用宏時,他們往往會不知所措;另一方面,啟用內嵌代碼可能被人利用,增加惡意代碼,造成真正對計算機的危害;最后,內嵌的公式往往效率不高,其計算結果不易使用。
(3) 開發、調試困難
少量的程序代碼不會存在這樣的問題,但當代碼很多時,就會發現Excel內嵌的那個VBA功能不夠,調試也不方便,完全無法與Visual Studio這樣的開發工具相提并論,使得效率大大下降,今后的維護也十分困難。
2 另一種填寫電子表格的思路
大多數時,發布和交換電子表格只是作為一種可視化的資料保存或查閱,這時內嵌的公式和程序代碼就成了負擔。因此,考慮另一種思路,將電子表格只是作為模板,不使用內嵌的公式或程序代碼進行統計計算,在數據庫中使用SQL查詢進行統計、計算,另外編寫程序訪問數據庫中的查詢,在程序中引用電子表格文件作為對象,將查詢結果填寫到電子表格文件中。兩種方式的對比如圖1所示。
3 電子表格自動填寫的實現
如上所述,需要分三步實現,首先要制作最終的輸出表格,之后需要建立好數據庫,并在數據庫中建立SQL查詢以完成主要的統計計算;最后編寫程序訪問數據庫,并引用電子表格文件進行自動填寫。
3.1 模板中表格一致性的程序實現
首先設計表格的樣式,如果有類似的表格只需要復制后稍加修改即可。然而,經驗表明,往往在調試程序時,還需要更改表格中的樣式,這時又要進行前述的重復工作,這種工作在程序開發和調試過程中還要反復進行。因此,宜使用程序來對表格的樣式進行修改。
以Visual Basic 2008為例,要訪問電子表格文件,需在工程中添加引用COM中的Microsoft Excel,并選中命名空間Microsoft.Office.Interop(若存在的話)。示例1過程更改電子表格文件中的全部表顯示大小為100%,更改每個表第一行單元格格式為合并居中并自動縮小字體填充,顯示一位小數。
示例代碼1:
Sub RegSheets()
Dim a As New Excel.Application
Dim b As Excel.Workbook = a.Workbooks.Open
(“電子表格的文件名”)
For Each sht As Excel.Worksheet In b.Sheets
sht.Activate()
‘不能省略,Excel僅對活動工作表操作
a.ActiveWindow.Zoom = 100
s= "A1:" & Chr(64 + sht.UsedRange.Columns.
Count) & "1"
a.Range(s).Select() 大功率電感廠家 |大電流電感工廠