Como executar F2+En...
 
Notifications
Clear all

Como executar F2+Enter somente na célula ativa


jcgmcs
Posts: 49
Registered
Topic starter
(@jcgmcs)
Eminent Member
Entrou: 5 anos atrás

Olá, bom dia!

Encontrei o codigo abaixo pra executar F2+Enter em toda a coluna...

Minha necessidade é pra que ele execute somente na coluna "L" e na célula em que eu alterar ou somente na celula ativa.

Alguém pode me ajudar nesse código...?

 

'Criando função para automatizar F2+Enter no Excel via VBA

Sub atualizaCelula()

lin = 2
col = 2
Do While Cells(lin, col).Value <> ""
Cells(lin, col).Select
ulinha = Selection.End(xlDown).Row
For lin = 2 To ulinha
Cells(lin, col).Value = Cells(lin, col).Value * 1
Next lin
col = col + 1
lin = 2
Loop

End Sub

 

Responder
3 Respostas
teleguiado
Posts: 137
Registered
(@teleguiado)
Estimable Member
Entrou: 5 anos atrás

Veja se te ajuda esse link.

Responder
1 Responder
jcgmcs
Registered
(@jcgmcs)
Entrou: 5 anos atrás

Eminent Member
Posts: 49

Agradeço amigo.. Mas, executei no módulo e nada foi feito.. Não funcionou.. 🙁

Responder
MPrudencio
Posts: 2746
Registered
(@mprudencio)
Famed Member
Entrou: 6 anos atrás

Se o codigo que vc postou funciona, troque col = 2 por col = 12

Responder