¿Cómo abrir archivos pdf y word desde excel?
Como genero una macro que abra archivos pdf, word y de excel; desde una hoja de excel, dándole nombre y dirección en unas celdas y luego de abrirlos retorne a la hoja de excel. Actualmente puedo grabar áreas de hojas en pdf sin publicarlos, pero posteriormente cuando quiero verlos necesito abrirlos. Intenté grabar la macro con el grabador, pero no me genera los códigos. ¿Cómo puedo hacerlo?
Respuesta de Dante Amor
2
H o l a : Te anexo la macro para abrir cualquier documento de word, excel o pdf.
Solamente tienes que poner en las celdas B3 y C3 la ruta y el nombre del archivo, ejemplo:
La macro
Sub AbrirArchivo() 'Por.Dante Amor ruta = [B3] arch = [C3] If ruta = "" Or arch = "" Then MsgBox "Escribe la ruta y archivo" Exit Sub End If ' If Right(ruta, 1) <> "\" Then ruta = ruta & "\" If Dir(ruta & arch) = "" Then MsgBox "El archivo no existe" Exit Sub End If ' ActiveWorkbook.FollowHyperlink ruta & arch End Sub
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
