Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 Formatação para conteúdo da célula

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
duzaca



Mensagens : 1
Data de inscrição : 23/07/2012

MensagemAssunto: Formatação para conteúdo da célula   Seg Jul 23, 2012 5:58 pm

Bom dia,
Para liberação de alguns equipamentos nós cadastramos uma senha, formado com números e letras, essa senha é lançada numa planilha para controle.
A necessidade é que letras fiquem em azul e números em vermelho, é possível formatar o conteúdo da célula?

Exemplo de senha: B 6 F M Y 8 9 0

Att.
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: Formatação para conteúdo da célula   Dom Ago 05, 2012 3:02 pm

Bom dia!!

Coloque esse código dentro de um módulo.

Código:
Sub SpecialFormat()


Dim i As Integer


For i = 1 To Len(ActiveCell)
    With ActiveCell.Characters(i, 1)
        If IsNumeric(.Text) Then
            .Font.ColorIndex = 3
        Else
            .Font.ColorIndex = 5
        End If
    End With
Next i


End Sub
Voltar ao Topo Ir em baixo
Ver perfil do usuário
 
Formatação para conteúdo da célula
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Script para conteúdo de outro site
» Centralizar/alinhar o texto dentro das células da tabela.
» Código jquery para ocultar conteúdo de acordo com a página.
» [PROBLEMA]Formatação de sprites
» Qual formato ideial de vídeo para o wave 553

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Intermediário :: Excel Intermediário-
Ir para: