Buenas tardes atodos, saludos

nesesito de su ayuda, espero me puedan ayudar

como puedo crear varios pdf segun lista desplegable

tengo este codigo pero siempre se cierra el Excel anexo el mensaje que me arroja el Excel . espero me puedan ayudar o compartir otro codigo

anexo micodigo...

Sub criarArquivoDeEnvio()

' criarArquivoDeEnvio Macro

  Application.Calculation = xlAutomatic

    Application.ScreenUpdating = False

    Application.DisplayAlerts = False

    Workbooks.Add

    ChDir ThisWorkbook.Path Seguir leyendo... sobre crear pdf de cada registro de mi listado conbinado