Eduardo Wister

Consegui arrumar, fiz um teste logico com um loop que faz o teste pelo código e da a baixa no código

Estou usando um sistema de cadastro para exames de funcionários, o cadastro esta dando certo, a busca também, mas quando preciso inserir a data que o funcionário fez o exame e salvar ele esta salvando em uma célula fixa ("K5"), e preciso que ele faça isso na linha do código que fiz a pesquisa Sub ArquivarExame() Application.ScreenUpdating = False Range("P18").Select Selection.Copy Sheets("Consulta").Select ActiveSheet.ListObjects("Tabela4").Range.AutoFilter Field:=1, Criteria1:=Sheets(1).Range("P18") Sheets("Painel_Cadastro").Select Range("S21").Select Application.CutCopyMode = False Selection.Copy Sheets("Consulta").Select Range("k5").Select 'ERRO ESTA AQUI ********************************************************************************* Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False ActiveSheet.ListObjects("Tabela4").Range.AutoFilter Field:=1 Sheets("Painel_Cadastro").Select Range("S21").Select Application.CutCopyMode = False Selection.ClearContents Range("P18").Select Selection.ClearContents Application.ScreenUpdating = True End Sub VOU ALTERAR O CADASTRO 3 (Linha 7) FAÇO A PESQUISA E COLOCO A DATA, OK MAS ELE DA A BAIXA NA CASA FICA "K5", preciso que ele de a baixa na linha do código que eu informei

Desliguei o TurboBoost, vou testar agora No caso, qual placa-mãe voce recomendaria?

Bom dia, Trabalho em um computador e ele começou a dar tela azul as vezes, quando isso acontece eu perco todo meu trabalho e para ligar de novo demora um tempão, nao apresenta lentidão quando ira dar tela azul, ele trava e aparece a tela azul, já fiz a troca de pasta térmica do processador e limpeza, o erro que esta dando na tela azul é: CRITICAL_PROCESS_DIED Aguardo AJUDA Minhas configurações: Windows: Windows 10 pro 64x Original Processador: AMD FX-8320E placa-mãe: ASUS M5A78L-M PLUS/USB3 Memória Ram: 2x Kingston Hyperx 8gb ddr3 1600mhz Placa de Vídeo: Gigabyte NVIDIA GeForce GT420