RenatoMejias

Já leu meu pequeno tutorial aqui no fórum? http://scriptbrasil.com.br/forum/index.php?showtopic=93167

O Excel tem por padrão o arquivo PESSOAL.XLS, você pode gravar suas macros nele e chamar em cada planilha sua respectiva macro.

Adicionei uns parênteses sem querer: ActiveWorkbook.SendMail Recipients:="teste@teste.com.br", Subject:="Teste "

Levou em consideração que usei extensão docx? Como uso Office 2007 essa é a nova extensão de arquivos Word, caso você use o Office 2003 mude para isso: Private Sub CommandButton1_Click() Dim i As Integer i = Val(TextBox1.Text) Documents.Open ("C:\teste\nome_do_documento" & i & ".doc") Unload Me End Sub

Baixe o PenClean e salve no seu desktop.link alternativo Execute o programa.Selecione a opção Verificar o computador e clique no botão Verificar.<<Aguarde alguns instantes, o exame é bem rápido>> Será informa se algo foi encontrado, se for encontrado será pedido para reiniciar, clique em Sim. O computador será reiniciado.Faça um novo log do Hijackthis e poste junto o relatório do PenClean que estará em C:\PenClean\PenClean.txt

Tente isso: TextBox1.Text = ListBox1.List(ListBox1.ListIndex)

Você deverá fazer uma validação para chamada da sua rotina. Para mandar o email faça assim: ActiveWorkbook.SendMail (Recipients:="teste@teste.com.br", Subject:="Teste ")

Tente isso: Private Sub CommandButton1_Click() Dim i As Integer i = Val(TextBox1.Text) Documents.Open ("C:\teste\doc" & i & ".docx") Unload Me End Sub

Caso Resolvido. Caso o autor queira a reabertura do tópico, envie uma MP com o link para um moderador da seção.

Leu minha última resposta?

Isso já não tem relação com malwares. Recomendo que poste na seção Windows. Mais algum problema relacionado a malwares?

Qual mensagem? Isso aparentemente é problema com hardwares, e não malwares.

É só clicar nele, o download começará automaticamente.

Bem, a sintaxe do if tem apenas um sinal de igual: if mes = 01 then

Desative e reative a Restauração do Sistema Sugiro que rode o CCleaner para fazer uma limpeza em sua máquina. Faça o download dele aqui CCleaner Abra o programa e clique em Executar Limpeza;Após isto, clique em Erros >> Procurar erros >> Corrigir ErrosMais algum problema com o computador?

Poste seu problema na área de Remoção de Malwares, veja aqui como fazer um log do Hijackthis para ser analisado: http://scriptbrasil.com.br/forum/index.php?showtopic=86007

O scan revelou os seguintes arquivos como suspeitos: C:\Documents and Settings\CHAVES\Meus documentos\Fam¡lia\MARIANO EXP 27000\Jogos\Info Games\INTERNET\RGL19.EXE C:\Documents and Settings\CHAVES\Meus documentos\Fam¡lia\MARIANO EXP 27000\Progetos\Programas\Revela_senha\Senha.exe C:\Documents and Settings\CHAVES\Meus documentos\Fam¡lia\MARIANO EXP 27000\Progetos\Programas\Senha.exe C:\Documents and Settings\CHAVES\Meus documentos\Programas\Programas\Habbo_Toolbar_2.exe C:\Documents and Settings\CHAVES\Meus documentos\Programas\Programas\vtp6.zip.prp Fica a seu encargo apaga-los ou não. Configure o Windows para mostrar todos os arquivos Reinicie em Modo de Segurança (Pressione intermitentemente F8 durante a inicialização, no menu que aparecer escolha através da seta de navegação, Modo Seguro). Usando o Windows Explorer (clique com o botão da direita do mouse em cima do Iniciar depois clique em Explorar, procure e apague o seguinte arquivo em vermelho (se estiver[em] presente): C:\Arquivos de programas\Mozilla Firefox\components\nsBrowserOpt.dll <--Este arquivo Reinicie normalmente. Informe o estado do computador.

Faça um Online Scan em kaspersky Virusscanner Clique em Quando questionando para instalar o componente ActiveX, clique em Aguarde a instalação e a actualização e depois clique em Clique agora em Nas opções do scan (settings), certifique-se que as entradas abaixo estão selecionadas:Scan using the following Anti-Virus database:Extended (if available otherwise Standard)Scan Options:Scan ArchivesScan Mail Bases Clique Clique em My Computer para que seja feito um Scan completo no seu Sistema.Será iniciado o scan e poderá demorar um pouco. Seja paciente e aguarde.No final do Scan, clique no botão Save as TextSalve o log com os resultados e poste na sua próxima resposta.Gere e cole também um novo log do HijackThis.

Isso significa que você marcou mais entradas do que deveria. Eu pedi para você selecionar apenas 1: O4 - HKCU\..\Run: [internet Explorer] C:\windows\IEXPLORER.EXE E aparentemente você marcou mais 35! Note que nesta caixa há um quadradinho ao lado de cada entrada, selecione todos (com exceção do que está acima) e clique em Restore. Poste um novo log do Hijackthis.

Abra o Hijackthis. Clique em Open the Misc Tool section Clique em Backup. Informe se há algo nesta caixa.

Poste um novo log do Hijackthis COMPLETO.

Opa seja bem vindo caro estagnatário, opssss, estagiário, rs, não se preocupe, será muito beeeeem, tratado, huahuahua (risada macábra). :D

Feche TODOS os programas abertos, principalmente o Internet Explorer e o Windows Explorer. Abra o Hijackthis, clique em Do scan a system only, marque as entradas abaixo e clique no botão Fix Checked (Não se preocupe caso alguma não exista). O16 - DPF: {1D4DB7D2-6EC9-47A3-BD87-1E41684E07BB} - http://ak.exe.imgfarm.com/images/nocache/f...p1.0.0.15-3.cab O24 - Desktop Component 1: Desktop Lectionary - HTTP://watercourse.net/anglicanleuven/lectionary3.php Reinicie normalmente. Faça um Online Scan em kaspersky Virusscanner Clique em Quando questionando para instalar o componente ActiveX, clique em Aguarde a instalação e a actualização e depois clique em Clique agora em Nas opções do scan (settings), certifique-se que as entradas abaixo estão selecionadas:Scan using the following Anti-Virus database:Extended (if available otherwise Standard)Scan Options:Scan ArchivesScan Mail Bases Clique Clique em My Computer para que seja feito um Scan completo no seu Sistema.Será iniciado o scan e poderá demorar um pouco. Seja paciente e aguarde.No final do Scan, clique no botão Save as TextSalve o log com os resultados e poste na sua próxima resposta.Gere e cole também um novo log do HijackThis.

Você aplicou FIX em alguma outra entrada? Veja as diferenças entre o último log e o penúltimo.

Feche TODOS os programas abertos, principalmente o Internet Explorer e o Windows Explorer. Abra o Hijackthis, clique em Do scan a system only, marque as entradas abaixo e clique no botão Fix Checked (Não se preocupe caso alguma não exista). O4 - HKCU\..\Run: [internet Explorer] C:\windows\IEXPLORER.EXE Configure o Windows para mostrar todos os arquivos Usando o Windows Explorer (clique com o botão da direita do mouse em cima do Iniciar depois clique em Explorar, procure e apague o seguinte arquivo em vermelho (se estiver[em] presente): C:\windows\IEXPLORER.EXE <--Este arquivo Reinicie normalmente e poste um novo Log do Hijackthis.