Boa noite, prezados.
Sou novo no Fórum e mais novo ainda em programaçao em VBA.
Fiz a gravaçao de um macro para atualizaçao de um cadastro de clientes, porém ela funciona 1x e na segunda ela começa a apresentar erro. Abaixo segue Macro:
Sheets("CLIENTE").Select
Range("B3").Select
Range(Selection, Selection.End(xlToRight)).Select
Selection.Copy
Range("B4").Select
Selection.Insert Shift:=xlDown (Linha onde o erro é apresentado)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("CADASTRO_CLIENTE").Select
Range("J4,G4:G7,D10:D12,D12,D13,D7,D6,D5,D4").Select
Range("D4").Activate
Application.CutCopyMode = False
Selection.ClearContents
Range("D4").Select
End Sub
> Erro apresentado:
Erro em tempo de execuçao
Erro de automaçao
O objeto chamado foi desconectados dos seus clientes.
Gostaria de ajuda para correçao do erro e entendimento do mesmo.