☰

Excel の高度な書式設定

tag-icon • tag-icon microsoft-excel worksheet-function
Excel の高度な書式設定

以下の画像は私が達成したいことを表しています。

ここに画像の説明を入力してください

説明：

書式なしのテキストと太字斜体のテキストが混在する表があります。太字斜体のテキストの書式を、オレンジ色のハイライト付きの太字テキストに変更します。書式なしのテキストは変更されません。

手動で 1 つずつフォーマットする以外に、より簡単で迅速なフォーマット方法はありますか?

答え1

これは VBA を使用して実現できます。このコードは Excel 2013 でテストされています。バージョンは指定されていませんが、念のため、Excel 2003 でも十分に機能する汎用性があるはずです。

ワークシートでAlt+を押してF11VBAエディターを開きます。入れるメニューに挿入モジュール左側のペインで挿入されたモジュールをダブルクリックして、コード エディターを開きます。

次に、次のコードを貼り付けます。

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マクロを実行して目的の効果を得ます。

ここに画像の説明を入力してください

答え2

  1. セルの 1 つを必要な形式 (太字 + オレンジ色の塗りつぶし) にフォーマットします。

  2. そのセルを選択し、ダブルクリック書式ペインター
    書式ペインター

  3. 書式設定するセルを選択します。セルを 1 つずつ手動でクリックするか、連続した範囲の場合はドラッグすることができます。

関連情報