從Excel中的指定列表或列中隨機插入值（無重複）

Kutools for Excel的 插入隨機數據 該實用程序使Excel用戶可以從Excel中的指定列表或列中隨機插入值。

以下VBA宏代碼可以幫助您為特定範圍內的每個單元格添加背景顏色或使用隨機顏色填充顏色。 您可以執行以下操作：

步驟1：按 其他 + F11 鍵以打開“ Microsoft Visual Basic應用程序”窗口。

步驟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：現在出現一個對話框，只需選擇要添加具有隨機顏色的背景的範圍，然後單擊 OK 按鈕。

現在，您將看到指定範圍內的所有單元格隨機填充不同的顏色。 請參見下面的屏幕截圖：

在某些情況下，您可能需要將背景色添加到指定範圍內的隨機選擇的單元格中。 要完成它，您可以嘗試Kutools for Excel's 隨機排序範圍 實用程序，然後為這些隨機單元格添加背景色。

第1步：選擇要隨機查找單元格的範圍並添加背景色。

步驟2：點擊 庫工具 > 範圍 > 隨機排序範圍.

步驟3：在打開隨機排序範圍對話框中，轉到 選擇 標籤，在 要選擇的單元數 盒子，檢查 選擇隨機單元格 選項，然後單擊 OK 按鈕。 請參見下面的屏幕截圖：

步驟4：現在，在指定範圍內隨機選擇指定數量的單元格。 然後點擊 箭頭 除了 填充顏色 上的按鈕 首頁 標籤，然後從下拉列表中選擇背景顏色。

現在，您將看到將背景色添加到隨機選擇的單元格中，如下圖所示：

對列或範圍內的單元格進行隨機排序

隨機選擇細胞

產生隨機字串