一、顯示開發人員索引標籤
1.檔案 \ 選項
2.自訂功能區
3.勾選"開發人員"
4.確定
二、巨集觀念
三、巨集錄製
1.開發人員 / 錄製巨集
2.輸入巨集名稱 / 確定
3.操作要錄製的動作
4.完成操作後，點選 開發人員 / 停止錄製
四、執行巨集
1.開發人員 / 巨集
2.點選巨集名稱 /執行
五、指派巨集給圖案使用
1.插入 / 圖案 / 點選要使用的圖案
2.到畫面上拖曳一個大小
3.點圖案 / 右鍵編輯文字 / 輸入圖案內容
4.點圖案 / 右鍵指定巨集
六、儲存巨集活頁簿
七、相對錄製與絕對錄製
一、選取特殊目標
1.選取資料範圍
2.點常用標籤內的尋找與選取
3.點特殊目標
4.點空格，再按確定
5.點選自動加總
二、隱藏儲存格
1.選取要隱藏的欄號或列號
2.在編號上面按右鍵，點選隱藏
三、取消隱藏儲存格
1.選取要隱藏的欄號或列號
2.在編號上面按右鍵，點選取消隱藏
三、群組
1.選取要設定的欄號或列號
2.點選資料標籤，再點群組
3.完成後可使用+-摺疊與12層次
四、取消群組
1.選取要設定的欄號或列號
2.點選資料標籤，再點取消群組
五、自動建立大綱
1.先建立好計算公式
2.點資料標籤 \ 群組 \ 自動建立大綱
六、清除大綱
2.點資料標籤 \ 取消群組 \ 清除大綱
七、列印設定
A.修改紙張大小
B.調整紙張方向
C.調整紙張邊界
1.點選版面配置標籤，再點選自訂邊界
2.設定邊界的上下左右距離，在按確定按鈕
3.勾選水平置中或垂直置中可讓表格在紙張中間
D.預覽列印檢視結果
E.設定列印範圍
1.選取要列印的資料範圍
2.點選版面配置標籤，再點選列印範圍內的設定列印範圍
3.點選預覽列印，就會看到設定的結果
若要取消，可點選清除列印範圍
八、列印練習
狀況:第一頁要列印一月到六月，第二頁要列印七月到全球合計，每一頁都要出現城市名稱與月份
1.點選七月的欄號，再點選版面配置 \ 列印範圍 \ 設定列印範圍
2.點選版面配置標籤，再點選列印標題
3.標題欄選取AB兩個欄號，再點選確定按鈕
底下為設定好的結果
九、成長率計算
公式寫法為
華僑成長率 = (98年華僑 - 97年華僑) / 97年華僑
十、表格
1.選取資料範圍
2.常用 / 格式化為表格 / 選取表格樣式
課程練習檔
一、 工作表管理
A. 新增：
1.在工作表上面
2.按滑鼠右鍵
3.點選插入 
4.選工作表
5.確定 
B. 重新命名：
1.在要修改名稱的工作表上
2.按滑鼠右鍵
3.重新命名 
C. 刪除：
1.在上刪除的工作表上
2.按滑鼠右鍵
3.刪除 
D. 移動工作表：
1.按住工作表的名稱
2.往前或往後拖到需要的位置
E. 複製工作表：
1.按住工作表的名稱
2.加上Ctrl按鍵在往前或往後拖到需要的位置
F. 快速切換工作表：
1.若工作表比較多的時後，在工作表切換器上按右鍵
2.在點要切換的名稱 
G. 設定工作表顏色：
1.點一下要設定的工作表
2.按滑鼠右鍵
3.索引標籤色彩
4.點選要使用的色彩 
二、同時顯示一個檔案兩個工作表的內容
1.點選檢視功能標籤
2.開新視窗 
3.點選並排顯示 
4.選擇垂直並排
5.確定 
6.調整畫面的工作表位置 
三、複製貼上值
1.選取資料
2.右鍵點選複製
3.點要存放的位置
4.右鍵貼上值
四、貼上連結
1.選取資料
2.右鍵點選複製
3.點要存放的位置
4.右鍵貼上連結
五、插入與刪除欄列
插入欄
1.選取要插入的欄號或列號
2.右鍵點選插入
刪除欄列
1.選取要插入的欄號或列號
2.右鍵點選刪除
六、移動資料
1.選取要移動的儲存格資料範圍
2.將游標移動至選取的儲存格旁邊，出現十字箭頭符號，在案住左鍵拖曳到要的位置
七、直接運算
1. 點一下要計算的儲存格
2. 輸入 =
3. 輸入運算式
4. Enter
八、 儲存格運算
1. 點一下要計算的儲存格
2. 輸入 =
3. 點要運算的儲存格,及編輯運算式
4. Enter
算術運算子
| 算術運算子 | 意義 | 範例 |
| + (加號) | 加 法 | 3+3 |
| - (減號) | 減法 負 | 3–1 -1 |
| * (星號) | 乘 法 | 3 * 3 |
| / (斜線) | 除法 | 3/3 |
| % (百分比符號) | 百分比 | 20% |
| ^ (脫字符號) | 乘冪 | 3^2 |
比較運算子
| 比較運算子 | 意義 | 範例 |
| = (等號) | 等於 | A1=B1 |
| > (大於符號) | 大於 | A1>B1 |
| < (小於符號) | 小於 | A1<B1 |
| >= (大於或等於符號) | 大於或等於 | A1>=B1 |
| <= (小於或等於符號) | 小於或等 於 | A1<=B1 |
| <> (不等於符號) | 不等於 | A1<>B1 |
文字串連運算子
| 文字運算子 | 意義 | 範例 |
| & (與) | 將兩個值連接或串連起來，用以產生一個連續的文字值 | ("東 西"&"南北") |
運算的順序
| 運算子 | 說明 |
| : (冒號) (一個空格) , (逗號) | 參照運算子 |
| - | 負號 (如 -1) |
| % | 百分比 |
| ^ | 乘冪 |
| * 和 / | 乘和除 |
| + 和 - | 加和減 |
| & | 連線二個文字字串 (連線) |
| = < > <= >= <> | 比較 |
九、 位址參照
1. 選取儲存格編號
2. 按F4切換參照
絕對、相對及混合參照間的差異
種類可分為四種：
相對位址「B1」：欄列均未鎖定（欄列皆可動）
絕對 位址「$B$1」：鎖欄鎖列（欄列皆不可動）
混合位址「$B1」：鎖欄不鎖列（欄不動列可動）
混合位址 「B$1」：不鎖欄鎖列（欄動列不可動）
使用：選取位址，在利用鍵盤上F4 按鈕切換
十、顯示公式
快速鍵 ： Ctrl + ~
十一、填滿但不填入格式
1.使用填滿控點之後
2.在右下角出現填滿選項
3.點選填滿但不填入格式
課程練習檔
收支預算表
收支預算表OK
一、 啟動EXCEL軟體
1.點選左下角的[開始]按鈕
2.選擇[所有程式]
3.選擇[MicroSoft Office]
4.點選[Microsoft Office Excel 2010] 
二、 增加或移除快速存取工具列
新增功能
1. 在功能區上的指令按滑鼠右鍵
2. 點選 [新增至快速存取工具列] 
移除功能
1.在快速存取工具列按滑鼠右鍵
2.點選 [從快速存取工具列移除] 
三、 鍵盤按鍵常用功能
Enter :往下移動儲存格，或者確定輸入
TAB : 往右移動儲存格
Backspace : 刪除內容 (左)
Delete : 刪除內容
空白 : 空格
方向鍵 : 移動游標
Ctrl + Shift : 輸入法切換
Ctrl + 空白 : 中英文切換
Shift + 空白 : 全形半形 切換
F4 : 重複前一指令
Ctrl + C : 複製
Ctrl + X : 剪下
Ctrl + V : 貼上
Ctrl + Z : 復原
Ctrl + Y : 取消復原
Ctrl + ； ：快速取得目前系統日期
Ctrl + ； + Shift ：快速取得目前系統時間
F2：修改儲存格內容資料
Alt + Enter : 儲存格內容換行
<下拉式選單>
[Alt] + 方向鍵下
四、 移動到特定的儲存格位置
1. 點一下名稱方塊
2. 輸入儲存格位址
3. 按 Enter 鍵 
五、 選取儲存格資料的方式
單選儲存格 ：直接點選儲存格
連續選 取儲存格 ：
1.點起點儲存格位置
2.按住 [Shift] 鍵
3. 在點終點儲存格位置
跳著選取儲存格 ：
1.點起點儲存格位置
2.按住 [Ctrl]鍵不放
3.在點要選取的儲存格位置
整欄、整列 ：點選欄號 或 列號
全選：[Ctrl] + [ A ] 
六、 選取特定的資料範圍
1.點一下名稱方塊
2.輸入位置內容
格式為 『左上：右下』連續
A1:Z1000
格式為 『編號 , 編號』 不連續
A1,Z1000
3.按[Enter]鍵 
七、 調整儲存格欄列大小
自動調整：
在欄號或列號上的編號中間出現左右雙箭頭，點選滑鼠左鍵兩下
手動調整：
按住左鍵拖拉需要調整的大小 
設定欄列大小：
1.點一下要設定的欄號或列號
2.點選滑鼠右鍵
3.設定欄寬 或 列高值 
4.輸入值
5.確定 
八、 插入欄列及刪除
插 入：
1.選取欄或列號
2. 按滑鼠右鍵
3.點選插入 
刪除：
1.選取欄或列號
2.按滑鼠右鍵
3.點選刪除 
九、 對齊設定
1.選取要設定框線的儲 存格
2.點選常用功能標籤
3.點選要使用的對齊方式
十、 框線設定
1.選取要設定框線的儲 存格
2.點選常用功能標籤
3.點選框選按鈕
4.選擇要設定框線的範圍 
十一、 複製資料
一 選取來源文字，點選功能區常用中的 複製按鈕，游標移到目的位置，點選功能區常用中的貼上按鈕。
二 選取來源文字，選取區中按滑鼠右鍵，選擇複製，游標移到目的位置，按一下滑鼠右鍵，選擇貼上。
三 選取來源文字，按鍵盤【C t r l】+【C】即複製，游標移到目的位置，按鍵盤【C t r l】+【V】即貼上。
四 選取來源文字，按住鍵盤【C t r l】鍵不放，再運用滑鼠將選取的文字拖曳到目的位置即可複製
十二、 移動資料
一 選取來源文字，點選功能區常用中的 剪下按鈕，游標移到目的位置，點選功能區常用中的貼上按鈕。
二 選取來源文字，選取區中按滑鼠右鍵，選擇剪下，游標移到目的位置，按一下滑鼠右鍵，選擇貼上。
三 選取來源文字，按鍵盤【C t r l】+【X】即複製，游標移到目的位置，按鍵盤【C t r l】+【V】即貼上。
四 選取來源文字，運用滑鼠將選取的文字直接拖曳到目的位置即可搬移。
十 三、 另存儲新檔
1.點選左上角的OFFICE按鈕
2. 按另存新檔 
3. 選擇檔案位置及檔案名稱
4.儲存 
十四、儲存格資料格式
文字格式使用方式
1.點選常用功能標籤
2.點選數值格式
3.選擇文字類型
(也可以再輸入內容時前面加上單引號' ，表示為文字格式) 
十五、如果格式亂掉了如何處理?
1.選取要設定的儲存格格式
2.點選常用功能 標籤
3.點選數值格式
4. 選擇通用格式，無特定的格式 
十六、對角線儲存格
1.將A2與A3儲存格合併
2.輸入"收支"，案[Alt]+[Enter]換行，再輸入"月份"
3.儲存格對齊靠右邊，在使用空格將收支移動到右邊
4.使用框線繪製對角線
十七、 填滿控點的使用
A.數值：
增號 加CTRL鍵
複製 不加
B .自定清單：
增號 不加
複製 加CTRL鍵
C .文字：只可複製
十八、 自定清單項目
1.點選左上角OFFICE按鈕
2.點選Excel選項按鈕 
3.常用內的編輯自定清單按鈕 
4.輸入清單內容
5.點選新增按鈕，再點選確定按鈕 
十九、畫面並排顯示
1.先開啟需要的檔案
2.檢視 => 並排顯示 => 水平並排
3.確定
問題：想要自動抓取再日期中有輸入內容，固定顯示在最後面的函數寫法
說明：
1.使用Row抓取位置的列號
2.使用Count判斷有輸入資料的各數
3.利用Index抓取欄號、列號的內容
[範例01] 傳值給某單元格
[範例01-01]
Sub test1()
Worksheets("Sheet1").Range("A5").Value = 22
MsgBox "工作表Sheet1內單元格A5中的值為" _
& Worksheets("Sheet1").Range("A5").Value
End Sub
[範例01-02]
Sub test2()
Worksheets("Sheet1").Range("A1").Value = _
Worksheets("Sheet1").Range("A5").Value
MsgBox "現在A1單元格中的值也為" & _
Worksheets("Sheet1").Range("A5").Value
End Sub
[範例01-03]
Sub test3()
MsgBox "用公式填滿單元格,本例為隨機數公式"
Range("A1:H8").Formula = "=Rand()"
End Sub
[範例01-04]
Sub test4()
Worksheets(1).Cells(1, 1).Value = 24
MsgBox "現在單元格A1的值為24"
End Sub
[範例01-05]
Sub test5()
MsgBox "給單元格設置公式,求B2至B5單元格區域之和"
ActiveSheet.Cells(2, 1).Formula = "=Sum(B1:B5)"
End Sub
[範例01-06]
Sub test6()
MsgBox "設置單元格C5中的公式."
Worksheets(1).Range("C5:C10").Cells(1, 1).Formula = "=Rand()"
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例02] 引用單元格
Sub Random()
Dim myRange As Range
'設置對單元格區域的引用
Set myRange = Worksheets("Sheet1").Range("A1:D5")
'對Range對象進行操作
myRange.Formula = "=RAND()"
myRange.Font.Bold = True
End Sub
範例說明：可以設置Range對象變量來引用單元格區域，然後對該變量所代表的單元格區域進行操作。
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例03] 清除單元格
[範例03-01]清除單元格中的內容(ClearContents方法)
Sub testClearContents()
MsgBox "清除指定單元格區域中的內容"
Worksheets(1).Range("A1:H8").ClearContents
End Sub
[範例03-02]清除單元格中的格式(ClearFormats方法)
Sub testClearFormats()
MsgBox "清除指定單元格區域中的格式"
Worksheets(1).Range("A1:H8").ClearFormats
End Sub
[範例03-03]清除單元格中的批註(ClearComments方法)
Sub testClearComments()
MsgBox "清除指定單元格區域中的批註"
Worksheets(1).Range("A1:H8").ClearComments
End Sub
[範例03-04]清除單元格中的全部，包括內容、格式和批註(Clear方法)
Sub testClear()
MsgBox "徹底清除指定單元格區域"
Worksheets(1).Range("A1:H8").Clear
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例04] Range和Cells
Sub test()
'設置單元格區域A1:J10的邊框線條樣式
With Worksheets(1)
.Range(.Cells(1, 1), _
.Cells(10, 10)).Borders.LineStyle = xlThick
End With
End Sub
範例說明：可用 Range(cell1, cell2) 返回一個 Range 對象，其中cell1和cell2為指定起始和終止位置的Range對象。
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例05] 選取單元格區域(Select方法)
Sub testSelect()
'選取單元格區域A1:D5
Worksheets("Sheet1").Range("A1:D5").Select
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例06] 基於所選區域偏離至另一區域(Offset屬性)
[範例06-01]
Sub testOffset()
Worksheets("Sheet1").Activate
Selection.Offset(3, 1).Select
End Sub
範例說明：可用Offset(row, column)(其中row和column為行偏移量和列偏移量)返回相對於另一區域在指定偏移量處的區域。如上例選定位於當前選定區域左上角單元格的向下三行且向右一列處單元格區域。
[範例06-02] 選取距當前單元格指定行數和列數的單元格
Sub ActiveCellOffice()
MsgBox "顯示距當前單元格第3列、第2行的單元格中的值"
MsgBox ActiveCell.Offset(3, 2).Value
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例07] 調整區域的大小(Resize屬性)
Sub ResizeRange()
Dim numRows As Integer, numcolumns As Integer
Worksheets("Sheet1").Activate
numRows = Selection.Rows.Count
numcolumns = Selection.Columns.Count
Selection.Resize(numRows + 1, numcolumns + 1).Select
End Sub
範例說明：本範例調整所選區域的大小，使之增加一行一列。
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例08] 選取多個區域(Union方法)
Sub testUnion()
Dim rng1 As Range, rng2 As Range, myMultiAreaRange As Range
Worksheets("sheet1").Activate
Set rng1 = Range("A1:B2")
Set rng2 = Range("C3:D4")
Set myMultiAreaRange = Union(rng1, rng2)
myMultiAreaRange.Select
End Sub
範例說明：可用 Union(range1, range2, ...) 返回多塊區域，即該區域由兩個或多個連續的單元格區域所組成。如上例創建由單元格區域A1:B2和C3:D4組合定義的對象，然後選定該定義區域。
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例09] 啟動已選區域中的單元格
Sub ActivateRange()
MsgBox "選取單元格區域B2:D6並將C4選中"
ActiveSheet.Range("B3:D6").Select
Range("C5").Activate
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例10] 選取指定條件的單元格(SpecialCells方法)
Sub SelectSpecialCells()
MsgBox "選擇當前工作表中所有公式單元格"
ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas).Select
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例11] 選取矩形區域(CurrentRegion屬性)
'選取包含當前單元格的矩形區域
'該區域周邊為空白行和空白列
Sub SelectCurrentRegion()
MsgBox "選取包含當前單元格的矩形區域"
ActiveCell.CurrentRegion.Select
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例12] 選取當前工作表中已用單元格(UsedRange屬性)
'選取當前工作表中已使用的單元格區域
Sub SelectUsedRange()
MsgBox "選取當前工作表中已使用的單元格區域" _
& vbCrLf & "並顯示其地址"
ActiveSheet.UsedRange.Select
MsgBox ActiveSheet.UsedRange.Address
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例13] 選取最邊緣單元格(End屬性)
'選取最下方的單元格
Sub SelectEndCell()
MsgBox "選取當前單元格區域內最下方的單元格"
ActiveCell.End(xlDown).Select
End Sub
範例說明：可以改變參數xlDown以選取最左邊、最右邊、最上方的單元格。
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例14]設置當前單元格的前一個單元格和後一個單元格的值
Sub SetCellValue()
MsgBox "將當前單元格中前面的單元格值設為""我前面的單元格""" & vbCrLf _
& "後面的單元格值設為""我後面的單元格"""
ActiveCell.Previous.Value = "我前面的單元格"
ActiveCell.Next.Value = "我後面的單元格"
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例15]確認所選單元格區域中是否有公式(HasFormula屬性)
Sub IfHasFormula()
If Selection.HasFormula = True Then
MsgBox "所選單元格中都有公式"
Else
MsgBox "所選單元格中，部分單元格沒有公式"
End If
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例16] 公式單元格操作
[範例16-01]獲取與運算結果單元格有直接關係的單元格
Sub CalRelationCell()
MsgBox "選取與當前單元格的計算結果相關的單元格"
ActiveCell.DirectPrecedents.Select
End Sub
[範例16-02]追蹤公式單元格
Sub Cal1()
MsgBox "選取計算結果單元格相關的所有單元格"
ActiveCell.Precedents.Select
End Sub
Sub TrackCell()
MsgBox "追蹤運算結果單元格"
ActiveCell.ShowPrecedents
End Sub
Sub DelTrack()
MsgBox "刪除追蹤線"
ActiveCell.ShowPrecedents Remove:=True
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例17] 複製單元格(Copy方法)
Sub CopyRange()
MsgBox "在單元格B7中寫入公式後,將B7的內容複製到C7:D7內"
Range("B7").Formula = "=Sum(B3:B6)"
Range("B7").Copy Destination:=Range("C7:D7")
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例18]獲取單元格行列值(Row屬性和Column屬性)
Sub RangePosition()
MsgBox "顯示所選單元格區域的行列值"
MsgBox "第 " & Selection.Row & "行 " & Selection.Column & "列"
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例19]獲取單元格區域的單元格數及行列數(Rows屬性、Columns屬性和Count屬性)
Sub GetRowColumnNum()
MsgBox "顯示所選取單元格區域的單元格數、行數和列數"
MsgBox "單元格區域中的單元格數為:" & Selection.Count
MsgBox "單元格區域中的行數為:" & Selection.Rows.Count
MsgBox "單元格區域中的列數為:" & Selection.Columns.Count
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例20]設置單元格中的文本格式
[範例20-01] 對齊文本
Sub HorizontalAlign()
MsgBox "將所選單元格區域中的文本左右對齊方式設為居中"
Selection.HorizontalAlignment = xlHAlignCenter
End Sub
Sub VerticalAlign()
MsgBox "將所選單元格區域中的文本上下對齊方式設為居中"
Selection.RowHeight = 36
Selection.VerticalAlignment = xlVAlignCenter
End Sub
[範例20-02] 縮排文本(InsertIndent方法)
Sub Indent()
MsgBox "將所選單元格區域中的文本縮排值加1"
Selection.InsertIndent 1
MsgBox "將縮排值恢復"
Selection.InsertIndent -1
End Sub
[範例20-03] 設置文本方向(Orientation屬性)
Sub ChangeOrientation()
MsgBox "將所選單元格中的文本順時針旋轉45度"
Selection.Orientation = 45
MsgBox "將文本由橫向改為縱向"
Selection.Orientation = xlVertical
MsgBox "將文本方向恢復原值"
Selection.Orientation = xlHorizontal
End Sub
[範例20-04]自動換行(WrapText屬性)
Sub ChangeRow()
Dim i
MsgBox "將所選單元格設置為自動換行"
i = Selection.WrapText
Selection.WrapText = True
MsgBox "恢復原狀"
Selection.WrapText = i
End Sub
[範例20-05]將比單元格列寬長的文本縮小到能容納列寬大小(ShrinkToFit屬性)
Sub AutoFit()
Dim i
MsgBox "將長於列寬的文本縮到與列寬相同"
i = Selection.ShrinkToFit
Selection.ShrinkToFit = True
MsgBox "恢復原狀"
Selection.ShrinkToFit = i
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例21]設置條件格式(FormatConditions屬性)
Sub FormatConditions()
MsgBox "在所選單元格區域中將單元格值小於10的單元格中的文本變為紅色"
Selection.FormatConditions.Add Type:=xlCellValue, _
Operator:=xlLessEqual, Formula1:="10"
Selection.FormatConditions(1).Font.ColorIndex = 3
MsgBox "恢復原狀"
Selection.FormatConditions(1).Font.ColorIndex = xlAutomatic
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例22]插入批註(AddComment方法)
Sub EnterComment()
MsgBox "在當前單元格中輸入批註"
ActiveCell.AddComment ("Hello")
ActiveCell.Comment.Visible = True
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例23]隱藏/顯示單元格批註
Sub CellComment()
MsgBox "切換當前單元格批註的顯示和隱藏狀態"
ActiveCell.Comment.Visible = Not (ActiveCell.Comment.Visible)
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例24]改變所選單元格的顏色
Sub ChangeColor()
Dim iro As Integer
MsgBox "將所選單元格的顏色改為紅色"
iro = Selection.Interior.ColorIndex
Selection.Interior.ColorIndex = 3
MsgBox "將所選單元格的顏色改為藍色"
Selection.Interior.Color = RGB(0, 0, 255)
MsgBox "恢復原狀"
Selection.Interior.ColorIndex = iro
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例25]改變單元格的圖案
Sub ChangePattern()
Dim p, pc, i
MsgBox "依Pattern常數值的順序改變所選單元格的圖案"
p = Selection.Interior.Pattern
pc = Selection.Interior.PatternColorIndex
For i = 9 To 16
With Selection.Interior
.Pattern = i
.PatternColor = RGB(255, 0, 0)
End With
MsgBox "常數值 " & i
Next i
MsgBox "恢復原狀"
Selection.Interior.Pattern = p
Selection.Interior.PatternColorIndex = pc
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例26]合併單元格
Sub MergeCells()
MsgBox "合併單元格A2:C2,並將文本設為居中對齊"
Range("A2:C2").Select
With Selection
.MergeCells = True
.HorizontalAlignment = xlCenter
End With
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例27]限制單元格移動的範圍
Sub ScrollArea1()
MsgBox "將單元格的移動範圍限制在單元格區域B2:D6中"
ActiveSheet.ScrollArea = "B2:D6"
End Sub
Sub ScrollArea2()
MsgBox "解除移動範圍限制"
ActiveSheet.ScrollArea = ""
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例28]獲取單元格的位置(Address屬性)
Sub GetAddress()
MsgBox "顯示所選單元格區域的地址"
MsgBox "絕對地址:" & Selection.Address
MsgBox "行的絕對地址:" & Selection.Address(RowAbsolute:=False)
MsgBox "列的絕對地址:" & Selection.Address(ColumnAbsolute:=False)
MsgBox "以R1C1形式顯示:" & Selection.Address(ReferenceStyle:=xlR1C1)
MsgBox "相對地址:" & Selection.Address(False, False)
End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
[範例29]刪除單元格區域(Delete方法)
Sub DeleteRange()
MsgBox "刪除單元格區域C2:D6後,右側的單元格向左移動"
ActiveSheet.Range("C2:D6").Delete (xlShiftToLeft)
End Sub
小結
下面對Range對象的一些常用屬性和方法進行簡單的小結。
1、Activate與Select
試驗下面的過程：
Sub SelectAndActivate()
Range("B3:E10").Select
Range("C5").Activate
End Sub
其結果如下圖所示：
圖05-01：Select與Activate
Selection指單元格區域B3：E10，而ActiveCell則是單元格C5；ActiveCell代表單個的單元格，而Selection則可以代表單個單元格，也可以代表單元格區域。
2、Range屬性
可以使用Application對象的Range屬性引用Range對象，如
Application.Range(「B2」) 『代表當前工作表中的單元格B2
若引用當前工作表中的單元格，也可以忽略前面的Application對象。
Range(「A1:D10」) 『代表當前工作表中的單元格區域A1:D10
Range(「A1:A10,C1:C10,E1:E10」) 『代表當前工作表中非連續的三個區域組成的單元格區域
Range屬性也接受指向單元格區域對角的兩個參數，如：
Range(「A1」,」D10」) 『代表單元格區域A1：D10
當然，Range屬性也接受單元格區域名稱，如：
Range(「Data」) 『代表名為Data的數據區域
Range屬性的參數可以是對象也可以是字符串，如：
Range(「A1」,Range(「LastCell」))
3、單元格引用的快捷方式
可以在引用區域兩側加上方括號來快速引用單元格區域，如：
[B2]
[A1:D10]
[A1:A10,C1:C10,E1:E10]
[Data]
但其引用的是絕對區域。
4、Cells屬性
可以使用Cells屬性來引用Range對象。如：
ActiveSheet.Cells
Application.Cells 『引用當前工作表中的所有單元格
Cell(2,2)
Cell(2,」B」) 『引用單元格B2
Range(Cells(1,1),Cells(10,5)) 『引用單元格區域A1:E10
若想在一個單元格區域中循環時，使用Cells屬性是很方便的。
也可以使用Cells屬性進行相對引用，如：
Range(「D10:G20」).Cells(2,3) 『表示引用單元格區域D10:G20中第2行第3列的單元格，即單元格F11
也可使用語句：Range(「D10」).Cells(2,3)達到同樣的引用效果。
5、Offset屬性
Offset屬性基於當前單元格按所給參數進行偏移，與Cells屬性不同的是，它基於0即基準單元格為0，如：
Range(「A10」).Cells(1,1)和Range(「A10」).Offset(0,0)都表示單元格A10
當想引用於基準單元格區域同樣大小的單元格區域時，則Offset屬性是有用的。
6、Resize屬性
可使用Resize屬性獲取相對於原單元格區域左上角單元格指定大小的區域。
7、SpecialCells方法
SpecialCells方法對應於「定位條件」對話框，如圖05-02所示：
圖05-02：「定位條件」對話框
8、CurrentRegion屬性
使用CurrentRegion屬性可以選取當前單元格所在區域，即周圍是空行和空列所圍成的矩形區域，等價於「Ctrl+Shift+*」快捷鍵。
9、End屬性
End屬性所代表的操作等價於「Ctrl+方向箭」的操作，使用常量xlUp、xlDown、xlToLeft和xlToRight分別代表上、下、左、右箭。
10、Columns屬性和Rows屬性
Columns屬性和Rows屬性分別返回單元格區域中的所有列和所有行。
11、Areas集合
在多個非連續的單元格區域中使用Columns屬性和Rows屬性時，只是返回第一個區域的行或列，如：
Range(「A1:B5,C6:D10,E11:F15」).Rows.Count
將返回5。
此時應使用Areas集合來返回區域中每個塊的地址，如：
For Each Rng In Range(「A1:B5,C6:D10,E11:F15」).Areas
MsgBox Rng.Address
Next Rng
12、Union方法和Intersect方法
當想從兩個或多個單元格區域中生成一個單元格區域時，使用Union方法；當找到兩個或多個單元格區域共同擁有的單元格區域時，使用Intersect方法。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)Rows(Selection.Row & ":" & Selection.Row).SelectEnd Sub
使用CheckBox來開關亮顯
Private Sub Worksheet_SelectionChange(ByVal Target As Range)a = Selection.RowIf CheckBox1.Value Then Rows(a & ":" & a).SelectEnd Sub
A ~ Z 函數語法 :
=CHAR(65+ROW()-1)
a ~ z 函數語法 :
=CHAR(97+ROW()-1)
Excel快速鍵大全
2.功能鍵組合的快速鍵
3.其他組合的快速鍵
4.補充組合的快速鍵
'定義webURL字串變數Dim webURL As String'webURL為要匯入的網址webURL = "URL;http://xxx.xxx.xxx.xxx/123.htm"With ActiveSheet.QueryTables.Add(Connection:=webURL, Destination:=Range("A1"))' xlOverwriteCells 表示覆蓋欄位.RefreshStyle = xlOverwriteCells' 抓取網頁的第三個表格作為匯入資料.WebTables = "3".Refresh BackgroundQuery:=FalseEnd With
假如在同一資料夾內有 A.xls 和 B.xls 兩個檔案，要使 A.xls 的 Sheet1 儲存格 A1等於 B.xls 的 Sheet1 儲存格 A1
使用巨集來操作至少可以使用以下兩種方法。
方法一、
在A檔案內執行(B檔案可以不用開啟)
Range("a1").Formula = "='[B.xls]Sheet1'!$A$1"Range("a1").Formula = Range("a1").Value ' 讓它的內容等於它的值(不要公式)' 若B檔案不是在同一個資料夾內則需要指定完整的路徑' 例 : Range("a1").Formula = "='C:\XXX\[B.xls]Sheet1'!$A$1"
方法二、
在範圍比較大的時候適用 , 且前提是 B.xls 是已經開啟的檔案
在A檔案內執行
Workbooks("b.xls").Sheets("sheet1").Range("a1:c3").Copy '複製 B.xls Sheet1的 a1到c3ActiveSheet.Paste' 貼上 , 這邊沒有指定要貼在哪裡是因為我們沒有select到其他的檔案或工作表儲存格' 所以它會直接貼到 A.xls Sheet1的 A1
若是有需要在2個檔案中SELECT切換的狀況可以參考
使用VBA把活頁簿中的每個活頁切分儲存為各個檔案
的方式使用windows或workbooks在檔案間切換
Excel篇 ：
Excel.DisplayAlerts := False; //Disable 提示訊息
Excel.Visible := True; //顯示 Excel 畫面
Excel.ActiveWindow.FreezePanes := True; //凍結窗格(上一行一定要先選列或格)
Excel.ActiveWindow.Zoom := 75; //顯示比率為75%
Excel.ActiveWindow.Zoom := True; //依據目前選擇範圍自動決定視窗大小
Workbook篇：
WorkBook := mExcel.WorkBooks[1]; //將指定變數設定第一個活頁簿(數字可以用名稱取代)
WorkBook.Name :='內容'; //變更WorkBook名稱
Excel.WorkBooks.Add; //新增一個空白活頁簿
Excel.WorkBooks.Open(完整路徑); //開啟Excel檔
Excel.WorkBooks[mFile].Close; //關閉Excel檔
DeleteFile(mPath+mFile); //刪除Excel檔
WorkBook.SaveAs(mPath+mFile,-4143); //儲存Excel檔
Sheet篇：
Sheet := mExcel.WorkBooks[1].WorkSheets[1]; //將指定變數設定第一個工作表(數字可以用名稱取代)
Sheet.Name :='內容'; //變更Sheet名稱
Sheet.Copy[After := mWorkBook.Sheets[mWorkBook.Sheets.Count]]; //將mSheet複製到mWorkBook最後
Sheet.Move[After := mWorkBook.Sheets[mWorkBook.Sheets.Count]]; //將mSheet搬移到mWorkBook最後
Workbook.Sheets.Add[After:=mWorkbook.Sheets[mSheetCount-1]]; //新增一個空白工作表
WorkBook.Sheets[1].Delete; //刪除指定Sheet
WorkBook.Sheets[1].Activate; //將指定Sheet設為使用中
刪除多餘Sheet：
if (mWorkBook.Sheets.Count > 1) then
begin
for i:=2 to mWorkBook.Sheets.Count do
mWorkBook.Sheets[2].Delete;
end;
選取篇：
mSheet.Cells.EntireColumn //所有欄
mSheet.Cells.EntireRow //所有列
mSheet.Cells //所有儲存格
mSheet.Columns[1] //第一欄
mSheet.Rows[1] //第一列
mSheet.Cells[r,c] //第r列第c欄
mSheet.Range[起,迄] //區間選擇(起訖可以是欄、列、格)
填值篇：
mSheet.Cells[1,1].Value:= '內容'; //欄位填值
mSheet.Cells[1,1].Formula:= '公式'; //欄位填入公式
mSheet.Cells[1,1].FormulaR1C1:= '公式'; //欄位填入公式
mSheet.Cells[1,1].HasFormula //儲存格是否有公式
格式篇：
mSheet.Range[起,迄].Merge; //合併儲存格
mSheet.Cells.EntireColumn.AutoFit; //最適欄寬
mSheet.Cells.EntireRow.AutoFit; //最適列高
mSheet.Columns[1].ColumnWidth := 100; //設定欄寬
mSheet.Rows[1].RowHeight := 100; //設定列高
mSheet.Rows[1].HorizontalAlignment := -4108; //水平置中(靠左:-4131；靠右:-4152)
mSheet.Rows[1].VerticalAlignment := -4108; //垂直置中(靠左:-4131；靠右:-4152)
mSheet.Rows[1].WrapText := True; //自動換列
mSheet.Columns[1].Hidden := True; //隱藏
mSheet.Columns[1].NumberFormatLocal := '@'; //設定欄位格式[文字]
mSheet.Columns[1].NumberFormatLocal := '#,##0_ '; //設定欄位格式[數值(整數位 三位一撇)]
mSheet.Columns[1].NumberFormatLocal := '#,##0_ ;[紅色]-#,##0 '; //設定欄位格式[數值(整數位 三位一撇 負數紅字)]
mSheet.Columns[1].NumberFormatLocal := '#,##0_);[紅色](#,##0)'; //設定欄位格式[數值(整數位 三位一撇 負數括號紅字)]
mSheet.Columns[1].NumberFormatLocal := '0.00_ '; //設定欄位格式[數值(小數兩位)]
mSheet.Columns[1].NumberFormatLocal := '0.0_);[紅色](0.0)'; //設定欄位格式[數值(小數一位 負數紅字)]
mSheet.Columns[1].NumberFormatLocal := '0.00%'; //設定欄位格式[百分比(小數兩位)]
mSheet.Cells[1].Interior.ColorIndex := 38; //設定底色為玫瑰色
mSheet.Cells[1].Interior.ColorIndex := 6; //設定底色為黃色
mSheet.Cells[1].Interior.ColorIndex := 36; //設定底色為淺黃色
mSheet.Cells[1].Interior.ColorIndex := 35; //設定底色為淺綠色
mSheet.Cells[1,1].Font.Size := 10; //設定字體大小
mSheet.Cells[1,1].Font.Bold := True; //設定粗體字
框線：
mSheet.Cells[1,1].Borders[n].LineStyle := 1;
mSheet.Cells[1,1].Borders[n].Weight := 2;
//n = 5.左上右下斜線 6.左下右上斜線 7.左邊線 8.上邊線 9.下邊線 10.右邊線 11.垂直線 12.水平線
//Borders可使用參數：
// LineStyle = 1 實線；-4115 短虛線；4 長短虛線；5 長短短虛線；-4118 細虛線；-4119 雙實線
// Weight = 由細到粗：1 --> 2 --> -4138 --> 4
// ColorIndex = 顏色
//設定格式化條件
Sheet.Cells[1,1].FormatConditions.Delete; //清除格式化條件
Sheet.Cells[1,1].FormatConditions.Add[Type:='1', Operator:='1', Formula1:='1', Formula2:='2']; //新增格式化條件(最多3個)
//參數說明
// 參數 中文說明 說明
//======== ======== =======================================================================
//Type 來源型態 1.儲存格的值 2.公式
//Operator 規則 1.介於 2.不介於 3.等於 4.不等於 5.大於 6.小於 7.大於或等於 8.小於或等於
//Formula1 條件起
//Formula2 條件迄
mSheet.Cells[1,1].FormatConditions(1).Interior.ColorIndex := 3; //設定條件一為底色紅色
//可設定之格式有：Fonts(字型)、Borders(外框)、Interior(圖樣)
//資料篇
mSheet.Cells.EntireColumn.AutoFilter; //自動篩選
mExcel.Selection.Subtotal(1,-4157,VarArrayOf([4,5,6,7,8]),True,False,True); //做小計
//參數說明
// 參數 中文說明 預設值
//================ ======================== ======
//GroupBy 分組小計欄位 1
//Function 使用函數 -4157 加總
//TotalList 新增小計位置
//Replace 取代目前小計 True
//PageBreaks 每組資料分頁 False
//SummaryBelowData 摘要資料置於小計資料下方 True
//可使用函數：-4157 加總；-4106 平均值；-4112 項目個數；-4113 數字項目數；-4136 最大值；-4139 最小值；
mSheet.Outline.ShowLevels(2); //把小計層級設2顯示
列印篇：
mSheet.PageSetup.PrintTitleRows := '$1:$1'; //列印標題列
mSheet.PageSetup.CenterHeader := '表頭'; //中頁首
mSheet.PageSetup.LeftHeader := '頁次: &P / &N'; //左頁首
mSheet.PageSetup.RightHeader := ''; //右頁首
mSheet.PageSetup.CenterFooter := '& &P / &N'; //中頁尾
mSheet.PageSetup.LeftFooter := '頁次: &P / &N'; //左頁尾
mSheet.PageSetup.RightFooter := ''; //右頁尾
mSheet.PageSetup.PrintArea := '$B$1:$N$300'; //設定列印範圍
mSheet.PageSetup.Orientation := 2; //1.直印 2.橫印
mSheet.PageSetup.Zoom := 65; //列印時小成65%
mSheet.PageSetup.Zoom := True; //使用頁次縮放功能
mSheet.PageSetup.FitToPagesWide := 1; //縮放成一頁寬(需配合Zoom = True)
mSheet.PageSetup.FitToPagesTall := 1; //縮放成一頁高(需配合Zoom = True)
mSheet.PageSetup.PaperSize := 8; //設定紙張大小 8:A3、9:A4
mSheet.PageSetup.TopMargin := 1/0.035; //頂邊距1cm
mSheet.PageSetup.BottomMargin := 1/0.035; //底邊距1cm
mSheet.PageSetup.LeftMargin := 1/0.035; //左邊距2cm
mSheet.PageSetup.RightMargin := 1/0.035; //右邊距2cm
mSheet.PageSetup.HeaderMargin := 1/0.035; //頁首1cm
mSheet.PageSetup.FooterMargin := 1/0.035; //頁尾1cm
mSheet.PageSetup.CenterHorizontally := True; //頁面水平居中
mSheet.PageSetup.CenterVertically := False; //頁面垂直居中
範例：
Worksheets("Sheet1").Activate
ActiveCell.CurrentRegion.Select
範例：
Set c = Worksheets("Sheet1").Range("B14")
c.Value = 1198.3
c.NumberFormat = "$#,##0_);($#,##0)"
MsgBox c.Value
MsgBox c.Text
範例：
Sub Macro1()
Sheets("Sheet1").Select
Range("A1").Select
ActiveCell.FormulaR1C1 = "Name"
Range("B1").Select
ActiveCell.FormulaR1C1 = "Address"
Range("A1:B1").Select
Selection.Font.Bold = True
End Sub
範例：
Sub CopyRow()
Worksheets("Sheet1").Rows(1).Copy
Worksheets("Sheet2").Select
Worksheets("Sheet2").Rows(1).Select
Worksheets("Sheet2").Paste
End Sub
範例：
With Worksheets("Sheet1")
.Range("C1:C5").Copy
.Range("D1:D5").PasteSpecial _
Operation:=xlPasteSpecialOperationAdd
End With
範例：
Sub MoveActive()
Worksheets("Sheet1").Activate
Range("A1:D10").Select
ActiveCell.Value = "Monthly Totals"
ActiveCell.Offset(0, 1).Activate
End Sub
程式語法：
範例：
Sub Random()
Dim myRange As Range
Set myRange = Worksheets("Sheet1").Range("A1:D5")
myRange.Formula = "=RAND()"
myRange.Font.Bold = True
End Sub
範例：
Sub AddNew()
Set NewBook = Workbooks.Add
With NewBook
.Title = "All Sales"
.Subject = "Sales"
.SaveAs Filename:="Allsales.xls"
End With
End Sub
範例：
Sub Several()
Worksheets(Array("Sheet1", "Sheet2", "Sheet4")).Select
End Sub
範例：
Sub MultipleRange()
Dim r1, r2, myMultipleRange As Range
Set r1 = Sheets("Sheet1").Range("A1:B2")
Set r2 = Sheets("Sheet1").Range("C3:D4")
Set myMultipleRange = Union(r1, r2)
myMultipleRange.Font.Bold = True
End Sub
範例：
Sub CycleThrough()
Dim Counter As Integer
For Counter = 1 To 20
Worksheets("Sheet1").Cells(Counter, 3).Value = Counter
Next Counter
End Sub
範例：
Sub ApplyColor()
Const Limit As Integer = 25
For Each c In Range("MyRange")
If c.Value > Limit Then
c.Interior.ColorIndex = 27
End If
Next c
End Sub
1.先把商品類別使用資料驗證，製作清單功能，接者點選B10，插入函數找到OFFSET
2.點選Refernce設定偏移的起始位置，這裡點選商品明細工作表的A1，並且按F4做絕對參照
3.點選Row引數位置，按左上角的插入函數，找到MATCH函數
4.設定MATCH函數的引數，Lookup_value : 搜尋值點選商品類別A10，Lookup_array :查詢範圍選取商品明細的商品類別範圍，Match_type :查詢方式輸入0表示完全比對。設定完成後再點OFFSET函數
5.點選Height高度範圍，這邊請插入COUNTIF函數計算商品類別的數目，當為資料的高度範圍
6.COUNTIF函數的Range:判斷範圍選取商品明細的商品類別整攔，Criteria 查詢條件選取商品類別A10。設定完成後再點OFFSET函數
7.完成函數設定後，將函數全部選取，按右鍵選擇複製
8.點選公式功能標籤裡面的名稱管理員，再點選[新增]鈕增加名稱。
9.這邊的名稱定義名稱輸入商品編號，點選參照到按右鍵貼上剛剛複製的公式。
10.貼上完成後，點選[確定]按鈕
11.把名稱定義完成後，接者點選商品編號儲存格B10，設定資料 \ 資料驗證 \ 儲存格內允許選擇清單，在點一下來源的位置
12.點選公式功能標籤，用於公式，點選商品編號範圍名稱
13.再點確定按鈕
14.之後點選清單方塊，會發現編號的範圍不對，往下多偏移的一個位置
15.再點選公式功能標籤的名稱管理員，點選名稱，在MATCH函數括號後輸入 -1 減一個位置，再按打勾，關閉
16.修正完成後，即可選擇到正確的資料範圍
一、 直接運算
1. 點一下要計算的儲存格
2. 輸入 =
3. 輸入運算式
4. Enter
二、 儲存格運算
1. 點一下要計算的儲存格
2. 輸入 =
3. 點要運算的儲存格,及編輯運算式
4. Enter
三、 位址參照
1. 選取儲存格編號
2. 按F4切換參照
絕對、相對及混合參照間的差異
種類可分為四種：
相對位址「B1」：欄列均未鎖定（欄列皆可動）
絕對 位址「$B$1」：鎖欄鎖列（欄列皆不可動）
混合位址「$B1」：鎖欄不鎖列（欄不動列可動）
混合位址 「B$1」：不鎖欄鎖列（欄動列不可動）
使用：選取位址，在利用鍵盤上F4 按鈕切換
四、 隱藏儲存格
1. 選取要隱藏的欄號或列號
2. 按滑鼠右鍵
3.點選隱藏
五、 群組
1. 選取要群組的範圍
2.點選資料功能標籤
3.群組
六、 自動建立大綱
1.點一下資料
2.點選資料功能標籤
3.點選群組
4. 自動建立大綱
七、顯示公式
[ Ctrl ] + [ ~ ]
八、<往下填滿公式>
1.選取要填滿的儲存格
2.按鍵盤 [ Ctrl ] + [ D ] 向下填滿公式
九、 函數
1.點選要插入函數的儲存格
2.點選fx「貼上函數
3.在「函數類別」內選擇 [全部]
4.點選一下要使用函數的名稱
5.輸入要使用函數開頭的字母
6.選擇要使用的函數
7.設定函數所需要的參數值或範圍
8.[確定]
【Sum】加總
Number1
選取要計算的範圍
可用 Shift 或Ctrl搭配選取
【Average】平均
Number1
選取要計算的範圍
可用Shift 或Ctrl搭配選取
【Max】最大值
Number1
選取要計算的範圍
可用Shift 或Ctrl搭配選取
【Min】最小值
Number1
選取要計算的範圍
可用Shift 或Ctrl搭配選取
【Counta】計 算非空白儲存格的數量
Valus1
選取要計算的範圍
可用Shift 或Ctrl搭配選取
【Today】取現 在的日期
不用選任何範圍
抓取系統的日期
F9 : 更新
手動取 得方式
日期 : Ctrl + ；
時間 : Ctrl + Shift +；
【Now】取現在的 時間及日期
不用選任何範圍
抓取系統的日期及時間
F9 : 更新
若 格式無法顯示，請更改儲存格的格式
【IF】判斷式
Logical_test 判斷的條件
Value_if_true 條件成立的結果
Value_if_false 條件不成立的結果
TRUE : 真的 成立
FALSE : 假的 不成立
【COUNTIF】 判斷符合條件的儲存格
Range 要判斷的範圍
Criteria 判斷的條件
【RANK】排序 (計算名次)
Number 要比較的值
Ref 比較的範圍 (固定範圍要鎖定)
Order 排序的方式
0 或 空白 : 遞減
非0或空白的數值 : 遞增
【SUMIF】有條件加總
Range 要判斷加總的範圍 (範圍固定絕對參照)
Criteria 判斷的條件
Sum_range 符合條件要加的範圍 (範圍固定絕對參照)
【Month】抓取日期中的月份
Serial_number 選取或輸入日期
<日期函數名稱>
今天 TODAY
現在 NOW
年 YEAR
月 MONTH
日 DAY
時 HOUR
分 MINUTE
秒 SECOND
【VLOOKUP】查表
Lookup_value 要查詢的儲存格內容
Table_array 查詢資料的範圍
Col_index_num 在查詢範圍中第某欄位置
Range_lookup 查詢方式False表示為完成符合，True表示為範圍查詢
步驟1.
選取要建立清單的資料範圍，點選公式內的[從選取範圍建立]按鈕，勾選頂端列為範圍名稱，再按確定按鈕
步驟2.
切換到資料的工作表中，選取要建立選的的範圍，點[資料]內的[資料驗證]
步驟3.
將儲存格內允許選擇[清單]，選取班級的範圍，再按[確定]按鈕
步驟4.
如此就完成第一層的下拉式選單功能
步驟5.
點選B2班級為置，案fx插入函數，類別選全部找到INDIRECT函數，按確定按鈕
步驟6.
INDIRECT 函數的Ref_text選取A2年級，按確定按鈕
步驟7.
選取剛剛產生的函數內容，按滑鼠右鍵選擇剪下
步驟8.
點選[資料]內的[資料驗證]，儲存格內允許選擇清單，把剛剛剪下的函數貼上到來源內，按確定按鈕
步驟8.
如此就完成多層選單的效果
說明：這邊為示範設定，限定儲存格的輸入，及將儲存格的公式內容隱藏，不讓別人看到
一、限制儲存格輸入
Step 1.
選取要開放輸入的儲存格範圍（儲存格預設都為鎖定的狀態，因此開先選取要解鎖的儲存格範圍）
Step 2.
按滑鼠右鍵，選擇[儲存格格式]
Step 3.
點選"保護"標籤，取消勾選"鎖定"，再點選[確定]按鈕
二、隱藏公式
Step 4.
選取要隱藏公式內容的範圍
Step 5.
按滑鼠右鍵，選擇[儲存格格式]
Step 6.
點選"保護"標籤，勾選"隱藏"，再點選[確定]按鈕
三、啟動保護工作表
Step 7.
點選[校閱]功能標籤，點選[保護工作表]，輸入要保護的密碼，再點選[確定]按鈕
如此一來，剛剛儲存格內容，就會限制只能剛剛解除保護的位置才能輸入，以及有公式的內容都看不到。
