Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
OnChange Event
 
Notifications
Clear all

OnChange Event

 
2024 - VBA & Macros
Post Recente por Takahashi 9 anos atrás
7 Posts
2 Usuários
0 Reactions
1,013 Visualizações
RSS
 Takahashi
(@takahashi)
Posts: 0
New Member
Topic starter
 

Bom dia.

Antes de começar, procurei aqui, no google, e não consegui estruturar o código.

Tenho algumas células para preenchimento (conforme abaixo), sendo que uma delas é a Termo (DC).
Nesta célula inputo quantos dias corridos a partir de hoje a operação deverá iniciar.
No caso abaixo, para 2 dias corridos o correto é 3 dias corridos, pois 21 não é útil.

(Para o próximo dia útil, utilizo a função WORKDAY(range - 1; 1; feriados)

Termo (DC): 2
Termo (real): 3
Início: 21/04/2016 (dia não útil)
Início real: 22/04/2016 (dia útil)

O que gostaria de fazer é: Quando inputo um valor em Termo (DC) que seja menor que o Termo (real), o Termo (DC) muda para o Termo (real).

Há esta possibilidade ?

Att.,

 
Postado : 19/04/2016 9:22 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não sei se entendi, mas depois da definição dos termos, inclua um Se..
Se Termo(DC)<Termo(real) then Termo(Dc)=Termo(real)

 
Postado : 19/04/2016 10:06 am
 Takahashi
(@takahashi)
Posts: 0
New Member
Topic starter
 

Reinaldo,
Boa tarde.

Tentei esta maneira, mas não consegui.

Estruturei dentro do Onchange (If Not Intersect(Target, Range("TermoDC")) Is Nothing then (...) e a macro a seguir:
If Range("TermoDC") < Range("Termoreal") then
Range("Termo DC") = Range("Termoreal")
Else
Exit sub
End If

 
Postado : 19/04/2016 10:17 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Poste pelo menos o codigo completo. O ideal e posta uma planilha modelo/exemplo

 
Postado : 19/04/2016 3:57 pm
 Takahashi
(@takahashi)
Posts: 0
New Member
Topic starter
 

Reinaldo,

Segue anexo arquivo.

Att.,

Prazo.xlsm
 
Postado : 20/04/2016 6:45 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Ainda não sei se entendi corretamente, mas veja se e isso.

 
Postado : 20/04/2016 7:46 am
 Takahashi
(@takahashi)
Posts: 0
New Member
Topic starter
 

Muito obrigado.
Consigo estruturar todo resto a partir dai...

Abs

 
Postado : 20/04/2016 8:13 am
Forum Jump:
  Tópico Anterior
Próximo Tópico