Erweiterte Excel-Formatierung

Question

Das folgende Bild zeigt, was ich erreichen möchte:

Erläuterung:

Ich habe eine Tabelle mit Text ohne Formatierung und fettem und kursivem Text. Ich möchte das Format des fetten und kursiven Textes ändern, sodass er fettem Text mit oranger Hervorhebung entspricht. Der Text ohne Formatierung bleibt unverändert.

Gibt es eine einfachere und schnellere Möglichkeit, sie zu formatieren, außer sie einzeln manuell zu formatieren?

Answer 1

Dies kann mit VBA erreicht werden. Dieser Code wurde in Excel 2013 getestet. Obwohl Sie die Version nicht erwähnt haben, sollte dies allgemein genug sein, um zur Sicherheit auch in Excel 2003 zu funktionieren.

Drücken Sie in Ihrem Arbeitsblatt Alt+, F11um den VBA-Editor zu öffnen.EinfügenMenü, fügen Sie einModul. Doppelklicken Sie auf das eingefügte Modul im linken Bereich, um dessen Code-Editor zu öffnen.

Fügen Sie nun den folgenden Code dort ein.

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

Dadurch wird ein VBA-Makro mit dem Namen erstellt myformat. Hier müssen Sie den Blattnamen!Bereich manuell angeben. In diesem Beispiel Sheet1!D4:D11ist dies der Datenbereich. Speichern und zurück zum Arbeitsblatt gehen.

Drücken Sie Alt+, F8um auf das Makro-Dialogfeld zuzugreifen und dieses myformatMakro auszuführen, um den gewünschten Effekt zu erzielen.

Answer 2

1. Formatieren Sie eine der Zellen im gewünschten Format (fett + orange Füllung).

2. Wählen Sie diese Zelle aus undDoppelklickFormat Maler
   

3. Wählen Sie die Zellen aus, die Sie formatieren möchten. Sie können sie manuell einzeln anklicken oder ziehen, wenn es sich um einen zusammenhängenden Bereich handelt.