Como verificar se uma pasta de trabalho foi salva?
Ao abrir uma nova pasta de trabalho, você pode esquecer de salvá-la; será irritante se você fechar a pasta de trabalho acidentalmente. Mas, como você pode verificar se uma pasta de trabalho do Excel foi salva?
Verifique se uma pasta de trabalho foi salva ou não com o código VBA
Verifique se uma pasta de trabalho foi salva ou não com o código VBA
Verificando se uma pasta de trabalho foi salva ou não, o seguinte código VBA pode lhe fazer um favor, faça o seguinte:
1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. Clique inserção > Móduloe cole o seguinte código no Módulo Janela.
Código VBA: verifique se uma pasta de trabalho foi salva ou não:
Sub filesaved()
'Updateby Extendoffice 20161109
Dim sLastTime As String
On Error GoTo EHandler
sLastTime = ActiveWorkbook.BuiltinDocumentProperties("last save time")
MsgBox sLastTime, vbInformation, "Kutools for Excel"
Exit Sub
EHandler:
MsgBox "File not saved", vbInformation, "Kutools for Excel"
End Sub
3. Então aperte F5 chave para executar este código, você obterá as seguintes caixas de prompt:
(1.) Se a pasta de trabalho foi salva, uma caixa de prompt aparecerá para lembrá-lo da última vez que salvou sua pasta de trabalho:
(2.) Se a pasta de trabalho não foi salva, você receberá a seguinte caixa de prompt:
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
