Como adicionar aleatoriamente cor de fundo / preenchimento para células no Excel?
Digamos que você precise adicionar aleatoriamente fundo ou cor de preenchimento para células no intervalo especificado. Como resolver isso? Neste artigo, são fornecidos dois métodos para fazer isso facilmente.
Adicione aleatoriamente cor de fundo / preenchimento para células com VBA
Adicione aleatoriamente cor de fundo/preenchimento para células com o Kutools para Excel
Inserir aleatoriamente valores da lista ou coluna especificada (sem repetições) no Excel
Kutools para Excel's Inserir dados aleatórios O utilitário permite que os usuários do Excel insiram aleatoriamente valores da lista ou coluna especificada no Excel.
Adicione aleatoriamente cor de fundo / preenchimento para células com VBA
O seguinte código de macro VBA pode ajudá-lo a adicionar fundo ou cor de preenchimento para cada célula em um intervalo específico com cores aleatórias. Você pode fazer o seguinte:
Passo 1: pressione outro + F11 para abrir a janela Microsoft Visual Basic for Applications.
Etapa 2: clique em Inserir> Módulo e cole o seguinte código VBA na janela de abertura do Módulo.
VBA: adicionar fundo ou cor de preenchimento para células com cor aleatória
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
Etapa 3: pressione o F5 ou clique no Execute botão para executar esta macro VBA.
Etapa 4: Agora uma caixa de diálogo é exibida, basta selecionar o intervalo ao qual deseja adicionar o plano de fundo com cores aleatórias e clicar no botão OK botão.
Agora você verá que todas as células no intervalo especificado são preenchidas com cores diferentes aleatoriamente. Veja a captura de tela abaixo:
Adicione aleatoriamente cor de fundo/preenchimento para células com o Kutools para Excel
Em alguns casos, pode ser necessário adicionar cor de fundo a células selecionadas aleatoriamente em um intervalo especificado. Para fazer isso, você pode experimentar o Kutools para Excel Classificar intervalo aleatoriamente utilitário e, em seguida, adicione a cor de fundo para essas células aleatórias.
Kutools for Excel - Embalado com mais de 300 ferramentas essenciais para Excel. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Baixe Agora!
Etapa 1: selecione o intervalo em que deseja encontrar células aleatoriamente e adicione a cor de fundo.
Etapa 2: clique no botão Kutools > Variação > Classificar intervalo aleatoriamente.
Etapa 3: na caixa de diálogo Classificar intervalo aleatoriamente, vá para Selecionar guia, digite um número no Nº de célula (s) para selecionar caixa, marque Selecione células aleatórias opção, e clique no botão OK botão. Veja a captura de tela abaixo:
Etapa 4: agora o número especificado de células é selecionado aleatoriamente no intervalo especificado. Em seguida, clique no flecha além do Cor de preenchimento botão no Início guia e selecione uma cor de fundo na lista suspensa.
Agora você verá que a cor de fundo é adicionada às células selecionadas aleatoriamente como mostrado abaixo na captura de tela:
Kutools for Excel - Turbine o Excel com mais de 300 ferramentas essenciais. Desfrute de um teste GRATUITO de 30 dias com todos os recursos, sem necessidade de cartão de crédito! Get It Now
Demonstração: adicione aleatoriamente cor de fundo/preenchimento para células com Kutools para Excel
Artigos relacionados:
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!