M\u00e9todo 1: Obtenha o nome da pasta de trabalho ativa<\/span><\/strong><\/p>\n Esta fun\u00e7\u00e3o retornar\u00e1 o nome da pasta de trabalho ativa, como my_vba_workbook.xlsm<\/strong> .<\/span><\/p>\n M\u00e9todo 2: obter o nome da pasta de trabalho ativa sem extens\u00e3o<\/span><\/strong><\/p>\n Esta fun\u00e7\u00e3o retornar\u00e1 o nome da pasta de trabalho ativa sem a extens\u00e3o como my_vba_workbook<\/strong> .<\/span><\/p>\n Os exemplos a seguir mostram como usar cada m\u00e9todo na pr\u00e1tica com uma pasta de trabalho do Excel atualmente ativa chamada my_vba_workbook.xlsm<\/strong> .<\/span><\/p>\n Podemos criar a seguinte fun\u00e7\u00e3o para obter o nome da pasta de trabalho ativa:<\/span><\/p>\n Poder\u00edamos ent\u00e3o digitar a seguinte f\u00f3rmula na c\u00e9lula A1<\/strong> para obter o nome da pasta de trabalho ativa:<\/span><\/p>\n A captura de tela a seguir mostra como usar esta f\u00f3rmula na pr\u00e1tica:<\/span> <\/p>\n Podemos ver que a f\u00f3rmula retorna my_vba_workbook.xlsm<\/strong> , que \u00e9 o nome da pasta de trabalho atualmente ativa que estamos usando.<\/span><\/p>\n Nota<\/strong> : A extens\u00e3o .xlsm<\/strong> representa uma pasta de trabalho do Excel habilitada para macro.<\/span><\/p>\n Podemos criar a seguinte fun\u00e7\u00e3o para obter o nome da pasta de trabalho ativa sem a extens\u00e3o:<\/span><\/p>\n Poder\u00edamos ent\u00e3o digitar a seguinte f\u00f3rmula na c\u00e9lula A1<\/strong> para obter o nome da pasta de trabalho ativa:<\/span><\/p>\n A captura de tela a seguir mostra como usar esta f\u00f3rmula na pr\u00e1tica:<\/span><\/p>\n Podemos ver que a f\u00f3rmula retorna my_vba_workbook<\/strong> , que \u00e9 o nome da pasta de trabalho atualmente ativa sem a extens\u00e3o .xlsm<\/strong> .<\/span><\/p>\n Nota<\/strong> : Usando as fun\u00e7\u00f5es Left<\/strong> e Instr<\/strong> , podemos extrair todos os caracteres do nome da pasta de trabalho \u00e0 esquerda do ponto.<\/span><\/p>\n Os tutoriais a seguir explicam como realizar outras tarefas comuns em VBA:<\/span><\/p>\n Como criar pastas usando VBA<\/a> Voc\u00ea pode usar os seguintes m\u00e9todos no VBA para obter o nome de uma pasta de trabalho do Excel: M\u00e9todo 1: Obtenha o nome da pasta de trabalho ativa Function GetWorkbookName() As String GetWorkbookName = ActiveWorkbook.Name End Function Esta fun\u00e7\u00e3o retornar\u00e1 o nome da pasta de trabalho ativa, como my_vba_workbook.xlsm . M\u00e9todo 2: obter o […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[11],"tags":[],"class_list":["post-4876","post","type-post","status-publish","format-standard","hentry","category-guia"],"yoast_head":"\n Function<\/span> GetWorkbookName() As String<\/span><\/strong><\/span>\nGetWorkbookName = ActiveWorkbook.Name<\/strong><\/span>\nEnd Function<\/strong><\/span><\/pre>\n Function<\/span> GetWorkbookName() As String<\/span><\/strong><\/span>\nGetWorkbookName = Left(ActiveWorkbook.Name, InStr(ActiveWorkbook.Name, \" .<\/span> \") - 1)<\/strong><\/span>\nEnd Function<\/strong><\/span><\/pre>\n Exemplo 1: Obtenha o nome da pasta de trabalho ativa<\/strong><\/span><\/h2>\n
Function<\/span> GetWorkbookName() As String<\/span><\/strong><\/span>\nGetWorkbookName = ActiveWorkbook.Name<\/strong><\/span>\nEnd Function<\/strong><\/span><\/pre>\n =GetWorkbookName()<\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/obtenirw1.png\")
<\/p>\n Exemplo 2: Obtenha o nome da pasta de trabalho ativa sem extens\u00e3o<\/strong><\/span><\/h2>\n
Function<\/span> GetWorkbookName() As String<\/span><\/strong><\/span>\nGetWorkbookName = Left(ActiveWorkbook.Name, InStr(ActiveWorkbook.Name, \" .<\/span> \") - 1)<\/strong><\/span>\nEnd Function<\/strong><\/span><\/pre>\n =GetWorkbookName()<\/strong><\/span><\/pre>\n![\"\"](\"https:\/\/statorials.org\/wp-content\/uploads\/2023\/08\/getw2-1.png\")
<\/span><\/p>\n Recursos adicionais<\/strong><\/span><\/h2>\n
Como deletar pastas usando VBA<\/a>
Como renomear um arquivo usando VBA<\/a>
Como verificar se o arquivo existe usando VBA<\/a>
<\/span><\/p>\n","protected":false},"excerpt":{"rendered":"