minoso

Bingo! Problema resolvido Não esqueça de marcar o tópico como "resolvido".

@Mark® Você pode condenar seu roteador com fatos Teste ele na casa de um amigo, se der o mesmo sintoma, ele está morrendo. Caso contrário, ainda dá pra ficar com ele em uso, precisamos buscar possíveis interferências que estejam atenuando a potencia do Wi-fi. Teste e retorne! Ano que vem é daqui uma semana

@Roronoa Zero Veja o anexo. Algumas considerações Desativei (apaguei ) a macro que rodava a cada alteração de célula. Substitui pela fórmula na coluna B, ok? Alterei a macro Data01 e Delete01 para que você tenha apenas uma macro de inserção e uma de exclusão para todos os botões Uma observação para exclusão: é IMPRESCINDÍVEL que o usuário selecione a célula da coluna B que quer apagar antes de clicar no botão que aciona a macro Delete01. (para inserir não precisa selecionar nada, só apertar o botão)Se não se atender para isso e clicar no botão de apagar, a macro apagará o conteúdo da célula que estiver selecionada no momento! ​​Você precisa alterar o nome das macros que os demais botões estão 'chamando', todos os 'data' devem olhar para a macro Data01 e todos os 'x' devem olhar para a macro Delete01 Protocolo.zip

Salve @ ! Agora vai! Teste o anexo. Se tiver dúvida com relação ao código (que eu comentei pra facilitar leitura e manutenção), retorne ao tópico. Estou de olho. Espero ter ajudado Excel zuera no hotel.zip

@leonardo.viana Por favor, não esqueça de marcar o tópico como "Resolvido"

Sim @leonardo.viana, ele é melhor do que o cooler que você deve ter (que acompanha o processador). Ainda assim, o seu cuidado está sendo além do necessário, ok? Como informado pelo @NigeriaMan e o site da Intel, essa temperatura que seu processador está alcançando atualmente é totalmente normal.

Calma @Roronoa Zero Note que a Macro da Coluna A altera o conteúdo da coluna B, a qual nós selecionamos como 'bloqueada' em nossa macro principal, lembra-se? Então para a Macro A funcionar na coluna B, ela também precisa ter a desproteção e proteção (ActiveSheet.Unprotect e ActiveSheet.Protect). Toda macro que você fizer na planilha que for influenciar no conteúdo da coluna B e C deve ter essa abertura e fechamento de proteção. O erro está dando pois a coluna B está bloqueada e nem mesmo a macro da A consegue editá-la, o erro é algo como "Amigão, você bloqueou a coluna B e tá querendo limpar seu conteúdo, tá doidinho né?" Exatamente o mesmo conceito que disse acima aplica-se para a macro da coluna C. Faça as alterações e teste

Sim, esse cooler é compatível com o seu processador. Eu não conheço o HwMonitor, sempre que precisei usei o próprio Thermal Controller da Alienware (marca do meu computador). Dei uma pesquisada e tem bastante gente falando bem desse aqui, SpeedFan. Teste e acompanhe, veja se o resultado é o mesmo do HwMonitor.

@navegador2 o Viber tem suporte a Symbian sim, veja: http://www.viber.com/products/nokia Teste e retorne

Puts, esqueci do detalhe da senha, me desculpe. Na linha que você inseriu, acrescente lá no final a propriedade Password := "" Ficando assim ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password := "" Outra coisa que esquecemos, o botão que aciona a macro também deve estar com o flag de bloqueado ativo. Clique com o botão direito do mouse sobre ele, vá em propriedades e então na aba Proteção, desmarque a opção Bloqueada. Teste e retorne.

Não se preocupe. Como disse, se for ter problemas com incompatibilidade, terá com chipset e placa de vídeo - isso a gente resolve baixando os drivers depois

@leonardo.viana, como vimos no site, você precisa se preocupar a partir dos 65ºC e ainda assim, conforme nosso colega @NigeriaMan, ele trabalha até os 70ºC tranquilamente. Sim, quando o processador ultrapassa a temperatura máxima e permanece nisso por muito tempo o computador pode sofrer vários sintomas, desde desligamento automático a até travamento total da tela. Você pode tanto colocar um air-cooler mais parrudo, como inserir mais coolers no gabinete ou mesmo fazer aquela limpeza no interior do gabinete. Dependendo da urgência, você pode trabalhar com o computador ligado e o gabinete aberto, com um ventilador da sua casa mirado nele.

@Roronoa Zero Opa! Vamos lá. Com base no código que você postou, as linhas adicionais que eu sugeri devem estar assim ActiveSheet.Unprotect Insira logo abaixo ao declarar as variáveis (Dim) ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True Insira antes de fechar a sub Lembre-se que, por padrão, o Excel mantém todas as células com a propriedade de segurança bloqueada. Para o que a macro está fazendo funcionar de acordo com o que você deseja, antes de executá-la você precisa selecionar todas as células da sua planilha, clicar com o botão direito do mouse, selecionar a opção Propriedades e na aba Proteção desmarque a opção Bloqueadas. Depois selecione apenas as colunas que quer bloquear com a macro, no caso a coluna B e a C, clique com o botão direito do mouse, propriedades, proteção e marque a opção Bloqueadas. Esse procedimento se faz necessário para que quando a macro seja executada e bloqueie a planilha, o Excel bloqueará apenas as células que você manteve o flag 'bloqueada' marcado. Espero ter lhe ajudado

@navegador2 Por favor, não se esqueça de marcar o tópico como "Resolvido"

Opa! Que bom que deu certo! Obrigado por compartilhar o sistema de condição de cores, essa eu não sabia! Com relação ao ActiveCell.Column é simples, ela retorna o valor da coluna em que a célula selecionada está. É o mesmo de você inserir na célula a fórmula =COL( ) Uso esse número para saber quantas células ele precisará percorrer ao ir criando as novas abas. Entendeu?

Aquele SE na coluna B não tem nada de sofisticado @Roronoa Zero. Ele apenas verifica se a célula ao lado direito dele está vazia, se estiver ele não fará nada, caso contrário ele quebrará a data completa e concatenará as partes de forma a produzir o modelo padrão de protocolo que você queria. Está tudo funcionando como deveria? Precisa de mais alguma ajuda? Caso contrário, por favor, dê o tópico como "Resolvido"

@Roronoa Zero A sua coluna D está alterando porque a fórmula =AGORA( ) deve estar ativada, você precisa copiar e colar como valores, assim como você mesmo sugeriu (isso a minha macro faz sozinha, você chegou a ler o código?) Para deixar 'invisível' os adereços da planilha, no menu superior do Excel clique em Exibição > Desmarque Títulos > Desmarque Linhas de Grade > Desmarque Barra de Fórmulas Pronto

@Manuela Costa Por favor, preciso de mais detalhes do que você precisa para lhe ajudar. Ao que eu entendi, uma macro resolverá seu problema, só precisamos compreender com precisão a sua demanda. Não abandone o tópico, por favor

@Bruno Cordeiro_576863 teve êxito em alguma das sugestões? Em caso positivo, não esqueça de marcar o tópico como "resolvido". Boa sorte!

Vamos aos pontos. A sua planilha deu erro porque eu salvei o arquivo com macro com extensão XLSM, quando faço isso o Excel exclui a Macro - pois esse formato não dá o suporte pra vBA Aproveitando os pontos que você citou de 'melhoria', modifiquei a macro e salvei agora com a extensão correta, porém precisei anexar ao tópico como .rar, pois na extensão de XLSM o Fórum não permite hospedagem. Veja se ainda lhe atende. Vamos nos falando. protocolo.rar

Se preocupe com incompatibilidade de Placa de Vídeo e ChipSet (nada que não dê pra atualizar com drivers recentes). No mais, o Windows 8.1 tem prometido a compatibilidade com drivers da versão anterior @Jerfson Paiva.

Bom, fazia tempo que não programava. Veja se o arquivo que estou anexando atende o que você precisa. Se funcionar e não entender nada da lógica da macro, retorne que vamos nos falando! Espero que eu tenha lhe ajudado EDIT - Caro, cometi um erro grotesco em salvar o arquivo como XLSX, ao invés de XLSM. Perdemos toda a macro Hahahah (Que loucura!) Amanhã pela manhã eu refaço toda ela e anexo aqui novamente. Perdão. Excel zuera no hotel.xlsx

Primeiro a sua macro precisa desproteger a planilha, já que o final dela vai bloqueá-la (protegê-la). No início da sua macro, insira a linha ActiveSheet.Unprotect Depois, no momento em que estiver terminando a macro e quiser bloquear a coluna em questão, insira as linhas abaixo (usei a coluna G como exemplo). Columns("G:G").Select ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True Espero ter lhe ajudado!

A questão é que se você desativar essa atualização você não receberá nenhuma outra enquanto não instalar o 8.1, entendeu? Se o procedimento do link que eu postei der certo, marque a mensagem como "resolvido" para que outros usuários com o mesmo problema teu possam encontrar a solução Se precisar de mais ajuda estou de olho no tópico.

@Ex Inferis, sua intenção é das melhores...hehehehe mas quando me referi a compra, disse a respeito de TUDO! (menos a TV, claro). De qualquer forma, fica estendido meus parabéns novamente. Muito irado!!!