CasaDoHardware

Não da para baixar o arquivo. Fica o tempo todo reiniciando a contagem

Eles sao iguais? Devem ser importados na mesma planilha (guia) em planilhas diferentes na mesma pasta de trabalho ou em pastas de trabalho diferentes (arquivos)?

Vamos la! A Parte onde você alterou nao deveria mexer la deve ficar username mesmo. Este username é o usuario logado no seu pc. Ou aquele que se registra o windows. Aqui: Set SHC = Sheets("Consolidado") Se você olhar no arquivo de exemplo você vai ver que tem uma guia com o nome Consolidado. Se na sua planilha original o nome for diferente troque consolidado pelo nome da guia que vai receber os dados Qto a apagar os dados Antes do primeiro Do While acrescente esta linha sheets("Consolidado").range("A2:E" & rows.count).clearcontents 'Ajuste para o nome da sua planilha A pasta de trabalho que vai receber os dados pode estar em qualquer lugar do seu pc. As pastas de trabalho que vão ser copiadas estas sim todas elas devem estar na pasta Dados. Se estas alterações nao funcionarem poste (sem dados) a sua pasta de trabalho que vai receber os dados ORIGINAL.

Qual a linha de codigo que esta gerando problema É importante que a pasta Dados tenha esta nomenclatura Dados é diferente de dados ou qualquer outra variação. O codigo aqui esta funcionando corretamente. Altere esta linha "C:\Users\" & Environ("UserName") & "\Desktop\Dados" Para o caminho da pasta Dados que você criou no Desktop

Experimente!! Crie na sua area de trabalho uma pasta com o nome Dados. Coloque seus 100 arquivos na pasta Se quiser usar outro nome precisa alterar no codigo onde esta indicado. Base_unificaplanilhasmacro.zip

Experimente!! teste3resultado.zip

Sim é possivel! Poste um arquivo (Excel) com o seu formulario para impressao.

A base que você postou é completamente diferende seu exemplo. Seu Exemplo vai ate a coluna N Sua base ate a E Nao entendi! O

Me ajude a lhe ajudar. Nenhuma das tres pastas que você postou não tem nenhuma guia com o nome base macro. quando eu lhe pergunto o nome da guia preciso saber o nome da guia de origem e o com uma COPIA EXTAMENTE IGUAL a que você usa no dia a dia. E a planilha que recebe os dados tb TEM QUE SER EXATAMENTE IGUAL a que você usa no dia a dia. Disponibilize um modelo exatamente igual o que você usa. Dados confidenciais devem ser protegidos.

Eu nao sei o que você esta fazendo, afinal você nao da detalhes deste projeto. Essa data e hora sera diferente da hora atual, ja pensou em ter essa data e hora lancada no momento do cadastro dos dados e buscar esta informação em uma pesquisa?

Sim é possivel! Disponibilizar o arquivo ajuda muito.

Entendi o que pretende, mas a explicação ficou confusa. As pastas de trabalho com o nome centro de custo Existe ou nao? Se existir o que deve ser feito? Se nao existir o que deve ser feito?

Todas as suas pastas da qual você quer pegar os dados tem uma guia com o mesmo nome? Se sim que nome é esse! Esta guia pode estar oculta na planilha de origem? Qual o caminho onde esta os dados de origem? Abri seus dois arquivos mas nao consegui identificar a origem e o destino dos dados. Seu exemplo precisa ser semelhante a sua planilha original.

O nome da guia é sempre o mesmo?? Se nao for como você identifica a guia a ser copiada?

O melhor é ter as vendas todas centralizadas em uma unica guia. Se nao quiser crie botões em uma guia de menu e use hiperlinks

Seria interessante você postar a planilha com alguns dados de exemplo.

Não entendi o que você pretende! Explique melhor. Uma planilha de exemplo ajuda muito.

Copiar de onde? Talvez powerquery ou obter dados externos/ da web funcione.

Veja se este link te ajuda. https://www.hardware.com.br/comunidade/juntar-consolidar/1411270/ Creditos ao @Basole Unir_varias_Pasta_de_Trabalho-Basole.zip

Não entendi! A limitação esta no seu sistema. Não é uma planilha de excel? Se o relatorio é exportado do sistema tem que verificar a possibilidade de alterar o criterio no proprio sistema. Para usar o excel para extair do sitema as informações que você pretente é necessario acesso ao banco de dados de seu sistema. Pelo menos é o pouco do que entendi. Explica melhor? PS Não olhei a planilha.

Altere o inicio do seu codigo Sub Contador() Dim Contador As Long Contador = Range("Z1").Value + 1 'Altere para uma celula que nao esteja sendo utilizada Range("z1").Value = Contador Range("E4").End(xlDown).Offset(1, 0).Select ActiveCell.Offset(0, -1).Value = Format(Contador, "000") & "/18E" End Sub

Se quer um conselho que vale ouro nao mescle celulas no meio da planilha. A chance de ter problemas são enormes. Não vi sua planilha mas pela sua explicação uma tabela dinamica faria magica.

Provavelmente nas outras maquinas a variavel mylocal esteja carregando um valor diferente, ou o usuario nao tem acesso a pasta em questão. Depure o codigo e veja se as variaveis estão carregando os dados corretamente.

Não entendi!

Se for usar para um codigo use uma celula auxiliar para gravar o contador. você nao vai conseguir usar essa informação para salvar um novo arquivo por conta da barra.