Notifications
Clear all

SELECIONAR CÉLULA CONFORME RESULTADO

7 Posts
3 Usuários
0 Reactions
1,629 Visualizações
(@nando)
Posts: 53
Trusted Member
Topic starter
 

Galera boa noite,

Estou postando de outra forma um problema, tive ajuda de varios colegas no forum,que tentaram me explicar porém acredito que eu não fiz uma boa explicação.

Postei o arquivo, se o valor da celula for igual a 1 ele selecionará a célula do lado, porém fazer isso com toda tabela, se não quando ele selecionar a segunda a primeira perde a seleção.

 
Postado : 30/08/2014 8:27 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Não é necessário abrir outro tópico para falar do mesmo assunto!!

Sua explicação está confusa!!

Você deseja que se o valor digitado na coluna A caso seja iqual a 1 (na coluna B), andar o cursor uma célula para direita?

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 31/08/2014 7:30 am
(@nando)
Posts: 53
Trusted Member
Topic starter
 

Caro alexandrevba bom dia!!

Abrir um tópico com outra explicação e modelo!! Pois o anterior ficou confuso para os colegas!!

Quando o valor de B for igual a 1 a a célula da coluna A ficará selecionada quando for igual a 0 não será selecionada.
Conforme a imagem anexada.

Agradeço a colaboração de todos!!!

 
Postado : 31/08/2014 7:54 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Mas você pode usar o recurso da tecla F5!!
http://usuariosdoexcel.wordpress.com/20 ... uito-util/

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 31/08/2014 8:09 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Seria algo assim...?

Sub AleVBA_12922()
Dim LR As Long, i As Long
LR = Range("A" & Rows.Count).End(xlUp).Row
For i = 1 To LR
    If IsNumeric(Range("A" & i).Value) And Range("A" & i).Value = 1 Then Range("A" & i & ":B" & i).Interior.ColorIndex = 45
Next i
End Sub

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 31/08/2014 8:26 am
(@edcronos)
Posts: 1006
Noble Member
 

nando
desculpe a ignorância.
mas vc falou que é uma maneira diferente de perguntar, mas a única coisa que mudou foi que antes eram quadros(RANGEs)
agora são células individuais.

vc sequer deu explicação no que a macro que eu fiz não te atendeu apenas ficou se repetindo que queria que selecionasse todas ao mesmo tempo e isso eu fiz,

se vc não soube aplicar a macro, deveria ter falado,
se queria entender o funcionamento, deveria ter perguntado
se pareci rude, é que suas explicações estavam confusas e vc sequer se preocupou em responder as perguntas feitas.
mas se o problema é a pessoa que deu a resposta, então desculpe por tentar ajudar

mas as macros funcionam...
(aplicada na planilha que vc postou no outro post)

Somente é impossíveis até que alguém faça
A logica está presa na irracionalidade humana, e morta nos que se consideram donos da verdade.

"ALGUM MODERADOR ME EXPULSE DO FÓRUM POR FAVOR"

 
Postado : 31/08/2014 8:40 am
(@nando)
Posts: 53
Trusted Member
Topic starter
 

Edcronos boa noite,

Estou muito grato a sua ajuda e dedicação! peço desculpas pela confusão fiquei um pouco perdido, foi PERFEITO sua interpletação!!!

OBRIGADO!!!

 
Postado : 01/09/2014 8:03 pm