



💡 **多工作表同步設定**:先按住 Ctrl 點選多個工作表索引標籤(群組模式,標題列顯示 `[群組]`),再執行上述步驟,所有選取工作表同步套用。完成後點選未選取的工作表取消群組。
Sub SetGridlineColor()
' 設定作用中工作表格線為紅色 (RGB 255,0,0)
ActiveSheet.DisplayGridlines = True
ActiveSheet.GridlineColor = RGB(255, 0, 0)
' 或使用長整數色碼:ActiveSheet.GridlineColor = vbRed
End Sub
Sub SetAllSheetsGridlineColor()
' 設定整個活頁簿所有工作表格線顏色
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.DisplayGridlines = True
ws.GridlineColor = RGB(0, 112, 192) ' 藍色
Next ws
End Sub
Sub ResetGridlineColor()
' 還原為預設自動顏色
ActiveSheet.GridlineColor = xlColorIndexAutomatic
End Sub
| 特性 | 格線 | 儲存格邊框 |
|---|---|---|
| 控制層級 | 整張工作表統一顏色 | 單一儲存格/區域可各自設定 |
| 列印 | 預設**不列印**(需頁面設定勾選「格線」才列印) | 預設**列印** |