Excel Onde estou errando? (VBA)

[Augusto Megres]

Boa noite galera,

Estou com um problema, 

Sou iniciante em excel e estou com um erro que não sei como resolver

Estou tentando fazer o excel salvar uma área selecionada em PDF e renomear o arquivo de acordo com o valor de uma célula, porém quando tento faze-lo estou recebendo um erro e não sei como resolver.

 

O erro provavelmente está na parte do Range, pois quando eu tiro e substituo por texto ela salva normalmente com o valor do texto, mas eu preciso salvar com o valor da célula.

 

Sub SALVAR_MEMORANDO_PAGINA_1()
'
' Salvar_memorando_1_pagina Macro
'

    Sheets("MEMORANDO").Select
    Range("A1:P45").Select
    ActiveSheet.PageSetup.PrintArea = "$A$1:$P$45"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
         Environ("USERPROFILE") & "\Desktop\" & Range("N1").Value & ".pdf", Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
    ActiveSheet.PageSetup.PrintArea = ""
    Sheets("BASE").Select
End Sub

 

Agradeço muito se puderem me ajudar

 

 

[Edson Luiz Branco]

Qual a mensagem de erro?

O que há na célula N1 da planilha "MEMORANDO"?

A planilha que tem o valor em N1 é a MEMORANDO mesmo?

O arquivo já não existe? Se existir, deletar o anterior primeiro.