Wie füge ich zufällig Hintergrund- / Füllfarben für Zellen in Excel hinzu?
Angenommen, Sie müssen zufällig Hintergrund- oder Füllfarben für Zellen im angegebenen Bereich hinzufügen. Wie kann dies behoben werden? In diesem Artikel werden zwei Methoden bereitgestellt, um dies einfach zu erledigen.
Fügen Sie zufällig Hintergrund- / Füllfarbe für Zellen mit VBA hinzu
Fügen Sie mit Kutools for Excel zufällig Hintergrund- / Füllfarben für Zellen hinzu
Fügen Sie zufällig Werte aus der angegebenen Liste oder Spalte (ohne Wiederholungen) in Excel ein
Kutools für Excel Zufällige Daten einfügen Mit diesem Dienstprogramm können Excel-Benutzer zufällig Werte aus der angegebenen Liste oder Spalte in Excel einfügen.
Fügen Sie zufällig Hintergrund- / Füllfarbe für Zellen mit VBA hinzu
Der folgende VBA-Makrocode kann Ihnen helfen, Hintergrund- oder Füllfarben für jede Zelle in einem bestimmten Bereich mit zufälligen Farben hinzuzufügen. Sie können wie folgt vorgehen:
Schritt 1: Drücken Sie Andere + F11 Tasten zum Öffnen des Fensters Microsoft Visual Basic für Applikationen.
Schritt 2: Klicken Sie auf Einfügen> Modul und fügen Sie den folgenden VBA-Code in das sich öffnende Modulfenster ein.
VBA: Fügen Sie Hintergrund- oder Füllfarben für Zellen mit zufälliger Farbe hinzu
Sub TrimExcessSpaces()
Dim rng As Range
Dim WorkRng As Range
Dim xRed As Byte
Dim xGreen As Byte
Dim xBule As Byte
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
xRed = Application.WorksheetFunction.RandBetween(0, 255)
xGreen = Application.WorksheetFunction.RandBetween(0, 255)
xBule = Application.WorksheetFunction.RandBetween(0, 255)
rng.Pattern = xlSolid
rng.PatternColorIndex = xlAutomatic
rng.Interior.Color = VBA.RGB(xRed, xGreen, xBule)
Next
End Sub
Schritt 3: Drücken Sie die Taste F5 Taste oder klicken Sie auf Führen Sie Schaltfläche zum Ausführen dieses VBA-Makros.
Schritt 4: Nun erscheint ein Dialogfeld. Wählen Sie einfach den Bereich aus, in dem Sie Hintergrund mit zufälligen Farben hinzufügen möchten, und klicken Sie dann auf OK .
Jetzt sehen Sie, dass alle Zellen im angegebenen Bereich zufällig mit verschiedenen Farben gefüllt werden. Siehe folgenden Screenshot:
Fügen Sie mit Kutools for Excel zufällig Hintergrund- / Füllfarben für Zellen hinzu
In einigen Fällen müssen Sie möglicherweise zufällig ausgewählten Zellen in einem bestimmten Bereich Hintergrundfarbe hinzufügen. Um dies zu erreichen, können Sie Kutools für Excel ausprobieren Sortierbereich zufällig Dienstprogramm, und fügen Sie dann Hintergrundfarbe für diese zufälligen Zellen hinzu.
Kutools for Excel - Vollgepackt mit über 300 wichtigen Tools für Excel. Genießen Sie eine 30-tägige KOSTENLOSE Testversion mit vollem Funktionsumfang, ohne dass eine Kreditkarte erforderlich ist! Jetzt herunterladen!
Schritt 1: Wählen Sie den Bereich aus, in dem Sie Zellen zufällig finden möchten, und fügen Sie Hintergrundfarbe hinzu.
Schritt 2: Klicken Sie auf Kutoolen > Abdeckung > Sortierbereich zufällig.
Schritt 3: Gehen Sie im sich öffnenden Dialogfeld Sortierbereich zufällig sortieren zu Auswählen Geben Sie auf der Registerkarte eine Zahl in das Feld ein Anzahl der zu wählenden Zelle (n) Kästchen ankreuzen Wähle zufällige Zellen aus Option und klicken Sie auf OK Taste. Siehe folgenden Screenshot:
Schritt 4: Jetzt wird die angegebene Anzahl von Zellen im angegebenen Bereich zufällig ausgewählt. Klicken Sie dann auf Pfeil Neben dem Füllfarbe Taste auf der Home Klicken Sie auf die Registerkarte und wählen Sie eine Hintergrundfarbe aus der Dropdown-Liste aus.
Jetzt sehen Sie, wie die Hintergrundfarbe zu den zufällig ausgewählten Zellen hinzugefügt wird (siehe Abbildung unten):
Kutools for Excel - Laden Sie Excel mit über 300 wichtigen Tools auf. Genießen Sie eine 30-tägige KOSTENLOSE Testversion mit vollem Funktionsumfang, ohne dass eine Kreditkarte erforderlich ist! Hol es dir jetzt
Demo: Fügen Sie mit Kutools for Excel zufällig Hintergrund- / Füllfarben für Zellen hinzu
In Verbindung stehende Artikel:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die 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 jeden Tag Hunderte von Mausklicks für Sie!