京寵展信息指南
392
2025-04-01
如何在Excel中為單元格隨機(jī)添加背景/填充顏色？
如何在Excel中為單元格隨機(jī)添加背景/填充顏色？
假設(shè)您需要為指定范圍內(nèi)的單元格隨機(jī)添加背景或填充顏色，如何解決？ 在本文中，提供了兩種方法來(lái)輕松完成它。
使用VBA為單元格隨機(jī)添加背景/填充顏色
隨機(jī)為單元格添加背景/填充顏色 Kutools for Excel
從Excel中的指定列表或列中隨機(jī)插入值（無(wú)重復(fù)）
Kutools for Excels 插入隨機(jī)數(shù)據(jù) 該實(shí)用程序使Excel用戶可以從Excel中的指定列表或列中隨機(jī)插入值。
全功能免費(fèi)試用 30-天！
驚人的！ 在 Excel 中使用高效的選項(xiàng)卡，如 Chrome、Firefox 和 Safari！
每天節(jié)省50％的時(shí)間，并減少數(shù)千次鼠標(biāo)單擊！
以下VBA宏代碼可以幫助您為特定范圍內(nèi)的每個(gè)單元格添加背景顏色或使用隨機(jī)顏色填充顏色。 您可以執(zhí)行以下操作：
步驟1：按 其他 + F11 鍵以打開(kāi)“ Microsoft Visual Basic應(yīng)用程序”窗口。
步驟2：?jiǎn)螕簟安迦搿?gt;“模塊”，然后將以下VBA代碼粘貼到打開(kāi)的“模塊”窗口中。
VBA：為具有隨機(jī)顏色的單元格添加背景或填充顏色
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
Copy
步驟3：按下 F5 鍵或單擊 運(yùn)行 按鈕以運(yùn)行此VBA宏。
步驟4：現(xiàn)在出現(xiàn)一個(gè)對(duì)話框，只需選擇要添加具有隨機(jī)顏色的背景的范圍，然后單擊 OK 按鈕。
現(xiàn)在，您將看到指定范圍內(nèi)的所有單元格隨機(jī)填充不同的顏色。 請(qǐng)參見(jiàn)下面的屏幕截圖：
在某些情況下，您可能需要為指定范圍內(nèi)隨機(jī)選擇的單元格添加背景顏色。 要完成它，您可以嘗試 Kutools for Excel“ 隨機(jī)排序范圍 實(shí)用程序，然后為這些隨機(jī)單元格添加背景色。
第1步：選擇要隨機(jī)查找單元格的范圍并添加背景色。
步驟2：點(diǎn)擊 Kutools > Range > 隨機(jī)排序范圍.
步驟3：在打開(kāi)隨機(jī)排序范圍對(duì)話框中，轉(zhuǎn)到 選擇 標(biāo)簽，在 要選擇的單元數(shù) 盒子，檢查 選擇隨機(jī)單元格 選項(xiàng)，然后單擊 OK 按鈕。 請(qǐng)參見(jiàn)下面的屏幕截圖：
步驟4：現(xiàn)在，在指定范圍內(nèi)隨機(jī)選擇指定數(shù)量的單元格。 然后點(diǎn)擊 箭頭 除了 填充顏??色 上的按鈕 首頁(yè) 標(biāo)簽，然后從下拉列表中選擇背景顏色。
現(xiàn)在，您將看到將背景色添加到隨機(jī)選擇的單元格中，如下圖所示：
Kutools for Excel - 包括 300 多個(gè)方便的 Excel 工具。 全功能免費(fèi)試用 30-天，無(wú)需信用卡！ 立即行動(dòng)吧!
Kutools for Excel 包括適用于Excel的300多種便捷工具，可以在30天之內(nèi)免費(fèi)試用。 立即下載并免費(fèi)試用!
對(duì)列或范圍內(nèi)的單元格進(jìn)行隨機(jī)排序
隨機(jī)選擇細(xì)胞
產(chǎn)生隨機(jī)字串
最佳辦公生產(chǎn)力工具
將小時(shí)轉(zhuǎn)化為分鐘 Kutools for Excel!
準(zhǔn)備好增強(qiáng)您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時(shí)間的工具。 簡(jiǎn)化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗(yàn) Excel！
為什么需要 Kutools for Excel
??? 超過(guò) 300 項(xiàng)強(qiáng)大功能: Kutools 包含 300 多項(xiàng)高級(jí)功能，可簡(jiǎn)化您在 1500 多種場(chǎng)景中的工作。
?? 卓越的數(shù)據(jù)處理能力：合并單元格、刪除重復(fù)項(xiàng)并執(zhí)行高級(jí)數(shù)據(jù)轉(zhuǎn)換 - 所有這些都不費(fèi)吹灰之力！
?? 高效的批量操作：當(dāng)你可以聰明地工作時(shí)，為什么還要付出額外的努力呢？ 輕松批量導(dǎo)入、導(dǎo)出、組合和調(diào)整數(shù)據(jù)。
?? 可定制的圖表和報(bào)告：訪問(wèn)各種附加圖表并生成富有洞察力的報(bào)告。
??? 強(qiáng)大的導(dǎo)航窗格：通過(guò)強(qiáng)大的列管理器、工作表管理器和自定義收藏夾獲得優(yōu)勢(shì)。
?? 七種類型的下拉列表：通過(guò)各種功能和類型的下拉列表使數(shù)據(jù)輸入變得輕而易舉。
?? 用戶友好：對(duì)于初學(xué)者來(lái)說(shuō)輕而易舉，對(duì)于專家來(lái)說(shuō)是一個(gè)強(qiáng)大的工具。
立即下載，與 Excel 一起穿越時(shí)空！
閱讀更多
免費(fèi)下載... 采購(gòu)...
Office Tab 為 Office 帶來(lái)選項(xiàng)卡式界面，讓您的工作更輕松
在Word，Excel，PowerPoint中啟用選項(xiàng)卡式編輯和閱讀，發(fā)布者，Access，Visio和Project。
在同一窗口的新選項(xiàng)卡中而不是在新窗口中打開(kāi)并創(chuàng)建多個(gè)文檔。
每天將您的工作效率提高50％，并減少數(shù)百次鼠標(biāo)單擊！
閱讀更多
免費(fèi)下載... 采購(gòu)...
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容，請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理，核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
版權(quán)聲明：本文內(nèi)容由網(wǎng)絡(luò)用戶投稿，版權(quán)歸原作者所有，本站不擁有其著作權(quán)，亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容，請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理，核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
相關(guān)文章
