Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Or IsEmpty(Target(1, 1)) Then Exit Sub If Intersect(Targe...

Veja se ajuda. Quanto às colunas U, V e W da planilha destino: a U e a W não descobri qual a origem dos dados, e a V se possível trocar com a U para ...

... porém quando ele mexe na última linha a variável se perde e da erro. ... É exatamente aí o erro. O código exclui a linha que aloja a variável dec...

Consegui fazer com outro código Me parece que você desistiu da solução que eu sugeri e decidiu optar por um caminho diferente, aí não consigo mais te...

Você fez o teste que eu sugeri? Qual foi o resultado? ? ? ?

Você fez o teste que eu sugeri? Qual foi o resultado? Você não entendeu o que? Você quer que eu demonstre o que?

Experimentou ? Set WU = ThisWorkbook.Sheets("Usuarios")

Então, amigo, está tudo conforme o previsto na minha mensagem de ontem 22:48. O código "Atualizar" está sendo disparado sim! Faça este te...

Teria como você verificar o arquivo e testar o código? Pois talvez eu tenha feito algo errado e por isso não tenha dado certo. Claro. Disponibilize o...

O que significa "não deu certo" ? Nada foi alterado pelo código? Algo foi alterado e o resultado foi diferente do esperado ? ou o quê? O q...

Na realidade o código deverá ficar na planilha do arquivo painel, Não necessariamente, pois essa é uma outra solução, diferente da que eu sugeri. Vo...

Não deu certo Osvaldo!! Eu estava pesquisando a respeito e esse evento Worksheet _Change, é usado quando se altera a célula manualmente, ou seja, qu...

... para que a macro "Atualizar" funcione. No entanto, quero que ela execute quando alterar a Situação do Lote na 1ª planilha. Veja se ajud...

Minha bola de cristal está queimada... Mauro, em alguns casos só a da Bola de Cristal é insuficiente If Target.Address = ("C12:C" &am...

Instale o código abaixo no módulo do Userform1 'módulo do UserForm1 Private Sub CommandButton1_Click() Dim k As Long, m As Long, c As Long k = Rang...