Excel 進階格式設定

Question

下圖顯示了我想要實現的目標：

解釋：

我有一個表格，其中混合了沒有格式的文字和粗體+斜體文字。我想將粗體+斜體文字的格式更改為帶有橙色突出顯示的粗體文字。沒有格式的文字保持不變。

除了手動一一格式化，還有沒有更簡單、快速的方法呢？

Answer 1

這可以使用 VBA 來實現。此程式碼在 Excel 2013 中進行了測試。

在工作表中按Alt+F11開啟 VBA 編輯器。從插入選單，插入一個模組。雙擊左側窗格中插入的模組以開啟其程式碼編輯器。

現在將以下程式碼貼到其中。

Public Sub myformat()

  Dim rng As Range
  Set rng = Range("Sheet1!D4:D11")  'Specify the desired SheetName!Range here
  For Each cel In rng.Cells
    If cel.Font.Bold = True And cel.Font.Italic = True Then
        cel.Font.Italic = False
        cel.Interior.ColorIndex = 44  '44 is the color index number for standard Orange in Excel
    End If   
  Next cel

End Sub

這將建立一個名為 的 VBA 巨集myformat。這裡需要手動指定SheetName!Range。本例中Sheet1!D4:D11是資料範圍。儲存並退出回到工作表。

按Alt+F8進入巨集對話框並執行該myformat巨集以獲得所需的效果。

Answer 2

1. 將其中一個單元格設定為所需格式（粗體+橙色填充）

2. 選擇該單元格，然後按兩下格式刷
   

3. 選擇要設定格式的儲存格。您可以手動逐一單擊它們，如果是連續範圍，則可以拖曳它們。