Nenhum arquivo

Não ha nenhum incomodo em perguntar afinal o forum é para isso mesmo. Agora qto a sua necessidade seria interessante vc diponibilizar o arquivo. Imp...

O código que sugeri acima vai proteger a planilha Active.workbook.unpassword ="123" Deve desproteger.

Uma solução seria colocar uma senha no novo arquivo gerado. Antes de salvar o arquivo acrescente essa linha ActiveWorkbook.Password = "123&quo...

A nao ser que vc explique o que pretente como um todo, por exemplo qual o motivo de o ficheiro trocar o nome, nao acredito ter solução que nao seja al...

Algum moderador junta os dois topicos

Criar dois topicos com o mesmo assunto é desnecessario nao vai fazer seu topico ser respondido mais rapido.

São os valores das celulas em amarelo D1 por exemplo, e colar na coluna em vermelho Ou é o valor de D2 ja que D1 seria um titulo???

Se a questão é somente o usuario nao sair sem salvar a solução é mais simples do que parece. Primeiro nao precisa de confirmação se deseja mesmo sair...

Esse é um grande problema qdo se oculta a aplicação application.visible = false vc fica preso a esta aplicaçao somente Eu pessoalmente nao gosto d...

Testa o codigo assim Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim resposta As String resposta = MsgBox("Deseja Fechar o Arquivo...

Acrescente no codigo que vc postou Windows("Arquivo base").activate "Arquivo Base é o nome do arquivo.

Nao entendi direito vc quer uma mensagem de confirmação se vai fechar o arquivo ou nao??? Se for isso Esse codigo faz o que vc quer Sub Fechar()...

Tenta usar esses Sub Fechar() Dim resposta As String resposta = MsgBox("Deseja Fechar o Arquivo!!", vbOKCancel, "Fechar Arquivo&qu...

Isso o código que vc postou já faz. Qual a dificuldade então?