Fóruns
Microsoft Excel - 2...
2024 - Fórmulas Ava...
Linkar para uma cél...
 
Notifications
Clear all

Linkar para uma célula especifica

 
2024 - Fórmulas Avançadas - Funções Microsoft Excel
Post Recente por Victorccg 10 anos atrás
5 Posts
2 Usuários
0 Reactions
519 Visualizações
RSS
 Victorccg
(@victorccg)
Posts: 0
New Member
Topic starter
 

Descrição:

Na aba 'A' tem uma tabela com uma lista de produtos e seus respectivos preços de venda.

Na aba 'B' tem uma tabela que calcula automaticamente a Margem de contribuição dos produtos cadastrados na aba 'A'. O produto é selecionado através de uma lista em Dropdown na célula 'C1'

A planilha tem a intenção de auxiliar o usuário a controlar a Margem de Contribuição de seus produtos, e quantidade de produtos é bastante extensa.

Dúvida:
Gostaria de um botão que quando acionado, me direcionasse para célula na tabela da aba 'A' correspondente ao produto selecionado na 'C1'.

Agradeço desde já a atenção.

 
Postado : 03/03/2015 11:47 am
 Issamu
(@issamu)
Posts: 0
New Member
 

Olá Victor!
Para realizar isso será necessário um código VBA. Poste um modelo da sua planilha para elaboração de uma solução assertiva.
Abs!

 
Postado : 03/03/2015 11:53 am
 Victorccg
(@victorccg)
Posts: 0
New Member
Topic starter
 

Issamu,

segue o anexo de um exemplo simplificado que ilustra meu problema.

 
Postado : 03/03/2015 2:21 pm
 Issamu
(@issamu)
Posts: 0
New Member
 

Olá Victor!
Há muitas formas de fazer isto. Seguem dois exemplos macros que você pode aplicar:

Sub Localizar_Produto()
    Sheets("A").Select
    Cells.Find(What:=Sheets("B").Range("D6").Text, After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate
End Sub

Sub Localizar_produto2()
Application.Goto Sheets("A").Range("B7")
Do Until ActiveCell.Value = Sheets("B").Range("D6").Value Or ActiveCell.Value = ""
    ActiveCell.Offset(1, 0).Range("A1").Activate
Loop
End Sub
 
Postado : 04/03/2015 8:25 am
 Victorccg
(@victorccg)
Posts: 0
New Member
Topic starter
 

Rafael,

Sua resposta foi justamente o que eu precisava.
Quase esqueço de agradecer.
Muito obrigado!

 
Postado : 09/03/2015 1:10 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico