Não entendi, ta um tanto confuso.

Nem da pra ajustar ja que vc nao disse o que a macro faz mas respondendo a sua duvida Activecell.select Deve fazer o que vc pretende

Embora os meios de desbloqueios estão na web qto menos se divulgar maior a chance de se proteger o trabalho intelectual. Infelizmente a maioria das ...

Ve se isso ajuda VENDEUOUNAOHORA.zip VENDEUOUNAOHORA.zip

Esse codigo em Esta pasta de Trabalho. E uma outra maneira Private Sub Workbook_Open() If Environ(UserName) <> "MARCELO" Then ...

Foi por isso que eu disse que vc deverira disponibilizar a planilha identica a original especialmente na posição das celulas. Troque dados da planilh...

Tente assim Sub gravar() Dim ulinha As Long ulinha = Range("B1048576").End(xlUp).Row Cells(ulinha, 6).Value = Cells...

Com base nas informações que você enviou acho que isso atende. O codigo esta a planilha origem Segue os 2 arquivos Salve a Planilha Resumo em C:

Nao entendi uma coisa vc escreveu na coluna A da planilha Origem por exemplo o campo Maquina N° celula de origem B4 Explica essa coluna??? Faz melho...

No seu exemplo as colunas IJ nao possui nenhuma celula colorida, neste caso nao faz nada?? O codigo abaixo nao esta pronto mas serve como ideia inici...

Essa é uma

Pergunta vc quer excluir o que esta identificado pela cor? Ou o que nao esta? No caso de ser o que esta identificado vai excluir de acordo com o seu ...

Como eu disse se disponibilizar um modelo fica facil

Se disponibilizar uma planilha com dados de exemplo e com o resultado esperado fica facil obter ajuda.