Boa noite Reinaldo, Apresenta o mesmo erro nas duas opções. Ainda acredito que está associado a permissões de pastas.

Wagner, este é todo meu código. Já verifiquei os endereços e estão corretos. Acredito que seja algo relacionado a permissões.

Exato!!

Show de Bolaaa!!! Resolvi com o seguinte código!! Mauro meu amigo, você sempre me surpreende!! Abraços!! If Left(Sheets("FolhaCTB&q...

Chook, veja se seria isto. Adaptei uma das Functions referente a função "SPLIT" no site abaixo : "The Versatile Split Function"...

= CDbl(Mid(Sheets("FolhaCTB").Range("A" & i + 8), 12, Application.WorksheetFunction.Search("(", Sheets("FolhaCT...

Reinaldo meu amigo você é fera demais!!! Grato a todos que se envolveram na solução!! Abraços! Fui...

Por que ele não identifica a quantidade de células com este erro. Deve ter alguma forma de contar sem ser manual.