如何在 Excel 中隨機為儲存格添加背景/填充顏色？

以下 VBA 宏代碼可以幫助您以隨機顏色為特定範圍內的每個儲存格添加背景或填充顏色。您可以按照以下步驟進行操作：

步驟 1：按下 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 視窗。

步驟 2：點擊 插入 > 模組，然後將以下 VBA 程式碼粘貼到打開的模組視窗中。

VBA：使用隨機顏色為儲存格添加背景或填充顏色

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

步驟 3：按下 F5 鍵或點擊 執行 按鈕來運行此 VBA 宏。

步驟 4：此時會彈出一個對話框，只需選擇您想隨機添加背景顏色的範圍，然後點擊 確定 按鈕即可。

現在您會看到指定範圍內的所有儲存格都已隨機填充了不同的顏色。請參見以下截圖：

在某些情況下，您可能需要在指定範圍內隨機選取的儲存格中添加背景顏色。要實現這一點，您可以嘗試使用 Kutools for Excel 的 隨機排序 功能，然後為這些隨機選取的儲存格添加背景顏色。

步驟 1：選擇您想要隨機查找並添加背景顏色的範圍。

步驟 2：點擊 Kutools > 區域 > 隨機排序。

步驟 3：在打開的 隨機排序 對話框中，轉到 選取 標籤，在 「要選取的單元格數量」 框中輸入一個數字，勾選 「選取隨機儲存格」 選項，然後點擊 確定 按鈕。請參見以下截圖：

步驟 4：現在指定範圍內已經隨機選取了指定數量的儲存格。然後點擊 主頁 標籤上的 填充顏色 按鈕旁邊的箭頭，並從下拉列表中選擇一種背景顏色。

現在您會看到背景顏色已經被添加到隨機選取的儲存格中，如下方截圖所示：

隨機排序列或範圍中的儲存格

隨機選取儲存格

生成隨機字串