Lägg slumpmässigt in värden från den angivna listan eller kolumnen (utan upprepningar) i Excel

Kutools för Excel Infoga slumpmässiga data verktyget gör det möjligt för Excel-användare att slumpmässigt infoga värden från den angivna listan eller kolumnen i Excel.

Följande VBA-makrokod kan hjälpa dig att lägga till bakgrunds- eller fyllningsfärg för varje cell i ett specifikt intervall med slumpmässiga färger. Du kan göra på följande sätt:

Steg 1: Tryck andra + F11 för att öppna Microsoft Visual Basic for Applications-fönstret.

Steg 2: Klicka på Infoga> Modul och klistra sedan in följande VBA-kod i öppningsmodulfönstret.

VBA: Lägg till bakgrund eller fyllfärg för celler med slumpmässig färg

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

Steg 3: Tryck på F5 eller klicka på run för att köra detta VBA-makro.

Steg 4: Nu kommer en dialogruta ut, välj bara det område du vill lägga till bakgrund med slumpmässiga färger och klicka sedan på OK knapp.

Nu ser du att alla celler i det angivna intervallet är fyllda med olika färger slumpmässigt. Se nedan skärmdump:

I vissa fall kan du behöva lägga till bakgrundsfärg till slumpmässigt valda celler inom ett angivet intervall. För att få det gjort kan du prova Kutools för Excel Sortera intervall slumpmässigt och lägg sedan till bakgrundsfärg för dessa slumpmässiga celler.

Steg 1: Välj det område där du vill hitta celler slumpmässigt och lägg till bakgrundsfärg.

Steg 2: Klicka på Kutools > Mätområde > Sortera intervall slumpmässigt.

Steg 3: Gå till öppningsdialogrutan Sortera slumpmässigt Välja fliken, skriv ett nummer i Antal celler som ska väljas kryssrutan Välj slumpmässiga celler alternativet och klicka på OK knapp. Se nedan skärmdump:

Steg 4: Nu specificeras antalet celler slumpmässigt inom det angivna intervallet. Klicka sedan på pil förutom Fyllningsfärg knappen på Start och välj en bakgrundsfärg i listrutan.

Nu ser du bakgrundsfärgen läggs till de slumpmässigt valda cellerna som visas nedan:

Sortera slumpmässigt celler i en kolumn eller ett intervall

Markera celler slumpmässigt

Skapa slumpmässiga strängar