Notifications
Clear all

Linkar para uma célula especifica

5 Posts
2 Usuários
0 Reactions
534 Visualizações
(@victorccg)
Posts: 3
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: 605
Honorable 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!

Rafael Issamu F. Kamimura
Moderador Oficial Microsoft Community - MCC (Contribuidor do Microsoft Community)
http://zip.net/bjrt0X - http://zip.net/bhrvbR
Foi útil? Clique na mãozinha
Conheça: http://excelmaniacos.com/

 
Postado : 03/03/2015 11:53 am
(@victorccg)
Posts: 3
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: 605
Honorable 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

Rafael Issamu F. Kamimura
Moderador Oficial Microsoft Community - MCC (Contribuidor do Microsoft Community)
http://zip.net/bjrt0X - http://zip.net/bhrvbR
Foi útil? Clique na mãozinha
Conheça: http://excelmaniacos.com/

 
Postado : 04/03/2015 8:25 am
(@victorccg)
Posts: 3
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