Notifications
Clear all

Preenchimento Automático

11 Posts
2 Usuários
0 Reactions
1,824 Visualizações
(@thiagoj)
Posts: 0
New Member
Topic starter
 

Boa tarde Pessoal,

Preciso da ajuda de vocês para o seguinte problema.

Estou montando uma planilha para controlar a separação de pedidos de um estoque, porem não queria escrever o nome dos separadores manualmente e nem trabalhar utilizando o F5 especial para preencher os espaços em branco. Queria verificar se é possível montar uma macro onde eu colocaria o numero do pedido na coluna A e ele entendesse que na coluna B teria que completar com o nome que ja coloque ao lado do pedido anterior que já informei manualmente. e essa macro fizesse isso toda vez que pressionasse o enter para mudar de linha. quando houvesse a necessidade de mudar o nome do separador eu alteraria manualmente do ultimo pedido informado e ele fosse insirindo os proximos nomes conforme fosse informando os proximos pedidos.

Anexei um modelinho bem simples para ficar mais fácil o entendimento.

Valeu Galerinha.

 
Postado : 12/03/2018 1:24 pm
(@xlarruda)
Posts: 0
New Member
 

Veja se é isso:

 
Postado : 12/03/2018 1:45 pm
(@thiagoj)
Posts: 0
New Member
Topic starter
 

Veja se é isso:

Boa tarde Xlarruda, é quase isso, faltou só um detalhe, quando pressiono enter eu pula para a celula debaixo. e na macro ele entende somente quando mudo para alinha de baixo.

 
Postado : 12/03/2018 2:09 pm
(@xlarruda)
Posts: 0
New Member
 

Desculpe, acho que não entendi.

Você que que funcione apenas quando pressione Enter?

 
Postado : 12/03/2018 2:18 pm
(@thiagoj)
Posts: 0
New Member
Topic starter
 

Desculpe, acho que não entendi.

Você que que funcione apenas quando pressione Enter?

isso mesmo :)

 
Postado : 12/03/2018 2:18 pm
(@thiagoj)
Posts: 0
New Member
Topic starter
 

É que vou apenas colocando o numero dos pedidos e pressionando enter, então queria que ele entendesse que o ultimo nome inserido fosse aparecendo sozinho.

 
Postado : 12/03/2018 2:32 pm
(@xlarruda)
Posts: 0
New Member
 

Bem, acredito que seja isso então...

 
Postado : 12/03/2018 3:15 pm
(@thiagoj)
Posts: 0
New Member
Topic starter
 

Bom dia xlarruda,

É exatamente isso,muito obrigado. não tem noção do quanto vai facilitar meu trabalho aqui.

Mais uma vez muito obrigado.

 
Postado : 13/03/2018 5:35 am
(@thiagoj)
Posts: 0
New Member
Topic starter
 

Boa tarde Xlarruda,

testei e funcionou perfeitamente, mais hoje quando tentei inserir em meu indicador o mesmo não funcionou, sabe o que pode ter ocorrido?

Usei dessa forma.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then
Exit Sub
End If
If Target.Column = 2 Then
If Target.Value <> "" Then
Target.Offset(0, 1).Value = Target.Offset(-1, 1).Value
Target.Offset(0, -1).Value = Target.Offset(-1, -1).Value

End If
End If
End Sub

Quando informo o numero do pedido ela não esta preenchendo a coluna A e nem a coluna C automaticamente com a data e o separador.

 
Postado : 13/03/2018 12:33 pm
(@xlarruda)
Posts: 0
New Member
 

Desculpe, o arquivo parece estar corrompido... Poderia postar novamente?

 
Postado : 13/03/2018 12:59 pm
(@thiagoj)
Posts: 0
New Member
Topic starter
 

Desculpe, o arquivo parece estar corrompido... Poderia postar novamente?

tem algum e-mail que possa enviar, pois o tamanho esta dando 148 k

 
Postado : 13/03/2018 1:22 pm