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