Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Endereço de uma cél...
 
Notifications
Clear all

Endereço de uma célula

 
2024 - VBA & Macros
Post Recente por gtsalikis 10 anos atrás
3 Posts
3 Usuários
0 Reactions
708 Visualizações
RSS
 Dayvson
(@dayvson)
Posts: 0
New Member
Topic starter
 

Boa tarde, senhores!

Preciso de alguma função ou procedimento que retorne o endereço de uma célula após uma pesquisa. Por exemplo: procuro a palavra "participacao" ( que está na célula A2, vamos supor) e então o programa me retorna dois valores de identificação da célula: linha = 2; coluna =1. Já pesquisei muito e estudei algumas funções no excel, tipo proc, procv, find, endereço... mas não consegui fazer nada com nenhuma delas.

Agradeço antecipadamente,

Dayvson Lourenço.

 
Postado : 12/06/2014 9:11 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Consegue adaptar isso?

Sub AleVBA_12069()
     
    Dim rngX As Range
     
    Set rngX = Worksheets("Plan1").Range("A1:G10000").Find("AleVBA", lookat:=xlPart)
    If Not rngX Is Nothing Then
        MsgBox "Encontrado em " & rngX.Address
    End If
     
End Sub

Att

 
Postado : 12/06/2014 9:25 am
 gtsalikis
(@gtsalikis)
Posts: 2373
Noble Member
 

Mas... vc quer código ou fórmula?

O alexandre postou um código que vc pode adaptar, segue abaixo 2 funções, uma para a coluna, outra para a linha:

=SOMARPRODUTO(($A$1:$G$20="teste")*COLUNA($A$1:$G$20))
=SOMARPRODUTO(($A$1:$G$20="teste")*LIN($A$1:$G$20))

 
Postado : 12/06/2014 10:16 am
Forum Jump:
  Tópico Anterior
Próximo Tópico