Notifications
Clear all

Interromper contagem regressiva

14 Posts
3 Usuários
0 Reactions
1,532 Visualizações
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

Boa tarde pessoal, estou com uma dificuldade e gostaria da ajuda de vocês

Estou fazendo uma planilha para controlar a produção da minha empresa e estou com o seguinte problema:
Na coluna "Prazo"(F11) eu digito a quantidade de dias que terei para produzir o item, então, a coluna "Progresso"(G11) calcula quantos dias restantes (ou quantos dias de atraso) eu tenho para produzir com base no "Prazo"(F11) e no "Início"(J11) da produção através da fórmula : =SE([@Início]<>0;-($K$4-[@Conclusão]);""), a coluna início serve para dar o start na contagem porque eu preciso contar a partir da data de início.
Sabendo dessas informações, eis que surge o problema, as colunas "% P"(L11) e "% M"(N11) serão preenchidas com valores de 0% a 100% para acompanhar a produção e montagem respectivamente, quando o valor chegar a 100% em "% P"(L11) eu gostaria que a contagem feita na célula "Progresso"(G11) fosse interrompida e o valor do resultado ficasse congelado até que eu inicie a Montagem e preencha os valores em "% M"(N11), quando esse chegasse a 100% congelaria o valor da célula "Progresso"(G11) novamente, tudo automaticamente sem que seja preciso eu iniciar uma macro manualmente ou algo do tipo. Basicamente a coluna "Início" seria o Start e as colunas "% P" Stop 1 e "% M" o Stop 2.

Desculpa estar incomodando com isso mas é que não tenho a quem recorrer, eu estou aprendendo a usar o Excel na força bruta aqui e sobre essa questão não consegui achar nada na net, até achei um tópico antigo aqui no fórum mas não consegui visualizar as planilhas e ficou difícil entender.

Atenciosamente,

Henrique Costa

 
Postado : 12/02/2016 12:12 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Não ha nenhum incomodo em perguntar afinal o forum é para isso mesmo.

Agora qto a sua necessidade seria interessante vc diponibilizar o arquivo.

Importante postar exemplos de como a planilha é preenchida.

Assim fica mais simples ajudar.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 12/02/2016 1:43 pm
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

Valeu MPrudencio,

Bom, eu disponibilizei a planilha preenchida, não sei se fiz certo ou está aparecendo só pra mim mas consegui baixar aqui, da uma olhada aí por favor.

 
Postado : 12/02/2016 1:55 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Nenhum arquivo

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 12/02/2016 2:06 pm
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

Nenhum arquivo

 
Postado : 12/02/2016 2:22 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Relendo sua duvida se fixar o valor da coluna G qdo chegar a 100% a celula G11 vai perder a formula. neste caso qdo iniciar a montagem vc vai precisar lançar novamente a informação da montagem em outra linha isso atende sua necessidade.

Pq "desligar a contagem" e ligar novamente so com vba e isso vc vai precisar ativar a macro para registrar, o que da pra fazer é qdo a celula for preenchida com 100 vc receber uma confirmação para interromper a formula e transformar o valor atual em texto e remover a formula.

Isso atende ??

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 12/02/2016 2:34 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

rickkostah

Com você é novo no fórum, e pulou a etapa de apresentação no fórum, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo:
Leia sem falta, pois você já infringiu um regra do fórum ao anexar um arquivo sem compactar.

viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

[]s

Patropi - Moderador

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 12/02/2016 2:38 pm
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

Relendo sua duvida se fixar o valor da coluna G qdo chegar a 100% a celula G11 vai perder a formula. neste caso qdo iniciar a montagem vc vai precisar lançar novamente a informação da montagem em outra linha isso atende sua necessidade.

Pq "desligar a contagem" e ligar novamente so com vba e isso vc vai precisar ativar a macro para registrar, o que da pra fazer é qdo a celula for preenchida com 100 vc receber uma confirmação para interromper a formula e transformar o valor atual em texto e remover a formula.

Isso atende ??

Cara, pelo que eu entendi atende sim, eu só não sei como fazer. Como fixar o valor da Coluna G?

 
Postado : 12/02/2016 3:04 pm
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

rickkostah

Com você é novo no fórum, e pulou a etapa de apresentação no fórum, para facilitar a tua participação, sugiro tomar conhecimento do conteúdo dos links abaixo:
Leia sem falta, pois você já infringiu um regra do fórum ao anexar um arquivo sem compactar.

viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

[]s

Patropi - Moderador

Boa tarde Patropi,

Me desculpe por isso, eu estava afobado e passei batido.

 
Postado : 12/02/2016 3:05 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

rick

Tudo bem.
Já editei tua mensagem e compactei o arquivo anexado.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/02/2016 8:45 am
(@mprudencio)
Posts: 2749
Famed Member
 

Ve se isso atende

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 14/02/2016 1:39 pm
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

Ve se isso atende

Marcelo, desse jeito dá certo mas eu preciso que isso seja feito em todas as linhas da tabela, eu escrevi essa condição abaixo mas está dando o erro: "Run-time error '13'type mismatch", quando eu clico em depurar ele seleciona a primeira linha.

Sub Auto_Open()


If ("Tabela1[[#Headers],[% P]]") = 100 Then
    Range("Tabela1[[#Headers],[Progresso]").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
Else
    Range("Tabela1[[#Headers],[Progresso]").Select
    ActiveCell.FormulaR1C1 = "=IF([@Início]<>0,-(R4C11-[@Conclusão]),"""")"
End If

If ("Tabela1[[#Headers],[% M]") = 100 Then
    Range("Tabela1[[#Headers],[Progresso]").Select
    Selection.Copy
    Selection.PasteSpecial Paste:=xlPasteValues
    Application.CutCopyMode = False
    Else
    Range("Tabela1[[#Headers],[Progresso]").Select
    ActiveCell.FormulaR1C1 = "=IF([@Início]<>0,-(R4C11-[@Conclusão]),"""")"
End If

End Sub

Tem como dar uma olhada pra saber se esse código tem futuro?
KKKKKKK

Desde já muito obrigado pela disposição em ajudar, valeu Marcelo

 
Postado : 14/02/2016 9:26 pm
(@mprudencio)
Posts: 2749
Famed Member
 

Do jeito que esta la funciona em todas as linhas da tabela é so colocar 100 na coluna M que vai parar a contagem ou seja vai transformar a formula em valor fixo.

Pelo menos aqui funcionou

Pq vc colocou seu codigo no evento auto open???

Se o codigo tem que rodar a cada alteração e nao qdo a planilha e aberta.

E nao entendi pq vc colocou um monte de formula no seu codigo.

Testa o codigo que postei na tabela toda, todas as linhas que vc escrever 100 na coluna M vai apagar a formula.

PS nao devia ter marcado resolvido se o resultado ainda nao atendeu.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 17/02/2016 4:57 pm
(@rickkostah)
Posts: 7
Active Member
Topic starter
 

Depois eu tentei aqui com sua fórmula e resolveu, já consegui.
Obrigado Marcelo, valeu mesmo

 
Postado : 17/02/2016 5:11 pm