Odair,

Boa Tarde!

Se o arquivo que contém a macro for colocado no mesmo local (pasta no micro ou pen drive) onde está o arquivo RESUMO DE ESTOQUE - OUROESTEARQUIVO DE RELATÓRIOS DE ESTOQUE.xlsx, o mesmo será executado toda vez, independentemente do caminho, com o código abaixo:

Workbooks.Open Filename:=ActiveWorkbokk.Path & "RESUMO DE ESTOQUE - OUROESTEARQUIVO DE RELATÓRIOS DE ESTOQUE.xlsx"

Boa Tarde Wagner,

Muito obrigado, vou mudar para este código.

abraços.

Wagner deu erro,

RESUMO DE ESTOQUE é a pasta onde se encontra o ARQUIVO DE RELATÓRIO DE ESTOQUE.

O arquivo de relatório deverá ser aberto quando a macro for executada em outra arquivo do excel que também se encontra dentro da pasta Resumo de Estoque.

Ok, Odair.

Nesse caso, o código é menor:

    Workbooks.Open Filename:=ActiveWorkbokk.Path & "ARQUIVO DE RELATÓRIOS DE ESTOQUE.xlsx"

Bom dia Wagner,

peço lhe desculpas pelo incomodo, mas novamente não estou conseguindo fazer com que o código que me passou funcione corretamente, sempre vai para depurar.

Odair,

Por gentileza, compacte seu arquivo com ZIP e anexe o mesmo aqui.

Boa Tarde Wagner,

Obrigado pela ajuda mais uma vez, segue em anexo a a pasta para que se possivel me ajudar.

As duas planilha esta entro da pasta Resumo de estoque e o arquivo de relatório, deverá ser aberto através da planilha avaliação do estoque.

obrigado.

Odair,

Bom Dia!

Desculpe a minha falha! Na instrução abaixo, que lhe passei existe um pequeno erro de escrita. Troque esta instrução

        Workbooks.Open Filename:=ActiveWorkbokk.Path & "ARQUIVO DE RELATÓRIOS DE ESTOQUE.xlsx"

Por esta:

        Workbooks.Open Filename:=ActiveWorkbook.Path & "ARQUIVO DE RELATÓRIOS DE ESTOQUE.xlsx"

A palavra ActiveWorkbook estava grafada como "ActiveWorkbokk" com dois k's. O correto é com dois O's (ActiveWorkbook).

Bom dia Wagner,

Muito obrigado pela ajuda, tentei muito tempo mas não havia conseguido, sou leigo em macro.

bom fim de semana.