2014年5月25日 星期日

VBA: 目前工作資料取得

' 取得目前活頁簿的工作目錄及名稱
ActiveWorkbook.Path
ActiveWorkbook.Name
' 取得目前執行VBS的活頁簿其工作目錄及名稱
ThisWorkbook.Path
ThisWorkbook.Name

' 取得活頁簿的工作目錄(檔案路徑)
strNowPath = Excel.ActiveWorkbook.Path
' 取得目前資料格的 row 值
endRow = ActiveCell.Row
' 取得 VBA 程式所在工作表內特定工作表的資料格內容
A = ThisWorkbook.Worksheets(strNameSheet).Cells(1, 1)

Excel VBA 程式

由於工作需要偶爾會使用 Excel VBA 寫點功能處理工作上的事務
有時發現所要的功能之前有寫過, 但又不知該功能是在那個時期的那個程式所完成的
時常因找不到原功能程式而需重新寫, 浪費許多時間,
因此想借用 Blog 的功能, 儲存程式心得, 以利後續需要使用時參考
也希望能夠持之以�, 慢慢累積心得