輕鬆建立 Excel『貼上值』快捷鍵

常常用 Excel 活頁簿連來連去的人，想必也常常使用『貼上值』的功能吧？！有次小莎老闆熊熊來問，到底有沒有『貼上值』的快捷鍵，參拜了 Google 大神得到結論，似乎微軟是認為，這個功能不需要有快捷鍵，所以沒有內建，那我們只好自己手動建立一個快捷鍵囉！

步驟非常簡單，不用五分鐘，卻可省下之後工作上很多時間，廢話不多說，讓我們開始吧！

1. 打開 Excel（謎之音：廢話！！），在儲存格任意打上幾個字後，點選『開發者人員』索引標籤，再點『錄製巨集』

2. 輸入巨集名稱 PasteValue（可更改為自己喜歡的，盡量用英文）、快捷鍵 Ctrl + d（d 是少數只用一隻手可以按到、又還沒被指定的快捷鍵，可依自己習慣設定），建議大家將這個巨集存在『個人巨集活頁簿』，這樣之後只要是用這台電腦，不論開哪一個檔案，都可以使用這個快捷鍵

[Excel Macro 巨集] 如何一次顯示所有隱藏的工作表

工作上經常要使用 Excel 的朋友，想必有過一個檔案裡面太多張工作表，而把一張張不太會編輯到的工作表隱藏起來的經驗吧？！或是原始建立檔案的人，為了不讓收到檔案的人覺得很複雜，便把一些單純參照的工作表隱藏起來，隱藏的時候很方便，可以一次選取所有要隱藏的表執行，但當想要把這些取消隱藏時，卻只能一個一個表點，表的數量少還好，只要遇上超過十幾頁的，尤其檔案一多，就會覺得很麻煩，偏偏微軟就是沒有取消全部隱藏的功能，因此只能靠巨集來克服，只要簡單幾個步驟，以後就只要按幾個鍵，就能達到取消全部隱藏的目的囉！

1. 第一步當然是打開 Excel，之後同時按住 Alt + F11，Microsoft Visual Basic 應用程式視窗就會打開，點選最上排的『插入』>『模組』，叫出空白程式碼視窗

[Excel Macro 巨集] 清除含有特定字眼的儲存格

因工作需要，小莎被要求把 Excel 檔案裡面，含有某字眼的儲存格內容全部清除，因為不能只拿掉某字眼，所以不能用全部取代來達成任務，面對數萬筆的資料，一個一個拿會暈倒，這時候就只能用下面這個 Macro 來達陣囉！

在儲存格 F1 到 F100000 與 S1 到 S100000 的範圍，清除含有 1234 的所有儲存格內容

-------------------------------
1.          Sub Remove_PII()
2.          Dim myRange As Range
3.          Dim myCell As Range
4.          Set myRange = Range("F1:F100000,S1:S100000")
5.          For Each myCell In myRange
6.          If myCell Like "*1234*" Or _
7.          myCell Like "*otherword*" Then
8.          myCell.ClearContents
9.          End If
10.      Next myCell
11.      End Sub
-------------------------------

[Excel Macro 巨集] 自動填滿

操作 Excel 表格時，常常利用在格子右下角出現十字時，點兩下，下面的格子就會自動填滿公式或數值到與左邊格子一樣的列數，相同的操作，若使用 Macro 錄製功能，就會產生與下面類似的程式碼，用 Range 去指定自動填滿的範圍。

-----------------------------------

Sub Macro1()

    Range("C2").Select

    Selection.Autofill Destination:=Range("C2:C11")

End Sub

-----------------------------------

但是，很多時候，每個檔案的資料數量不同，即使是相同格式的表格，要執行自動填滿的範圍也不同，若要成功執行自動填滿所有資料，就需要每次改程式碼的範圍，這時候就可以使用下面的程式碼，來解決這個問題 (紅色部分隨著資料表格式不同修改)。

[Excel Macro 巨集] 選取任意文字檔匯入 Excel

若使用 Macro 錄製的功能來產生 Macro，就會得到與下面左邊格子類似的程式碼，連結到特定路徑裡面的特定檔案，這樣的程式碼可以成功運作，但很麻煩的是，每次都要將要匯入的檔案改成特定檔名，放到特定路徑下面，才能成功把文字檔匯進 Excel。

若是要能夠開啟視窗匯入不同路徑/檔名的文字檔，只要在錄製後，把紅色部分的程式碼修改成右邊格子裡紅色的部分，之後就可以選擇匯入任意文字檔。