Si por “lista de tareas de Microsoft Office” se refiere a una lista de tareas en Microsoft Outlook, entonces la respuesta es sí. Puede lograr esto con una macro. Puedo proporcionar la macro pero necesitaré algunos detalles adicionales. ¿Desea imprimir todas las tareas en su lista de tareas o solo las tareas seleccionadas? ¿Qué información desea de cada tarea y cómo desea que se presente la información?
Actualización (11/03/15)
Aquí está la solución que mencioné. Siga estas instrucciones para usarlo.
- ¿Por qué la Epson sx218 no se imprime en Windows 7?
- ¿Qué es la hoja de cierre de aluminio impreso?
- ¿Cuáles son las mejores impresoras económicas pero de alta calidad para imprimir libros, para una futura editorial pequeña?
- ¿Dónde puedo encontrar una tienda de impresión de fotografías en Nagpur?
- ¿Cuál es la mejor impresora para imprimir fotografías en color y en blanco y negro de al menos 13 "de ancho?
- Outlook abierto
- Presione ALT + F11 para abrir el editor VB
- Si no se expande, expanda Proyecto1
- Si no se expande, expanda Módulos
- Haga doble clic en un módulo.
- Copie el código a continuación y péguelo en el panel derecho de la ventana del editor
- Haga clic en el icono del disquete en la barra de herramientas para guardar los cambios.
- Cerrar el editor
- Haga clic en Archivo -> Opciones
- Haga clic en Centro de confianza
- Haga clic en el botón Configuración del Centro de confianza
- Haga clic en Configuración de macro
- Elija cualquiera de las dos opciones inferiores en Configuración de macro
- Haga clic en Aceptar
- Retrocede para salir de las opciones
- Cambie a una carpeta de tareas y seleccione una o más tareas
- Ejecute la macro PrintTasks
Privado Declarar función PtrSafe ShellExecute Lib “shell32.dll” _
Alias ”ShellExecuteA” (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory como cadena, ByVal nShowCmd tan largo) tan largo
Tareas de impresión secundarias ()
Dim olkTsk como objeto, _
objFSO como objeto, _
objFil como objeto, _
strFil As String
strFil = Environ (“TEMP”) y “\ Outlook_Task_List.html”
Establecer objFSO = CreateObject (“Scripting.FileSystemObject”)
Establecer objFil = objFSO.CreateTextFile (strFil, True)
Para cada olkTsk en Application.ActiveExplorer.Selection
Si olkTsk.Class = olTask entonces
objFil.WriteLine “
” & _
“Tarea: ” & olkTsk.Subject & “
” & _
“Due:” & olkTsk.DueDate & “
” & _
“Progreso:” & olkTsk.PercentComplete & “%
” & _
“Notas
” & Reemplazar (olkTsk.Body, vbCrLf, “
“) & _
“
”
Terminara si
próximo
objFil.Close
ShellExecute 0 &, “print”, strFil, 0 &, 0 &, 0 &
Establecer objFil = Nada
Establecer objFSO = Nada
Establecer olkTsk = Nada
Sub final
