Home Excel - Dicas Microsoft Excel VBA Excel VBA - Cores Excel planilha vba cores insere cores selecao

Excel planilha vba cores insere cores selecao

E-mail Imprimir PDF

Saberexcel - o site de quem precisa aprender macros Microsoft Excel VBA

E
sses procedimentos do Aplicativo Microsoft Excel VBA, insere cores na célula ou células selecionadas, primeiramente você dever selecionar uma célula ou um intervalo de células na folha de planilha, em seguida clicar(selecionar) uma das cores do visual basic na coluna(A) que inserirá a cor na célula ou intervalo de células selecionados a medida em que for selecionando cores na coluna(A). Para um melhor entendimento baixe o exemplo de planilha no final da página. Espero que o exemplo possa lhe ser útil. Fique com Deus, Expedito Marcondes.

NO MÓDULO DA FOLHA DE CÓDIGO DA FOLHA DE PLANILHA INSIRA OS PROCEDIMENTOS.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Not Application.Intersect(Target, Range("B:IV")) Is Nothing Then
       vSeleciona = Target.Address
    End If
   
    If Not Application.Intersect(Target, Range("A1:A56")) Is Nothing Then
        With Range(vSeleciona)
            .Interior.ColorIndex = Target.Interior.ColorIndex
        End With
    End If

End Sub

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target.Interior.ColorIndex = Null
Cancel = True
End Sub
'-----------------------------------'


EM UM MÓDULO COMUM NO VBE(VISUAL BASIC EDITOR) insira os macros 

Option Explicit

Public vSeleciona As Variant   ' essa variável declarada como public é para auxiliar no evento do procedimento acima


Sub inserir_cores()
Dim c As Integer
Cells(1, 1).Value = "CORES": Cells(1, 2).Value = "NUM.CORES"
[A1].Select
For c = 1 To 56
    ActiveCell.Offset(1, 0).Interior.ColorIndex = c
    ActiveCell.Offset(1, 1).Value = "Cor vb nº" & c
    ActiveCell.Offset(1, 1).Font.ColorIndex = c
    ActiveCell.Offset(1, 0).Select
Next c

[c1].Select
End Sub

Sub limpar_teste()
[A1:B100].Clear
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 contendo os procedimentos e macros acima
Excel planilha vba cores insere cores selecao (69.02 KB)


Publicidade
Compre com segurança, garantia e ótimos preços
Eletrônicos - Submarino.com.br

Última atualização em Qua, 10 de Agosto de 2011 08:26  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje180
mod_vvisit_counterOntem5059
mod_vvisit_counterEsta Semana19686
mod_vvisit_counterSemana passada36487
mod_vvisit_counterEsse mês33415
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10456244
Aprenda MS Excel VBA

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

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


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA