carlosrrj

@ricardo_br Muito obrigado. Acabou que eu fiquei testando vários programas que fiz na internet e nenhum deu muito certo e tinha desistido. Hoje lembrei disso e como não entendo de programação pedi para o COPILOT criar um programa simples para mim para renomear os arquivos. Deu muito certo. Eu pedi para que os nomes ficassem da forma como costumo renomear (Doc. 1 - nome; Doc.2 - nome) e pedi pra que abrisse um janela para eu selecionar a pasta, porque n gostaria de ter que ficar editando o programa com o nome da pasta toda vez. Compartilho como vocês o código: Siga os passos abaixo: Abra o Bloco de Notas. Copie e cole o código abaixo. Salve o arquivo com a extensão .vbs (por exemplo, renomear_arquivos.vbs). Execute o script clicando duas vezes no arquivo .vbs. Aqui está o código: Dim objShell, objFolder, objFSO, objFolderItem, objFile, count Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.BrowseForFolder(0, "Selecione a pasta:", &H4000, 17) If Not objFolder Is Nothing Then Set objFolderItem = objFolder.Self Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.GetFolder(objFolderItem.Path) count = 1 For Each objFile In objFolder.Files objFile.Name = "Doc." & count & " - " & objFile.Name count = count + 1 Next MsgBox "Renomeação concluída!" Else MsgBox "Nenhuma pasta selecionada. Saindo..." End If

@Nailson Guilherme Se eu quiser que ao ínves de 0001 NOME DO ARQUIVO, fique 1 - NOME DO ARQUVO; 2 - NOME DO ARQUVO [...], o que posso alterar? Ou seja queria tirar esses zeros da frente e adicionar um traço separando o número do nome. Tem como?

Apenas para auxiliar quem está com o mesmo problema. Levei a um técnico e descobri que era um problema no chip. Ele consertou e ficou tudo ok.

Olá. Tenho um Notebook Acer Aspire 5. Costumo utilizá-lo com um mouse e um teclado, ambos USB. Ontem ao tentar utiliza-lo começou a aparecer uma notificação insistente de USB não reconhecido. Pensei que fosse o fio do mouse ou do teclado que estava com uma má conexão. Tentei trocá-los de porta, mas o problema continuou. Retirei ambos e não deixei nada conectado em nenhuma das portas USB, mas as notificações continuaram. Reiniciei o note, mas o problema continuou. As notificações ocorrem em intervalos de 1 segundo, possuem um som irritante e estão me impedindo de usar o PC. Ontem, após orientação recebida no Microsoft Community, reinstalei os controladores USB pelo gerenciador de dispositivos, mas não adiantou. Poderiam me ajudar? Será que alguma porta USB está com defeito?