Este fórum está sendo desativado

[Adrian]

Pessoal bom dia!

Rotina - Sempre após digitar qualquer valor na mesma célula H13, após isso sempre clico no botão que criei para pular para para outra planilha. Haveria algum argumento para inserir em minha macro, tipo assim: após digitar e pressionar o botão ENTER para plan 1.

Grato

Adriano

[Startec]

Não tem um evento proprio na planilha, para isso. O que pode fazer é habilitar a tecla [enter], executar sua macro:
O incoveniente é que qq momento que teclar o enter a macro sera executada:
ex.;
Em EstaPasta_de_Trabalho:

Código: Selecionar todos

Private Sub Workbook_Open()
   Application.OnKey "{ENTER}", "MinhaMacro"
End Sub 

E em um modulo:

Código: Selecionar todos

Sub MinhaMacro()
MsgBox "Minha macro"
End Sub

[Henrique]

Tem sim Startec.

No caso o Adrian pode usar:

Código: Selecionar todos

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Address = "$H$13" Then Sheets("Plan1").Select
End Sub

[Startec]

Acho que eu nao entendi direito o que ele está querendo...

Tem sim Startec.
No caso o Adrian pode usar:
CÓDIGO: SELECIONAR TODOS
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$H$13" Then Sheets("Plan1").Select
End Sub

Mas pela sua rotina, mesmo que ele nao tecle [enter], a plan1 será selecionada.

[Henrique]

Startec,

Pelo que eu entendi, o Adrian não quer ficar clicando no botão que ele criou toda vez que termina de alterar a célula H13 da planilha. Ele quer que ao mudar o valor da célula H13, vá automaticamente para planilha Plan1.

[alexandrevba]

Boa tarde!!

Como dito pelo Herique, os efeitos de alteração nas células devem se usar o evento

Código: Selecionar todos

Private Sub Worksheet_Change(ByVal Target As Range)

Obs: Cuidado ao usar formulas

Att

[Adrian]

É isso mesmo Henrique, deu certo.

Obrigado