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 | 
 

 Duvida Vba Funçao If

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



Mensagens : 1
Data de inscrição : 13/05/2013

MensagemAssunto: Duvida Vba Funçao If   Seg Maio 13, 2013 12:53 am

Estou tentando achar um valor em uma coluna já preenchida e se a condiçao for verdadeira pintar uma determinada celula na outra aba. O problema é que a fórmula só funciona se eu digitar os valores dpois, e como os valores já estão lá, gostaria de saber como eu faço para a funçao procurar direto sem precisar digitar.

Funcao que eu fiz

For Row = 1 To 1000
For Col = 1 To 10
If ThisWorkbook.Sheets("BHL").Cells(Row, 3).Value = "FL100" Then
Range("B51").Select
Selection.Interior.ColorIndex = 3
End If
Next
Next

Muito Obrigado.
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: Duvida Vba Funçao If   Seg Maio 13, 2013 2:31 am

Boa noite!!

Eu não entendi.

Use uma sub-Rotina
Código:
Sub MaisComo()
For Row = 1 To 1000
For Col = 1 To 10
If ThisWorkbook.Sheets("BHL").Cells(Row, 3).Value = "FL100" Then
Range("B51").Select
Selection.Interior.ColorIndex = 3
End If
Next
Next
End Sub
Voltar ao Topo Ir em baixo
Ver perfil do usuário
 
Duvida Vba Funçao If
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Expressões matemáticas, funções e operadores
» [Resolvido]como usar a função jump to start por codigo?
» [RESOLVIDO]2 funções utilizando a mesma tecla???
» [Vídeo-Aula]Aula 4.1 - Usando funções básicas do draw
» Background - Funções e Variáveis

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 :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: