Saberexcel - o site de quem precisa aprender Macros microsoft Excle VBA

Observe que esta macro do Aplicativo Microsoft Excel VBA, selecionará todas as células da área, inclusive as células com interior colorido, porem, se voce digitar Algo (Selecionado) e pressionar CTRL+ ENTER, voce observará que vai preencher todas as células, menos as células que estão com fundo Colorido.

Sub Selecionar_celulas_coloridas()
On Error Resume Next
Application.ScreenUpdating = False

Dim sb As Range
Dim r As Long
Dim Minha_Area As Range
Dim vCelulas As Range

Set Minha_Area = ActiveSheet.UsedRange
For Each sb In Minha_Area
If sb.Interior.ColorIndex = ActiveCell.Interior.ColorIndex Then
If r = 0 Then
Set vCelulas = sb
r = 1
Else
Set vCelulas = Union(vCelulas, sb)
End If
End If
Next sb
vCelulas.Select
Application.ScreenUpdating = True
End Sub

Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel

  Baixe o exemplo de planilha da macro acima
Excel planilha vba cores selecionar nao preencher celula interior colorido (17.98 kB)