Boa tarde.
Estou começando agora com VBA, e gostaria de uma ajuda com esse código:
Sub salvar()
'
' salvar Macro
'
Dim nome As String
nome = "C:\Users\Sis Primetek\Desktop\teste impressão vba\" & Range("A3") & Range("C3") & ".pdf"
'
Sheets("Enem PV").Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=nome, Quality:=xlQualityStandard _
, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
True
Sheets("Enem PV").Select
Range("A3").Select
End Sub
Ele salva o arquivo excel em PDF já com um nome pré estabelecido que está na célula (A3). Mas essa célula é uma lista suspensa com vários nomes (cada nome puxa outras dados para a planilha), e eu gostaria que esse meu código salve todos os dados dessa lista suspensa (multiplos PDF'S) e também um código para salvar os arquivos na mesma pasta onde está salvo o arquivo excel..
Alguém pode me ajudar por favor?