Página 1 de 1

Data automática

Enviado: 30 Mai 2018 às 07:16
por Caspirro
Tenho uma planilha de gerenciamento de uso de brocas na minha oficina, porém não está completa. Bom, toda vez que altero alguma célula do "STATUS PEDIDO" (O3:O30) para "FINALIZADO" ele me gera um histórico a partir da linha "32" em diante conforme está preenchido na linha do mesmo alterado, e como todo histórico, preciso identificar a data desse histórico, necessito que assim que eu mudar para finalizado alguma dessas linhas (O3:O30) ele me gere o histórico normalmente igual esta gerando, porém com a data inserida ao lado do histórico, ou seja, somente inserir a data quando for alterado o status para finalizado (pode ser uma coluna depois do "STATUS PEDIDO", na mesma coluna do "Restart"). Se possível que seja em VBA.
Segue em anexo a Planilha.

Obrigado desde já a quem se propuser a ajudar.

Re: Data automática

Enviado: 30 Mai 2018 às 10:30
por osvaldomp
Experimente:
Código: Selecionar todos
Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Count > 1 Then Exit Sub
 If Application.Intersect(Range("O3:O30"), Target) Is Nothing Or Target.Value <> "FINALIZADO" Then Exit Sub
  Cells(Rows.Count, 1).End(3)(2).Resize(, 15).Value = Cells(Target.Row, 1).Resize(, 15).Value
  Cells(Rows.Count, 1).End(3)(1, 16) = Date
End Sub
obs. antes de testar preencha o intervalo A3:A30.

Data automática

Enviado: 30 Mai 2018 às 10:44
por Caspirro
Não esta adicionando data nenhuma na minha planilha :/. Toda vez que eu colocar o status pedido como "FINALIZADO" ele gera automaticamente um histórico pra mim, só preciso que ele adicione a data conforme o dia que eu mudar o status para "FINALIZADO"

Re: Data automática

Enviado: 30 Mai 2018 às 10:51
por osvaldomp
Caspirro escreveu: Toda vez que eu colocar o status pedido como "FINALIZADO" ele gera automaticamente um histórico pra mim, só preciso que ele adicione a data conforme o dia que eu mudar o status para "FINALIZADO"
É exatamente isso que o código faz.
Disponibilize o seu arquivo com o código instalado.

Re: Data automática

Enviado: 30 Mai 2018 às 11:15
por Caspirro
osvaldomp escreveu:
Caspirro escreveu: Toda vez que eu colocar o status pedido como "FINALIZADO" ele gera automaticamente um histórico pra mim, só preciso que ele adicione a data conforme o dia que eu mudar o status para "FINALIZADO"
É exatamente isso que o código faz.
Disponibilize o seu arquivo com o código instalado.
Segue o link da planilha no excel
https://drive.google.com/file/d/1FB7zO3 ... sp=sharing

Data automática

Enviado: 30 Mai 2018 às 11:23
por osvaldomp
Anexe o arquivo diretamente aqui no fórum, como você fez no primeiro post.

Re: Data automática

Enviado: 30 Mai 2018 às 11:30
por Caspirro
osvaldomp escreveu:Anexe o arquivo diretamente aqui no fórum, como você fez no primeiro post.

Re: Data automática

Enviado: 30 Mai 2018 às 11:38
por osvaldomp
Você alterou o nome do código que passei ... :o

O código que passei é para substituir o existente... ;)
Veja que o nome é igual ao existente.

Re: Data automática

Enviado: 30 Mai 2018 às 11:44
por Caspirro
osvaldomp escreveu:Você alterou o nome do código que passei ... :o

O código que passei é para substituir o existente... ;)
Veja que o nome é igual ao existente.
Mas não pretendo substituir nada, a planilha ja esta como eu quero, só quero que acrescente, eu troquei pra ver se funcionava, mas não funcionou do mesmo jeito, só quero que acrescente a data do lado da coluna do histórico assim que gerar um histórico quando eu alterar alguma célula do status do pedido (O3:O30) para "FINALIZADO", somente isso, compreende?

Re: Data automática

Enviado: 30 Mai 2018 às 12:55
por osvaldomp
Veja se atende.

Re: Data automática

Enviado: 30 Mai 2018 às 13:11
por Caspirro
osvaldomp escreveu:Veja se atende.
Aeeeee meu bom, ficou exatamente do jeito que eu queria, muito obrigado, vai me ajudar muito com a minha organização dentro da empresa, agradeçido.

Att.