Nao entendi sua pergunta !! a data vai tar na planilha ou no nome do arquivo

Se for na planilha você pode usar a função =hoje() e ir em salvar como .pdf

A data vai estar na planilha, quando eu clicar no botão que esteja com a macro, ele pega a data e salva em PDF o arquivo como o nome da data

Boa tarde vilc,

Pelo que entendi o que você precisa é relativamente simples usando VBA.
Anexe uma planilha de exemplo que posso pensar no código.

att,

Use o código abaixo.

Sub SalvaComoPDF()
'
' SalvaComoPDF Macro
'
Dim DiaDeHoje As String
    
    DiaDeHoje = Replace(Date, "/", "")
 ' Altere o diretório antes de utilizar a macro   
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:UsersSeuDiretório" & DiaDeHoje & ".pdf", Quality:= _
        xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
        
End Sub

Use o código abaixo.

Sub SalvaComoPDF()
'
' SalvaComoPDF Macro
'
Dim DiaDeHoje As String
    
    DiaDeHoje = Replace(Date, "/", "")
 ' Altere o diretório antes de utilizar a macro   
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:UsersSeuDiretório" & DiaDeHoje & ".pdf", Quality:= _
        xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
        
End Sub

Como faço para usar o código?

Fiz:
Uma nova planilha com conteúdo;
Adicionei um botão;
Cliquei em NOVO;
Colei todo o código e substituí C:UsersSeuDiretório pelo local onde quero salvar o PDF.
Atribuí a macro SalvaComoPDF ao botão criado e testei.

Não apareceu o PDF na pasta informada e não apareceu erro.

Alguém pode ajudar?

OBS: Entendo nada de VBA.

Obrigado!

Use o código abaixo.

Sub SalvaComoPDF()
'
' SalvaComoPDF Macro
'
Dim DiaDeHoje As String
    
    DiaDeHoje = Replace(Date, "/", "")
 ' Altere o diretório antes de utilizar a macro   
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:UsersSeuDiretório" & DiaDeHoje & ".pdf", Quality:= _
        xlQualityMinimum, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
        


teria como, após ele salvar, abrir o arquivo salvo em pdf?
End Sub

Como faço para usar o código?

Fiz:
Uma nova planilha com conteúdo;
Adicionei um botão;
Cliquei em NOVO;
Colei todo o código e substituí C:UsersSeuDiretório pelo local onde quero salvar o PDF.
Atribuí a macro SalvaComoPDF ao botão criado e testei.

Não apareceu o PDF na pasta informada e não apareceu erro.

Alguém pode ajudar?

OBS: Entendo nada de VBA.

Obrigado!

O código funciona, talvez vc não tenho inserido a última contra-barra e com isso não tenha localizado no diretório pretendido.

Isso mesmo, obrigado!

Copiei o caminho do windows explorer e colei sobre o código, apagando a barra.