Category Archives: excel vba

2012
01-19

如何解決Excel VBA出現找不到專案或程式庫

這個訊息會出現在Excel VBA使用第一個系統函數時，這是Excel VBA參照的檔案找不到所造成，會發生這個問題，通常是在不同Excel版本中比較容易會發生，只要到參數將找不到的引用項目的勾拿掉，就會正常。 1.出現找不到專案或程式庫 2.[工具]/[設定引用項目] 3. 將找.... Read More >

2011
12-29

如何讓Excel巨集一開啟就自動執行

如何讓Excel巨集一開啟就自動執行，只要在ThisWorkbook中的Open事件中加入要呼叫的程式即可。 1.操作畫面 [vb] Private Sub Workbook_Open() MsgBox "Excel Open" End Sub [/vb.... Read More >

2011
12-23

Excel VBA判斷工作表是否存在的函數

[vb] Function checkSheetName(sheetname) '檢查活頁是否存在 isfind = False For Each st In Sheets If st.Name = sheetname Then isfind = True .... Read More >

2011
12-19

將多個Excel的工件表合併成一個

1.操作畫面 sheetsmerger 2.檔案下載  .... Read More >

2011
12-07

快速修正儲存格中看不見的字元

一般系統要互相交換資料都會透過Excel來做交換暫存，但是Excel有一個問題是常常會有一些系統匯出來的特殊看不見的字元存在裡面，這對於要匯入的系統，只要遇到這些符號系統就會發生無法匯入的情形，這支程式就是將這些看不見的字元給去除掉。 1.將您要處理的資料複製貼到處理前，並記下行數字母及列.... Read More >

2011
12-01

excel 連結到工作表的語法

[vb] SheetName="Sheet1" Link_Name="Link Name" ActiveSheet.Hyperlinks.Add Anchor:=Cells(8, 12), Address:="", SubAddres.... Read More >

2011
11-18

Excel Vba 英文字母轉換成數字

[vb] Private Sub CommandButton1_Click() For i = 1 To 26 t = Chr(64 + i) Cells(i, 1) = t n = Asc(t) - 64 If.... Read More >

2011
11-18

Excel VBA 取奇數及偶數相加求合計

[vb] Private Sub CommandButton1_Click() Dim a As Integer, b As Integer a = 0 b = 0 t = Range("a1") For i = 1 T.... Read More >