Code:
Sub Balcaov ()
Range("A65536").End(xlUp).Offset(1, -1).Activate
Selection.NumberFormat = "d/m/yy h:mm"
ActiveCell.FormulaR1C1 = "=+NOW()"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:= _
False, Transpose:=False
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveCell.Offset(0, 1).Range("a1").Select
End Sub
Ai comeca o problema :
Se eu validar a coluna B (codcliente) e coluna C ( codprod) automaticamente pelo painel do
excel tudo funciona bem ja que estah com opcion de mover a direita. As colunas B e C estao vinculadas a outras colunas respectivas da origem da lista de clientes e a de codigos
para validacao.
Na coluna D informo a quantidade, e ai, comeca o problema, o cursor vai para a direita e entra nas outras colunas onde tenho formulas de Vlookups, as quais nao posso alterar ou deletar por descuido. Entao clico HOME a Ctrl b para salvar aquela operacion.
Ja tentei gravar macro de validacao, para incluir na macro acima porem, nao sei como efetuar a macro que apos entrar dado validado na coluna B ativa por offset ou xlRight, a celula na coluna C, e apos validar essa mesma celula efetuar offset ou xlright a direita p fazer o input da quantidade, e apos isso, home and save.
desculpe os erros de gramatica mas eh para evitar erros de interpretacion de sinais
antemao obrigado pela ajuda
Last edited by a moderator: