利用輸入與輸出關鍵字可以找到
關於檔案輸入輸出的控制函式
目前關心的是如何開檔 讀檔 及寫入檔案這三個動作
===========================================
Open 陳述式
+++++++++++++++++++++++++++++++++++++++++++
Open 陳述式提供三種檔案存取型態
循序存取(Input、Output 以及 Append 模式)被用來寫入文字檔，比如錯誤登入以及報告。
隨機存取 (Random 模式)被用來讀取與寫入資料到檔案並且沒有關閉檔案。隨機存取會資料保留在記錄中，如此可輕易的找出資訊所在。
二進位存取(Binary 模式)被用來讀取或寫入資料到檔案中任何的位元組位置，例如儲存或顯示一個點陣圖。
============================================
讀檔 及寫入檔案
++++++++++++++++++++++++++++++++++++++++++++
存取型態 寫入資料 讀取資料
循序 Print #, Write # Input #
隨機 Put Get
二進位 Put Get
============================================
不過這時候遇到了點問題
因為不是很了解檔案存取型態對文件的影響
所以必須親自試試看差異
2009年6月29日 星期一
取得檔案路徑
一開始找到了檔案系統控制的函數 傳回目前路徑CurDir
不過似乎只能得到預設的路徑 一般是得到使用者路徑
而不是我要得到的當前路徑
我希望我的程式能抓excel範本所在的路徑資料
結果查了一下資料 取得當前路徑可以從物件的path屬性得到
Debug.Print Application.AltStartupPath '傳回取代啟動資料夾的名稱
Debug.Print ActiveWorkbook.Path '傳回目前工作簿的路徑(檔案未存檔時傳回空字串) "這個符合要求"
Debug.Print ActiveWorkbook.FullName '現用目前工作簿的路徑及檔案名稱(檔案未存檔時只傳回暫存檔名)
Debug.Print Application.NetworkTemplatesPath '傳回儲存範本所在的網路路徑，如果指定的網路路徑不存在，本屬性將傳回一空字串
Debug.Print Application.TemplatesPath '傳回儲存範本所在的區域路徑
Debug.Print Application.Path '傳回Excel程式完整路徑
Debug.Print Application.DefaultFilePath '傳回或者設定 Microsoft Excel 開啟檔案時使用的預設路徑
Debug.Print Application.StartupPath '傳回啟動資料夾的完整路徑
Debug.Print Application.LibraryPath '傳回程式庫資料夾的路徑
Debug.Print Application.UserLibraryPath '傳回使用者電腦上 COM 增益集安裝位置的路徑(2000以上)
Debug.Print Application.PathSeparator '傳回路徑分隔符號
Debug.Print CurDir '傳回目前的路徑(開啟舊檔時線市的路徑)
For a = 1 To 27
Cells(a, 1) = Environ(a)
Next
End Sub
能夠得到當前路徑 就可以讓這個excel放在需要載入資料的目錄下
就能正常執行了
不過似乎只能得到預設的路徑 一般是得到使用者路徑
而不是我要得到的當前路徑
我希望我的程式能抓excel範本所在的路徑資料
結果查了一下資料 取得當前路徑可以從物件的path屬性得到
Debug.Print Application.AltStartupPath '傳回取代啟動資料夾的名稱
Debug.Print ActiveWorkbook.Path '傳回目前工作簿的路徑(檔案未存檔時傳回空字串) "這個符合要求"
Debug.Print ActiveWorkbook.FullName '現用目前工作簿的路徑及檔案名稱(檔案未存檔時只傳回暫存檔名)
Debug.Print Application.NetworkTemplatesPath '傳回儲存範本所在的網路路徑，如果指定的網路路徑不存在，本屬性將傳回一空字串
Debug.Print Application.TemplatesPath '傳回儲存範本所在的區域路徑
Debug.Print Application.Path '傳回Excel程式完整路徑
Debug.Print Application.DefaultFilePath '傳回或者設定 Microsoft Excel 開啟檔案時使用的預設路徑
Debug.Print Application.StartupPath '傳回啟動資料夾的完整路徑
Debug.Print Application.LibraryPath '傳回程式庫資料夾的路徑
Debug.Print Application.UserLibraryPath '傳回使用者電腦上 COM 增益集安裝位置的路徑(2000以上)
Debug.Print Application.PathSeparator '傳回路徑分隔符號
Debug.Print CurDir '傳回目前的路徑(開啟舊檔時線市的路徑)
For a = 1 To 27
Cells(a, 1) = Environ(a)
Next
End Sub
能夠得到當前路徑 就可以讓這個excel放在需要載入資料的目錄下
就能正常執行了
2009年6月25日 星期四
VBA for excel
以前在公司工作的時候 有看到產品owner用excel開發的小程式
(更屌的程式應該是有人寫整套的測試系統可以載入不同的測試項)
用來載入每片晶圓測試的結果
方便比對bin別的數量
後來有位跟我同期進公司的工程師(不過人家幹6年了)
覺得不夠方便 就又寫了個介面 讓程式更方便使用了
這一個多月看了一些VBA的書
突然想試看看 能不能做到跟人家開發的程式類似的功能
邊看資料實作看看
順便把製作的過程紀錄一下
(更屌的程式應該是有人寫整套的測試系統可以載入不同的測試項)
用來載入每片晶圓測試的結果
方便比對bin別的數量
後來有位跟我同期進公司的工程師(不過人家幹6年了)
覺得不夠方便 就又寫了個介面 讓程式更方便使用了
這一個多月看了一些VBA的書
突然想試看看 能不能做到跟人家開發的程式類似的功能
邊看資料實作看看
順便把製作的過程紀錄一下
2009年6月17日 星期三
我是來面試的 不是來搶地盤
今天跑去聯電面試產品工程師
為了節省經費 加上以前就熟悉這條路線
所以交通就決定這樣 機車==>火車==>公車==>步行==>園區公車
在從園區入口走往科技生活館時,看到樹上有隻烏秋
於是隨口吹起哨子跟著他叫
沒想到似乎引來牠的不滿
一路追殺我50公尺..........
回程也一樣 不過烏秋變成兩隻了 依然追殺著我
至於面試過程................唉!!
八成不符要求了.........
不過也多少更認識產品工程師要什麼樣的技能
想要朝這條路玩下去 看樣子還要不斷努力
目前實力嚴重不足..........
也許該挑門檻比較低的工作了
然後趁那段時間得到足夠的能力
話說回來 兩個禮拜前欣詮的面試結果不知道如何
那個是跟以前工作內容一樣的工作阿！！！！
希望能上
為了節省經費 加上以前就熟悉這條路線
所以交通就決定這樣 機車==>火車==>公車==>步行==>園區公車
在從園區入口走往科技生活館時,看到樹上有隻烏秋
於是隨口吹起哨子跟著他叫
沒想到似乎引來牠的不滿
一路追殺我50公尺..........
回程也一樣 不過烏秋變成兩隻了 依然追殺著我
至於面試過程................唉!!
八成不符要求了.........
不過也多少更認識產品工程師要什麼樣的技能
想要朝這條路玩下去 看樣子還要不斷努力
目前實力嚴重不足..........
也許該挑門檻比較低的工作了
然後趁那段時間得到足夠的能力
話說回來 兩個禮拜前欣詮的面試結果不知道如何
那個是跟以前工作內容一樣的工作阿！！！！
希望能上
訂閱：
文章 (Atom)