Fortd2

https://drive.google.com/file/d/1Npi4EgpM6eWf3ZPhI8c1WuRU99qBEZh3/view?usp=sharing

https://drive.google.com/file/d/1i4R0X12uwljoG_hdKwrYEqamfZ3kKr7F/view?usp=sharing

Comprei duas memorias ram no mercado livre, pelo mesmo link, o modelo delas é o KVR24s17S8/8, uma delas tem chip da marca micron e outra  Skhynix.

E quando uso o software Thaiphoon para ver as informações da memoria não aparece nenhuma informação sobre ela.

edit: fiz o teste novamente e apareceu algumas informações.

Tenho essa placa-mãe e o computador está com o mesmo problema de travamento,  e só volta quando é reiniciado. uso o computador para abrir programas no escritório de contabilidade, estou na duvida se é o processador que está fraco. vou fazer um teste para ver se é a memoria ram, antes de trocar o processador.

Você conseguiu resolver o problema?

Componentes:

Placa-Mãe Asus TUF H310M-Plus Gaming/BR, Intel LGA 1151, mATX, DDR4

Processador Intel Pentium G5400 Coffee Lake, 8a Geração, Cache 4MB, 3.7Ghz, LGA 1151 - BX80684G5400

Memória HyperX Fury, 8GB, 2400MHz, DDR4, CL15, Preto - HX424C15FB2/8

SSD Kingston A400, 240GB, SATA, Leitura 500MB/s, Gravação 350MB/s - SA400S37/240G

Fonte Gigabyte 400W 80 Plus White - PW400

@osvaldomp

Em 11/01/2019 às 19:04, osvaldomp disse:

 

If Sheets("Planilha1").Cells(Sheets("Planilha1").[D1], 6) = "" Then
  MsgBox "PREENCHA A CÉLULA " & _
   Sheets("Planilha1").Cells(Sheets("Planilha1").[D1], 6).Address(0, 0) & " DA Planilha1 "
  Exit Sub
 End If

 

Perfeito, funcionou muito bem !

5 horas atrás, osvaldomp disse:

 

Coloque os comandos abaixo no início  do seu código. Altere o intervalo se necessário.
 

If Application.CountA(Range("A1:D1")) < 4 Then
MsgBox "PREENCHA TODAS AS CÉLULAS DO INTERVALO"
Exit Sub
End If

 

Valeu, consegui colocar o código agora, ficou  bom.  Só  mais uma duvida, tem como colocar uma formula que especifica a célula que não pode ficar vazia. no lugar do A1:D1? Seria uma formula desse tipo  "ÍNDICE(Planilha1!A:G;Planilha1!$D$1;6)"

@osvaldomp

Não sei como coloca o seu Código, to te enviando a planilha.

Plan2.rar

Bom, tenho uma macro que quando é acionado ela copia os dados de algumas células e cola em outra planilha formando  um banco de dados, gostaria que caso alguma das células a serem copiadas não esteja preenchido, a macro não ativasse e emitia uma alerta de célula não preenchida.  Como se fosse uma "validação de dados" para ativar a macro.

no entanto a célula a ser preenchida nunca é a mesma,

@Erik Wesley @R0DR1G0_CWB  Funcionou, valeu!

@R0DR1G0_CWB Queria que ao atualizar a célula executa-se a macro.

5 horas atrás, Erik Wesley disse:

 

Você pode usar uma UserForm para e colocar um evento "Enter" no último preenchimento para ele ativar o "Salvar".

 

Assim na planilha, dando "Enter" em uma célula para acionar o "Enter" eu considero improvável.

Não sei usar UserFor mas vou pesquesar, queria apertar "Enter" a qualquer momento e ativar a macro.

1 hora atrás, Erik Wesley disse:

Em qual parte?

 

na macro salvar.

Tenho uma macro que ao clicar no botão ela lança os dados em outra planilha, gostaria que ela executa-se com a tecla enter. 

Plan231.rar

Estou com o mesmo prolema que o seu, você consegui solucionar?

tudo certo, você é fera mesmo!

 Mas to com mais uma duvida, Toda vez que eu abro a planilha surge uma mensagem para habilitar ou desabilitar a Macro, e quando eu fecho aparece outra mensagem de aviso. tem como tira essa mensagem?

Bom dia!

Preciso Copiar e Colar somente o Valor e Bloquear as outras formas de colar.

Em 3/27/2018 às 22:39, Basole disse:

Veja se este exemplo lhe atende

 

Cole o código em EstaPasta_de_trabalho 

 

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
    ByVal Target As Excel.Range)
    
    Select Case Application.CutCopyMode
        
        Case Is = False
        
        Case Is = xlCopy
        
        Case Is = xlCut
        MsgBox "Por favor, NÃO corte e cole. Use Copiar e Colar, depois aperte o ESC"
        Application.CutCopyMode = False
        
    End Select
    
End Sub

 

Obrigado, Ficou  como eu queria.

Boa tarde!

Preciso bloquear a ação de recortar/ mover da minha palinha, preciso modifica-la por isso não pode ser só protegida.

Consegui na internet bloquear copiar/colar/ recortar mas bloquear somente recortar não consegui achar.

To com problema para fazer esse processo no roteador tl-wr941nd v5

Pesquisei no site https://wiki.openwrt.org/toh/tp-link/tl-wr941nd, mas não achei a versão exata do meu roteador, coloquei o cabo serial e abri o telnet, mas só apareceu caracteres lixo, Fiz uma solda e resolveu o problema de caracteres, porém ele não esta aceitando comando do computador, Quando aparece a tentantiva de boot do roteador, digito tpl mas nada sai na tela, nem quando acaba o processo todo.

Novo Documento de Texto.txt