Zeno

Boa tarde Galera, Tenho o seguinte problema, tenho um UserForm na minha pasta Pessoal de Macros que utilizo para executar certas tarefas em outras pastas de trabalho. O problema é que ele somente fica visível para a pasta que esta ativa quando ele é iniciado, ou seja, quando abro uma outra Pasta ele não fica disponível, tenho que fecha-lo e abri-lo novamente. Seria como se ficasse com a propriedade ShowModal = False para outras Pastas e não somente para a Pasta Ativa onde foi iniciado. Abraços

OK, vou verificar. Obrigado.

Não Charley, o nome "intervalo" é colocado na Pasta de origem, não na atual, na atual coloca os valores contidos dentro do nome "intervalo".

Obrigado pela resposta Charley, mas deixe te mostrar o seguinte: Sub ImportaSemAbrir() Dim Caminho As String, Arquivo As String Caminho = "\\Usuarios\dados\Clientes\" Arquivo = "Tabela1.xlsm" ThisWorkbook.Names.Add "intervalo", RefersTo:="='" & Caminho & "[" & Arquivo & "]Plan2'!$A$1:$F$10" With Sheets("Plan2") .[A1:F10] = "=intervalo" .[A1:F10].Copy Sheets("Plan1").Range("A1").PasteSpecial xlPasteValues .[A1:F10].Clear End With End Sub Com esta Macro eu consigo copiar os dados da Planilha Fechada "Tabela1.xlsm" sem abri-la, imaginei que conseguiria fazer isso também com os nomes das Planilhas desta mesma Pasta.

Bom dia a todos! Sou novo no Clube e gostaria da ajuda de vocês para o seguinte problema em VBA. Preciso carregar uma ListBox com o nome das Planilhas de determinadas Pastas de Trabalho, o problema é que preciso fazer isso sem ter que abrir as referidas Pastas. Ou seja, preciso dizer para minha Macro: Busque nas Pastas tais o nome de todas as Planilhas e me Liste no ListBox. Acho que isso se faz através do ThisWorkBook, mas não consegui descobrir como. Sem alguém puder me dar uma luz. Desde já agradeço