Boa noite gente, eu criei uma pasta com macro onde eu tenho duas planilhas, Consulta e jogos. Na planilha jogos eu coloquei nome de jogos e os seus respectivos valores em reais, já na consulta eu criei uma lista para fazer o autocomplete com caixa de combinação usando o PROCV.
Então, o que eu estou tentando fazer, obter o valor de uma célula que, obtém o seu valor da caixa de combinação e copia-la para uma outra célula que ao fazer isso, a seleção da célula vai para baixo, para assim que eu for selecionar outro jogo, ele irá copiar novamente o valor daquela célula para a nova.
Já consegui obter o valor e joga-la na outra célula, mas não sei como fazer para a seleção ir para a célula de baixo, já pesquisei e tentei usar o Application.SendKeys "{ENTER}" mas não funcionou, eu pensei em usar For each e consegui fazer pular a linha, mas depois disso não consegui fazer um jeito de obter o valor novamente.
Segue o código abaixo.
Sub teste()
Dim exame As String
Dim valor As Double
Dim limite, celula As Range
Set limite = Range("F2:F50")
For Each celula In limite.Offset(0, 5)
If Range("E4").Value <> "" Then
exame = Range("E4").Value
valor = Range("D5").Value
Range("F2").Value = exame
Range("G2").Value = valor
End If
Next
End Sub