none
Como inserir o caminho na barra de título do Office 2010 RRS feed

  • Pergunta

  • Bom Dia, gostaria de saber como exibir o caminho do arquivo na barra de títulos do Office 2010, exemplo: arquivo "Curriculum" em "Meus Documentos" gostaria que aparecesse no título do documento "C:\Documents and Settings\user\Meus documentos\Curriculum.doc", estou precisando com urgência.
    sexta-feira, 1 de junho de 2012 19:09

Respostas

  • Boa Tarde,

    É possível incluir este caminho no Cabeçalho e Rodapé:
    Fonte: http://support.microsoft.com/kb/310523/pt-br

    Como adicionar o nome de arquivo e o caminho para o cabeçalho ou rodapé no Word

    Este artigo fornece um método passo a passo para adicionar o nome de arquivo e o caminho do documento para o cabeçalho ou rodapé de uma palavra documento.

    Cabeçalhos e rodapés são áreas nas margens superior e inferior de cada página em um documento. Você pode adicionar o nome de arquivo e o caminho do documento para o cabeçalho ou rodapé em um documento do Microsoft Word. Isso pode ajudá-lo a localize o arquivo original, se você tiver uma cópia impressa do documento.

    Como adicionar o nome do arquivo e caminho para o cabeçalho ou o rodapé

    Para adicionar o nome de arquivo e o caminho para o cabeçalho ou rodapé em um documento do Word, execute estas etapas:
    1. No menu Exibir , clique em cabeçalho e rodapé .

      O cabeçalho é contornado por linhas pontilhadas em não-imprimíveis.

      Observação : se desejar adicionar o nome de arquivo e caminho do seu documento para o rodapé, clique em Alternar entre cabeçalho e rodapé na barra de ferramentas cabeçalho e rodapé .
    2. Clique em Inserir AutoTexto na barra de ferramentas cabeçalho e rodapé e, em seguida, clique emnome do arquivo e caminho .
    Para inserir o nome de arquivo e o caminho no corpo de uma palavra do documento, aponte para AutoTextono menu Inserir , aponte para Cabeçalho/rodapé e, em seguida, clique em nome do arquivo e caminho .

    Abs




    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 5 de junho de 2012 15:30
    Moderador
  • Bom Dia,

    Nativamente isto não é possível, por isto te passei este Tutorial.
    Estou pesquisando isto de outra forma, por Script ou outro meio, caso consiga a solução para o seu caso poste aqui para que possamos ajudar outroas pessoas com o mesmo objetivo.


    Grande Abraço

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    quarta-feira, 6 de junho de 2012 14:45
    Moderador
  • Boa Tarde,

    Consegui um material que vai conseguir adicionar. Vai precisar criar uma Macro dentro do Office.
    Fonte: http://www.techrepublic.com/blog/msoffice/display-a-word-documents-full-path-in-the-title-bar/2333

    Display a Word document's full path in the title bar

    When you open a new document, Word displays a generic name in the title bar – documentx. Once you give the document a meaningful name (by saving it), Word updates the name in the title bar. However, in both cases, Word displays only the filename. It won’t display the full path to the document.

    Fortunately, most of us don’t care what’s in the title bar, but for if you do, VBA is your answer. A simple macro will update the contents of the title bar to display the document’s name and path. To add this macro to a document (you can also add it to the Normal.dot template so that every new document you create includes the macro), do the following:

    1. With the file open, press [Alt]+[F11] to open the Visual Basic Editor (VBE).
    2. Add the following auto macro to the This Document module:Sub AutoOpen() ‘Display document name and path in the title bar. ActiveWindow.Caption = ActiveDocument.FullName
      End Sub

    3. Return to the Word document, then save and close it.
    4. Open the document. This will trigger the auto macro, which displays the document’s full pathname in the title bar.

    The security setting could delay the display, but only temporarily. With all but the lowest setting, Word prompts you to enable macros when you open the document. As soon as you do so, Word will run the auto macro and update the title bar.

    Since this is an auto macro that runs only when you open the document, Word won’t update the contents in the title bar when you save the file. If that’s a problem, add a second macro to respond to your save tasks. Open the document’s module and add the following macro to ThisDocument:

    Sub FileSaveAs()

    ‘Display document name and path in the title bar.

    If Dialogs(wdDialogFileSaveAs).Show = 0 Then Exit Sub

    System.Cursor = wdCursorNormal

    ActiveWindow.Caption = ActiveDocument.FullName

    End Sub

    You’ll need both macros for a complete fix: The first macro updates the title bar when you open the document and the second updates when you rename the document.


    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *


    quarta-feira, 6 de junho de 2012 20:38
    Moderador
  • Bom Dia Neto,

    Conforme comentei, esta é uma solução paleativa.
    Nativamente isto não é possível, o tutorial da Macro não mencionada versões.

    Porem percebi que não é muito vantajoso, já que não ficaria uma coisa permanente ao Office, para um bom aproveitamento teria quer aplicado em um modelo e disponibilizado.

    É um recurso interessante ter o caminho na barra de título, ainda estou pesquisando outras soluções.

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 11:53
    Moderador
  • Entendi o seu caso.

    Realmente seria útil para você.
    Estou pesquisando alguma função em VBA para dispobilizar isto, continue procurando também.

    Se conseguir te informo aqui.

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 12:04
    Moderador
  • Bom Dia,

    Fiz o teste com a Macro para Word e funcionou.
    Para funcionar você precisa permitir que o documento execute macros, no Word funciona perfeitamente, estou testando o Excel.

    São duas funções que precisam ser adicionadas ao mesmo documento:
    Sub AutoOpen()
    'Display document name and path in the title bar.
    ActiveWindow.Caption = ActiveDocument.FullName
    
    End Sub
    Sub FileSaveAs()
    
    'Display document name and path in the title bar.
    
    If Dialogs(wdDialogFileSaveAs).Show = 0 Then Exit Sub
    
    System.Cursor = wdCursorNormal
    
    ActiveWindow.Caption = ActiveDocument.FullName
    
    End Sub

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 12:27
    Moderador
  • Localizei o Material Oficial, fiz o teste no Excel e funcionou.
    Certifique-se que seu documento está aceitando Macros:

    Fonte oficial:
    http://support.microsoft.com/kb/272717/pt-br

    Como adicionar o caminho de pasta de trabalho para a barra de título

    Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação para uma finalidade específica. Este artigo presume que você está familiarizados com a linguagem de programação que está sendo demonstrada e com as ferramentas que são usadas para criar e depurar procedimentos. Engenheiros de suporte podem ajudar a explicar a funcionalidade de um determinado procedimento, mas eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades.

    Código de exemplo



    Para adicionar o nome de arquivo do documento salvo e o caminho à barra de título do documento ativo, siga estas etapas:   
    1. Salvar e fechar qualquer abrir pastas de trabalho e, em seguida, crie uma nova pasta de trabalho. 
    2. Inicie o Editor do Visual Basic (pressione ALT+F11).
    3. No menu Inserir , clique em módulo .
    4. Digite o seguinte código no módulo:
         Sub SaveAser()
            Application.Dialogs(xlDialogSaveAs).Show
            Application.ActiveWindow.Caption = ActiveWorkbook.FullName
         End Sub
      
         Sub Saver()
            'Checks to see if the file has been saved by looking
            'for a colon in the FullName, which includes any path.
            If InStr(1, ActiveWorkbook.FullName, ":") > 0 Then
               'File has been saved. Show the Save dialog box and 
               'put path in caption.
               ActiveWorkbook.Save
               Application.ActiveWindow.Caption = ActiveWorkbook.FullName
            Else
               'file has not been saved. Show SaveAs dialog box and 
               'put path in caption.
               Application.Dialogs(xlDialogSaveAs).Show
               Application.ActiveWindow.Caption = ActiveWorkbook.FullName
            End If
         End Sub
      
         Sub Opener()
            Application.Dialogs(xlDialogOpen).Show
            Application.ActiveWindow.Caption = ActiveWorkbook.FullName
         End Sub
      					
    5. Pressione ALT+F11 para retornar ao Microsoft Excel. 

    Usando a macro para abrir um arquivo



    Para abrir um arquivo existente, siga estas etapas:   
    1. No menu Ferramentas , aponte para macro e, em seguida, clique em macros .
    2. Clique em abridor e clique em Executar .
    3. Na caixa de diálogo Abrir , selecione o arquivo de Excel que você deseja abrir e, em seguida, clique em Abrir .
    O nome de arquivo e caminho completo será exibido na barra de título da pasta de trabalho aberta. 

    Usando a macro para salvar um arquivo



    Para salvar um novo arquivo, execute essas etapas:   
    1. No menu Ferramentas , aponte para macro e, em seguida, clique em macros .
    2. Clique em proteção e clique em Executar .
    3. Na caixa de diálogo Salvar , selecione o local onde deseja salvar o arquivo e clique em Salvar .
    O nome de arquivo e caminho completo será exibido na barra de título da pasta de trabalho salva.   

    Executando a macro automaticamente quando inicia o Excel



    Para executar a macro automaticamente quando você inicia o Excel, salve a pasta de trabalho com o novo código na pasta XLStart.   

    Atribuindo macros a botões da barra de ferramentas



    Para personalizar o Excel e atribuir as macros a botões da barra de ferramentas interna, execute estas etapas:   
    1. Inicie o Excel.
    2. No menu Ferramentas , clique em Personalizar .
    3. Na caixa de diálogo Personalizar , clique na guia comandos
    4. Na barra de ferramentas padrão acima, clique no botão Salvar
    5. Na caixa de diálogo Personalizar , clique em Modificar seleção .

      Aparecerá um menu com opções diferentes para os botões de barra de ferramentas.
    6. Clique em Atribuir Macro . Na lista Nome da macro , clique em proteção . Clique em OK .
    7. Na barra de ferramentas padrão , clique no botão Abrir
    8. Na caixa de diálogo Personalizar , clique em Modificar seleção
    9. Clique em Atribuir Macro . Na lista Nome da macro , clique em abridor . Clique em OK .

    Atribuindo macros a menus internos



    Para atribuir essas macros para os comandos internos no menu arquivo , execute estas etapas:   
    1. Inicie o Excel.
    2. No menu Ferramentas , clique em Personalizar .
    3. Na caixa de diálogo Personalizar , clique na guia barras de ferramentas
    4. Clique para selecionar a Barra de menu planilha se ela já não estiver marcada.
    5. No menu arquivo , clique em Abrir .
    6. Na caixa de diálogo Personalizar , clique na guia comandos
    7. Na caixa de diálogo Personalizar , clique em Modificar seleção
    8. Clique em Atribuir Macro . Na lista Nome da macro , clique em abridor . Clique em OK .
    9. No menu arquivo , clique em Salvar .
    10. Na caixa de diálogo Personalizar , clique na guia comandos
    11. Na caixa de diálogo Personalizar , clique em Modificar seleção
    12. Clique em Atribuir Macro . Na lista Nome da macro , clique em proteção . Clique em OK .
    13. No menu arquivo , clique em Salvar .
    14. Na caixa de diálogo Personalizar , clique em Modificar seleção
    15. Clique em Atribuir Macro . Na lista Nome da macro , clique em SaveAser . Clique em OK .
    16. Na caixa de diálogo Personalizar , clique em Fechar .

    Com as macros disponíveis próximo tempo que você iniciar Excel



    Para que as macros disponíveis quando você inicia o Excel, oculte a pasta de trabalho. Para fazer isso, clique em Ocultar no menu janela . Quando você clica em Sair no menu arquivo , clique em Sim se você for solicitado para salvar alterações na pasta de trabalho oculta. 

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 12:36
    Moderador
  • Exatamente, por isto te passei a segunda opção para Excel.

    Funcionou corretamente no meu.
    Porem ainda estou pesquisando uma forma mais fácil.

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 13:30
    Moderador
  • Localizei a solução.

    Uma coisa simples e a galera complica.
    Estou usando o Excel 2010 e funcionou perfeitamente.

    Na Guia Desenvolvedor você vai criar uma Macro com o Nome que quiser, pode ser Mostra_Titulo e então nas propriedades da planilha vai inserir o código abaixo, estava faltando o código de índice (1).
    Sub Mostra_Titulo()
    ActiveWorkbook.Windows(1).Caption = ActiveWorkbook.FullName
    End Sub
    Salve a Macro e mande executar, quando voltar a planilha lá vai estar o caminho.

    É o suficiente, quando sair e entrar no documento lá via estar o caminho completo, conforme falamos antes, você pode aplicar esta Macro em um documento Modelo, desta forma vai ser menos trabalhoso, quando for criar os próximos a solução ja vai estar criadas.

    Vai ser criado um múdulo com o código.

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 13:53
    Moderador
  • Ok Neto, grande abraço.


    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *


    terça-feira, 12 de junho de 2012 14:00
    Moderador

Todas as Respostas

  • Boa Tarde,

    É possível incluir este caminho no Cabeçalho e Rodapé:
    Fonte: http://support.microsoft.com/kb/310523/pt-br

    Como adicionar o nome de arquivo e o caminho para o cabeçalho ou rodapé no Word

    Este artigo fornece um método passo a passo para adicionar o nome de arquivo e o caminho do documento para o cabeçalho ou rodapé de uma palavra documento.

    Cabeçalhos e rodapés são áreas nas margens superior e inferior de cada página em um documento. Você pode adicionar o nome de arquivo e o caminho do documento para o cabeçalho ou rodapé em um documento do Microsoft Word. Isso pode ajudá-lo a localize o arquivo original, se você tiver uma cópia impressa do documento.

    Como adicionar o nome do arquivo e caminho para o cabeçalho ou o rodapé

    Para adicionar o nome de arquivo e o caminho para o cabeçalho ou rodapé em um documento do Word, execute estas etapas:
    1. No menu Exibir , clique em cabeçalho e rodapé .

      O cabeçalho é contornado por linhas pontilhadas em não-imprimíveis.

      Observação : se desejar adicionar o nome de arquivo e caminho do seu documento para o rodapé, clique em Alternar entre cabeçalho e rodapé na barra de ferramentas cabeçalho e rodapé .
    2. Clique em Inserir AutoTexto na barra de ferramentas cabeçalho e rodapé e, em seguida, clique emnome do arquivo e caminho .
    Para inserir o nome de arquivo e o caminho no corpo de uma palavra do documento, aponte para AutoTextono menu Inserir , aponte para Cabeçalho/rodapé e, em seguida, clique em nome do arquivo e caminho .

    Abs




    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 5 de junho de 2012 15:30
    Moderador
  • Este tutorial é para inserir Cabeçalho e Rodape, não é minha duvida, gostaria de sabe como inserir o caminho inteiro no título do documento...

    Antônio Telésforo F. Neto

    quarta-feira, 6 de junho de 2012 12:41
  • Bom Dia,

    Nativamente isto não é possível, por isto te passei este Tutorial.
    Estou pesquisando isto de outra forma, por Script ou outro meio, caso consiga a solução para o seu caso poste aqui para que possamos ajudar outroas pessoas com o mesmo objetivo.


    Grande Abraço

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    quarta-feira, 6 de junho de 2012 14:45
    Moderador
  • Boa Tarde,

    Consegui um material que vai conseguir adicionar. Vai precisar criar uma Macro dentro do Office.
    Fonte: http://www.techrepublic.com/blog/msoffice/display-a-word-documents-full-path-in-the-title-bar/2333

    Display a Word document's full path in the title bar

    When you open a new document, Word displays a generic name in the title bar – documentx. Once you give the document a meaningful name (by saving it), Word updates the name in the title bar. However, in both cases, Word displays only the filename. It won’t display the full path to the document.

    Fortunately, most of us don’t care what’s in the title bar, but for if you do, VBA is your answer. A simple macro will update the contents of the title bar to display the document’s name and path. To add this macro to a document (you can also add it to the Normal.dot template so that every new document you create includes the macro), do the following:

    1. With the file open, press [Alt]+[F11] to open the Visual Basic Editor (VBE).
    2. Add the following auto macro to the This Document module:Sub AutoOpen() ‘Display document name and path in the title bar. ActiveWindow.Caption = ActiveDocument.FullName
      End Sub

    3. Return to the Word document, then save and close it.
    4. Open the document. This will trigger the auto macro, which displays the document’s full pathname in the title bar.

    The security setting could delay the display, but only temporarily. With all but the lowest setting, Word prompts you to enable macros when you open the document. As soon as you do so, Word will run the auto macro and update the title bar.

    Since this is an auto macro that runs only when you open the document, Word won’t update the contents in the title bar when you save the file. If that’s a problem, add a second macro to respond to your save tasks. Open the document’s module and add the following macro to ThisDocument:

    Sub FileSaveAs()

    ‘Display document name and path in the title bar.

    If Dialogs(wdDialogFileSaveAs).Show = 0 Then Exit Sub

    System.Cursor = wdCursorNormal

    ActiveWindow.Caption = ActiveDocument.FullName

    End Sub

    You’ll need both macros for a complete fix: The first macro updates the title bar when you open the document and the second updates when you rename the document.


    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *


    quarta-feira, 6 de junho de 2012 20:38
    Moderador
  • Exige alguma versão do Office? Fiz a Macro, deu tudo ok, até a mensagem de segurança mas mesmo assim deu na mesma, estou com Office 2010

    Antônio Telésforo F. Neto

    terça-feira, 12 de junho de 2012 11:50
  • Bom Dia Neto,

    Conforme comentei, esta é uma solução paleativa.
    Nativamente isto não é possível, o tutorial da Macro não mencionada versões.

    Porem percebi que não é muito vantajoso, já que não ficaria uma coisa permanente ao Office, para um bom aproveitamento teria quer aplicado em um modelo e disponibilizado.

    É um recurso interessante ter o caminho na barra de título, ainda estou pesquisando outras soluções.

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 11:53
    Moderador
  • Bom Dia Wagner,

    Eu percebi este problema, teria que fazer este macro em documento por documento, não vejo uma vantagem nisto.

    No caso da minha empresa de projetos para construção, estamos usando um programa de ponto para registrar os horários dos funcionários onde conta o horário com o arquivo aberto, para a administração ter uma média do tempo gasto em cada projeto e servir de tempo de trabalho por funcionário.

    Mas este programa de ponto identifica o projeto aberto pelo caminho completo no título, dos 3 programas pra projeto que trabalhamos nos quais são o AutoCAD, TQS e Excel, apenas o Excel não há esta função de habilitar o caminho completo na barra de título, no qual deixa o programa de ponto inutilizável quando se trabalha nele.

    Caso encontre alguma solução, favor responder aqui.


    Antônio Telésforo F. Neto


    terça-feira, 12 de junho de 2012 12:01
  • Entendi o seu caso.

    Realmente seria útil para você.
    Estou pesquisando alguma função em VBA para dispobilizar isto, continue procurando também.

    Se conseguir te informo aqui.

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 12:04
    Moderador
  • Bom Dia,

    Fiz o teste com a Macro para Word e funcionou.
    Para funcionar você precisa permitir que o documento execute macros, no Word funciona perfeitamente, estou testando o Excel.

    São duas funções que precisam ser adicionadas ao mesmo documento:
    Sub AutoOpen()
    'Display document name and path in the title bar.
    ActiveWindow.Caption = ActiveDocument.FullName
    
    End Sub
    Sub FileSaveAs()
    
    'Display document name and path in the title bar.
    
    If Dialogs(wdDialogFileSaveAs).Show = 0 Then Exit Sub
    
    System.Cursor = wdCursorNormal
    
    ActiveWindow.Caption = ActiveDocument.FullName
    
    End Sub

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 12:27
    Moderador
  • Localizei o Material Oficial, fiz o teste no Excel e funcionou.
    Certifique-se que seu documento está aceitando Macros:

    Fonte oficial:
    http://support.microsoft.com/kb/272717/pt-br

    Como adicionar o caminho de pasta de trabalho para a barra de título

    Microsoft fornece exemplos de programação apenas para ilustração, sem garantia expressa ou implícita. Isso inclui, mas não está limitado a, garantias implícitas de comercialização ou adequação para uma finalidade específica. Este artigo presume que você está familiarizados com a linguagem de programação que está sendo demonstrada e com as ferramentas que são usadas para criar e depurar procedimentos. Engenheiros de suporte podem ajudar a explicar a funcionalidade de um determinado procedimento, mas eles não modificarão esses exemplos para fornecer funcionalidades adicionais ou construir procedimentos para atender às suas necessidades.

    Código de exemplo



    Para adicionar o nome de arquivo do documento salvo e o caminho à barra de título do documento ativo, siga estas etapas:   
    1. Salvar e fechar qualquer abrir pastas de trabalho e, em seguida, crie uma nova pasta de trabalho. 
    2. Inicie o Editor do Visual Basic (pressione ALT+F11).
    3. No menu Inserir , clique em módulo .
    4. Digite o seguinte código no módulo:
         Sub SaveAser()
            Application.Dialogs(xlDialogSaveAs).Show
            Application.ActiveWindow.Caption = ActiveWorkbook.FullName
         End Sub
      
         Sub Saver()
            'Checks to see if the file has been saved by looking
            'for a colon in the FullName, which includes any path.
            If InStr(1, ActiveWorkbook.FullName, ":") > 0 Then
               'File has been saved. Show the Save dialog box and 
               'put path in caption.
               ActiveWorkbook.Save
               Application.ActiveWindow.Caption = ActiveWorkbook.FullName
            Else
               'file has not been saved. Show SaveAs dialog box and 
               'put path in caption.
               Application.Dialogs(xlDialogSaveAs).Show
               Application.ActiveWindow.Caption = ActiveWorkbook.FullName
            End If
         End Sub
      
         Sub Opener()
            Application.Dialogs(xlDialogOpen).Show
            Application.ActiveWindow.Caption = ActiveWorkbook.FullName
         End Sub
      					
    5. Pressione ALT+F11 para retornar ao Microsoft Excel. 

    Usando a macro para abrir um arquivo



    Para abrir um arquivo existente, siga estas etapas:   
    1. No menu Ferramentas , aponte para macro e, em seguida, clique em macros .
    2. Clique em abridor e clique em Executar .
    3. Na caixa de diálogo Abrir , selecione o arquivo de Excel que você deseja abrir e, em seguida, clique em Abrir .
    O nome de arquivo e caminho completo será exibido na barra de título da pasta de trabalho aberta. 

    Usando a macro para salvar um arquivo



    Para salvar um novo arquivo, execute essas etapas:   
    1. No menu Ferramentas , aponte para macro e, em seguida, clique em macros .
    2. Clique em proteção e clique em Executar .
    3. Na caixa de diálogo Salvar , selecione o local onde deseja salvar o arquivo e clique em Salvar .
    O nome de arquivo e caminho completo será exibido na barra de título da pasta de trabalho salva.   

    Executando a macro automaticamente quando inicia o Excel



    Para executar a macro automaticamente quando você inicia o Excel, salve a pasta de trabalho com o novo código na pasta XLStart.   

    Atribuindo macros a botões da barra de ferramentas



    Para personalizar o Excel e atribuir as macros a botões da barra de ferramentas interna, execute estas etapas:   
    1. Inicie o Excel.
    2. No menu Ferramentas , clique em Personalizar .
    3. Na caixa de diálogo Personalizar , clique na guia comandos
    4. Na barra de ferramentas padrão acima, clique no botão Salvar
    5. Na caixa de diálogo Personalizar , clique em Modificar seleção .

      Aparecerá um menu com opções diferentes para os botões de barra de ferramentas.
    6. Clique em Atribuir Macro . Na lista Nome da macro , clique em proteção . Clique em OK .
    7. Na barra de ferramentas padrão , clique no botão Abrir
    8. Na caixa de diálogo Personalizar , clique em Modificar seleção
    9. Clique em Atribuir Macro . Na lista Nome da macro , clique em abridor . Clique em OK .

    Atribuindo macros a menus internos



    Para atribuir essas macros para os comandos internos no menu arquivo , execute estas etapas:   
    1. Inicie o Excel.
    2. No menu Ferramentas , clique em Personalizar .
    3. Na caixa de diálogo Personalizar , clique na guia barras de ferramentas
    4. Clique para selecionar a Barra de menu planilha se ela já não estiver marcada.
    5. No menu arquivo , clique em Abrir .
    6. Na caixa de diálogo Personalizar , clique na guia comandos
    7. Na caixa de diálogo Personalizar , clique em Modificar seleção
    8. Clique em Atribuir Macro . Na lista Nome da macro , clique em abridor . Clique em OK .
    9. No menu arquivo , clique em Salvar .
    10. Na caixa de diálogo Personalizar , clique na guia comandos
    11. Na caixa de diálogo Personalizar , clique em Modificar seleção
    12. Clique em Atribuir Macro . Na lista Nome da macro , clique em proteção . Clique em OK .
    13. No menu arquivo , clique em Salvar .
    14. Na caixa de diálogo Personalizar , clique em Modificar seleção
    15. Clique em Atribuir Macro . Na lista Nome da macro , clique em SaveAser . Clique em OK .
    16. Na caixa de diálogo Personalizar , clique em Fechar .

    Com as macros disponíveis próximo tempo que você iniciar Excel



    Para que as macros disponíveis quando você inicia o Excel, oculte a pasta de trabalho. Para fazer isso, clique em Ocultar no menu janela . Quando você clica em Sair no menu arquivo , clique em Sim se você for solicitado para salvar alterações na pasta de trabalho oculta. 

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 12:36
    Moderador
  • Cara, a macro que você passou para words:

    Sub AutoOpen()
    'Display document name and path in the title bar.
    ActiveWindow.Caption = ActiveDocument.FullName
    
    End Sub
    Sub FileSaveAs()
    
    'Display document name and path in the title bar.
    
    If Dialogs(wdDialogFileSaveAs).Show = 0 Then Exit Sub
    
    System.Cursor = wdCursorNormal
    
    ActiveWindow.Caption = ActiveDocument.FullName
    
    End Sub

    Deu certo no meu Words e não funcionou no Excel, esta nova não funcionou em nenhuma das duas na versão 2010, tem de fazer alguma configuração antes?


    Antônio Telésforo F. Neto

    terça-feira, 12 de junho de 2012 13:26
  • Exatamente, por isto te passei a segunda opção para Excel.

    Funcionou corretamente no meu.
    Porem ainda estou pesquisando uma forma mais fácil.

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 13:30
    Moderador
  • Localizei a solução.

    Uma coisa simples e a galera complica.
    Estou usando o Excel 2010 e funcionou perfeitamente.

    Na Guia Desenvolvedor você vai criar uma Macro com o Nome que quiser, pode ser Mostra_Titulo e então nas propriedades da planilha vai inserir o código abaixo, estava faltando o código de índice (1).
    Sub Mostra_Titulo()
    ActiveWorkbook.Windows(1).Caption = ActiveWorkbook.FullName
    End Sub
    Salve a Macro e mande executar, quando voltar a planilha lá vai estar o caminho.

    É o suficiente, quando sair e entrar no documento lá via estar o caminho completo, conforme falamos antes, você pode aplicar esta Macro em um documento Modelo, desta forma vai ser menos trabalhoso, quando for criar os próximos a solução ja vai estar criadas.

    Vai ser criado um múdulo com o código.

    Abs

    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *

    terça-feira, 12 de junho de 2012 13:53
    Moderador
  • Deu certo =D valeu! vou procurar uma forma de inserir isso em todos os antigos agora...

    Antônio Telésforo F. Neto

    terça-feira, 12 de junho de 2012 13:58
  • Ok Neto, grande abraço.


    * Ajude a organizar melhor o Fórum, dando Feedback sobre a dúvida solicitada, e marcando como Útil e como Resposta, a postagem dos colaboradores que resolveram o seu caso, ou foram úteis *


    terça-feira, 12 de junho de 2012 14:00
    Moderador