Nome Variavel de pasta

[Bruno_BRP]

bom dia !

 

gostaria de complementar minha macro com um nome de pasta 

 

 

 

ex: no meu PC eu defini uma pasta no C: como "Recibos de venda" , se eu abrir este arquivo em outra maquina não terá esta pasta e ira dar erro na macro , não gerando o arquivo 

 

o que tenho ate agora e esta funcionando e as linhas abaixo 

 

alguem pode me ajudar?

 

 

'SALVA O ARQUIVO EM PDF NA PASTA ESCOLHIDA COM O NOME ESCOLHIDO DE UMA CELULA OU MAIS

 

Dim nome As String

Dim endereco As String

 

'E O LOCAL ONDE SALVA O ARQUIVO MAIS O NOME DO ARQUIVO E O NUMERO DO PEDIDO

 

nome = "C:\Recibos de Venda\" & Range("c38").Value & ".pdf"

 

'SAO AS SELECIONADAS QUE APARECERAM NO PDF

 

ActiveSheet.Range("C3:I38").ExportAsFixedFormat Type:=xlTypePDF, Filename:=nome

 

 

 

 

 

[Visitante]

Experimente

nome = "C:\" & Range("C37").Value & Range("c38").Value & ".pdf"

Considerei o nome da pasta em 'C37'.

[Bruno_BRP]

obrigado