manucas

Realmente le agradezco por la respuesta, ya realice la prueba y efectivamente ya me funciono... Mil Gracias...

Agradesco tu colaboraciön,

Al menos has demostrado interés cosa que otros que se llaman expertos han cerrado la pregunta directamente. Debería haber un control de éstos y sacarlos directamente de la colaboración con est aweb. Gracias

Pues resulta que no sale la expresión ! No se si tu puedes, verla pero cuando yo veo la respuesta que te mando, no puedo leer la expresión que debes incluir en el cuadro búsqueda... Mira te deltreo, incluye en el cuadro búsqueda: Menor que... Abrir...

Cierra y puntúa la pregunta.

Ya no... gracias de todas maneras... que estés bien...

Pues sí. Selecciona el párrafo y elige Formato, Fuentes. Y en Estilo de subrayado seleccionas "solo palabras"

Gracias me ha servido bastante

Gracias por la respuesta. He hecho un cambio que espero que haya alguien más que le sirva: wordapp.printout background:=false (para que espere a cerrar hasta que imprima) wordapp.quit (0) (para que no pregunte)

Prueba esto: Sub imprime() Dim WordApp As Object Set WordApp = CreateObject("Word.Application") WordApp.Documents.Open "C:Mis documentospepe.doc" WordApp.Visible = True 'Imprimir el archivo WordApp.PrintOut WordApp.Quit Set WordApp = Nothing End Sub...