Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie schnell Schriftgröße basierend auf Zellenwert in Excel ändern?

doc ändert die Schriftgröße basierend auf dem Wert 7
In Excel können Sie die Zellenschriftgröße beliebig ändern, aber haben Sie jemals versucht, die Zellenschriftgröße basierend auf einem anderen Spaltenwert zu ändern, wie im Screenshot gezeigt? In diesem Artikel stelle ich Ihnen einen VBA-Code vor, mit dem Sie die Schriftgröße auf der Grundlage des Zellenwerts in Excel schnell ändern können.
Ändern Sie die Schriftgröße basierend auf einem anderen Spaltenwert

Ändern Sie die Schriftgröße basierend auf Zellenwert und Zeichenlänge

Wählen Sie bestimmte Zellen aus

Mit  Kutools for Excel's Wählen Sie bestimmte Zellen aus Dienstprogramm, können Sie Zellen / Zeile / Spalten basierend auf einem oder zwei Kriterien auswählen, dann formatieren sie wie Sie brauchen, wie die Schriftgröße, Hintergrund und so weiter ändern.

doc bestimmte Zellen auswählen
Registerkarte "Office" Aktivieren Sie das Bearbeiten und Durchsuchen von Registerkarten in Office und vereinfachen Sie Ihre Arbeit erheblich ...
Kutools for Excel - Das beste Office-Produktivitäts-Tool löst die meisten Ihrer Excel-Probleme
  • Alles wiederverwenden: Fügen Sie die am häufigsten verwendeten oder komplexesten Formeln, Diagramme und andere Elemente zu Ihren Favoriten hinzu und verwenden Sie sie in Zukunft schnell wieder.
  • Mehr als 20-Textfunktionen: Extrahieren Sie die Nummer aus der Textzeichenfolge. Teile von Texten extrahieren oder entfernen; Zahlen und Währungen in englische Wörter umrechnen ...
  • Tools zusammenführen: Mehrere Arbeitsmappen und Blätter in einer; Mehrere Zellen / Zeilen / Spalten zusammenführen, ohne Daten zu verlieren; Doppelte Zeilen und Summe zusammenführen ...
  • Geteilte Werkzeuge: Aufteilen von Daten in mehrere Blätter basierend auf dem Wert; Eine Arbeitsmappe in mehrere Excel-, PDF- oder CSV-Dateien; Eine Spalte zu mehreren Spalten ...
  • Einfügen überspringen Versteckte / Gefilterte Zeilen; Zählung und Summe nach Hintergrundfarbe; Mailingliste erstellen und Senden Sie E-Mails nach dem Wert von Cell...
  • Super Filter: Erstellen Sie erweiterte Filterschemata und wenden Sie diese auf alle Blätter an. Art nach Woche, Tag, Häufigkeit und mehr; Filtern durch Fettdruck, Formeln, Kommentar ...
  • Mehr als 300 leistungsstarke Funktionen; Funktioniert mit Office 2007-2019 und 365; Unterstützt alle Sprachen; Einfache Bereitstellung im Unternehmen; Kostenlose 60-Testversion für alle Funktionen.

Pfeil blaue rechte Blase Ändern Sie die Schriftgröße basierend auf einem anderen Spaltenwert


Um die Schriftgröße basierend auf einem anderen Spaltenwert zu ändern, kann Ihnen hier ein VBA-Code helfen.

1. Wechseln Sie zu dem Blatt, für das Sie die Schriftgröße basierend auf einer anderen Spalte ändern möchten, und drücken Sie Alt + F11 Taste gleichzeitig zum Öffnen Microsoft Visual Basic für Applikationen Fenster.

2 Klicken Einsatz > Modulund dann unter VBA einfügen Modul. Siehe Screenshot:

VBA: Ändern Sie die Schriftgröße basierend auf einem anderen Spaltenwert

Sub fontchange()
'UpdatebyExtendoffice20160614
    Dim xRg As Range
    Dim xTxt As String
    Dim xCell As Range
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Select cells that you want to change font size:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
        MsgBox "Only can select one column", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    Application.ScreenUpdating = False
    For Each xCell In xRg
        xCell.Font.Size = xCell.Offset(, 1).Value
    Next
    Application.ScreenUpdating = True
End Sub

doc ändert die Schriftgröße basierend auf dem Wert 2

3. Drücken Sie F5 Taste, erscheint ein Dialog und wählen Sie die Zellen aus, deren Schriftgröße Sie ändern möchten. Siehe Screenshot:
doc ändert die Schriftgröße basierend auf dem Wert 3

4 Klicken OKund dann wurden die Zellen in der ausgewählten Spalte basierend auf den Werten in der Spalte neben der Spalte angepasst.
doc ändert die Schriftgröße basierend auf dem Wert 4


Pfeil blaue rechte Blase Ändern Sie die Schriftgröße basierend auf Zellenwert und Zeichenlänge

Kutools for Excel, mit mehr als 120 praktische Excel-Funktionen, verbessern Ihre Arbeitseffizienz und sparen Ihre Arbeitszeit.

Wenn Sie andererseits die Schriftgröße basierend auf dem eigenen Wert oder der Zeichenlänge der Zelle ändern möchten, beispielsweise wenn der Zellenwert größer als 10 ist oder die Zeichenlänge größer als 5 ist, ändert sich die Schriftgröße in 16. und Schriftart ändern zu Arial, andernfalls ist die Schriftgröße 11, und Schriftart ist Calibri wie unten Screenshot gezeigt.
doc ändert die Schriftgröße basierend auf dem Wert 5

1. Drücken Sie Alt + F11 Schlüssel zu aktivieren Microsoft Visual Basic für Applikationen Fenster.

2 Klicken Einsatz > Modul, und fügen Sie unter Code ein Modul Skript. Siehe Screenshot:

VBA: Ändern Sie die Schriftgröße basierend auf dem Zellenwert oder der Zeichenlänge

Private Sub Worksheet_Calculate()
'UpdatebyExtendoffice20160614
    Dim xCell As Range
    For Each xCell In Range("G2:H9")
        With xCell
            If Len(.Text) > 5 Or Val(.Value) > 10 Then
                .Font.Name = "Arial"
                .Font.Size = 16
            Else
                .Font.Name = "Calibri"
                .Font.Size = 11
            End If
        End With
    Next
End Sub

doc ändert die Schriftgröße basierend auf dem Wert 6

3. Drücken Sie F5 Schlüssel, um den Code auszuführen, und die Werte, die größer als 10 oder Zeichenlänge ist mehr als 5 wurden ihre Schriftart in Arial und Schriftgröße zu 16 ändern.

Tip: Im obigen Code können Sie den Bereich G2: B9 beliebig ändern.

doc herunterladen 1


Kutools for Excel - Das beste Office-Produktivitäts-Tool Steigern Sie Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einlegen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (Bearbeiten Sie mühelos mehrere Textzeilen und Formeln); Layout lesen (Leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt der Zellen teilen; Kombinieren Sie doppelte Zeilen / Spalten... Doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie "Duplizieren" oder "Eindeutig" Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufallsauswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen auf mehrere Blätter; Bullets einfügen, Kontrollkästchen und mehr ...
  • Extract Text, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen; Erstellen und Drucken von Paging-Zwischensummen; Zwischen Zelleninhalt und Kommentaren konvertieren...
  • Superfilter (Speichere und wende Filterschemata auf andere Blätter an); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Arbeitsmappen und Arbeitsblätter kombinieren; Zusammenführen von Tabellen basierend auf Schlüsselspalten; Daten in mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Kostenlose 60-Testversion für alle Funktionen.
Registerkarte Tab 201905

Registerkarte "Office" Bringt die Benutzeroberfläche mit Registerkarten in Office und vereinfacht Ihre Arbeit erheblich

  • Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
  • Steigert Ihre Produktivität um 50% und reduziert täglich Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.