Atingir Meta Dinami...
 
Notifications
Clear all

Atingir Meta Dinamico


Cleto
Posts: 2
Registered
Topic starter
(@cleto)
New Member
Entrou: 2 meses atrás

Pessoal, boa noite! Tenho o seguinte cód de atingir meta:

Sub Simula_IncENV()
Range("N101").GoalSeek Goal:=Range("Y9").Value, ChangingCell:=Range("Y5")
End Sub

Gostaria agora de substituir o "N101" do código, pelo endereço que contem numa determinada célula. Por ex: o conteúdo da A1 ( que é estou deixando o endereço dinamico ), poderia ter esse "N101" mesmo ou P101, Q101,Z101 etc...

Alguém poderia me ajudar como consigo fazer essa adequação?

Obrigado desde já!

Cleto

Responder
2 Respostas
EdsonBR
Posts: 896
Moderator
(@edsonbr)
Prominent Member
Entrou: 6 anos atrás
Sub Simula_IncENV()
  Range([A1].Value).GoalSeek Goal:=Range("Y9").Value, ChangingCell:=Range("Y5")
End Sub
Responder
1 Responder
Cleto
Registered
(@cleto)
Entrou: 2 meses atrás

New Member
Posts: 2

@edsonbr Muito Obrigado, Edson!!

Responder