Excel Como fazer uma macro salvar o arquivo com o nome correspondente ao de uma célula

Augusto Megres · 25 de abril de 2018

Boa noite!

Fiz uma planilha para agilizar um trabalho que antes era manual na minha empresa, só que tenho interesse em agilizar ainda mais esse trabalho (Que é chato pa po***)

Um outro usuário me ajudou muito resolvendo um problema, usuario este que sou muito grato (Valeu <3 @Basole)

Agora necessito que na hora de salvar, a minha macro pegue informações contidas nas células da planilha, e salve com essas informações, para que os documentos já saiam renomeados direitinho.

Sub Salvar_memorando_1_pagina()
'
' Salvar_memorando_1_pagina Macro
'

'
    Range("A1:P45").Select
    ActiveSheet.PageSetup.PrintArea = "$A$1:$P$45"
    ChDir "Desktop"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        Environ("USERPROFILE") & "\Desktop\Memorando.pdf", Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
    ActiveSheet.PageSetup.PrintArea = ""

Minha planilha tem 6 abas diferentes, então eu iria precisar de pegar informações em mais de uma delas, salvar o arquivo com o mesmo nome que a célula "C7" da planilha !memorando por exemplo.

Agradeço pessoal! Se puder me dar uma rápida explicação do que cada linha faz eu agradeço muito, pois estou em fase de aprendizado no excel