Discussion:
imprimir a una hora
(demasiado antiguo para responder)
JAGE
2008-03-04 22:27:44 UTC
Permalink
hola alguien sabe una instrucción en vB para poder mandar imprimir un
fichero "(.TXT;.DOC)"etc, en un dia y hora determinado. es para imprimir un
fichero de datos .
Gracias
Héctor Miguel
2008-03-05 04:02:31 UTC
Permalink
hola, !
... una instruccion en vB para poder mandar imprimir un fichero "(.TXT;.DOC)" etc.
en un dia y hora determinado. es para imprimir un fichero de datos
1) si lo quieres desde vba-excel, y excel estara "corriendo" cuando llegue la hora/fecha "determinada" para imprimir...
podrias programar un evento OnTime para ejecutar una macro cuando se llegue "al momento" -?-

2) (por otro lado) imprimir ficheros (.txt, .doc) -> sobre todo por el "etc."... es mas seguro que probable que...
requerira de llamadas a las aplicaciones "apropiadas" (bloc de notas, wordpad, ms-word, mas el "etc.")

3) tambien podrias aprovechar el "programador de tareas" (de windows) que es sumamente amigable

(como siempre)... si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
FRANKLIN ARAGON
2008-03-05 14:18:07 UTC
Permalink
"Hola hector" y perdon JAGE

es q yo tengo un problema parecido.

mi problema es q tengo q imprimir en excel, el problema es q la impresora
esta en otra sala distinta a la q me encuentro asi q tengo q pedir fabor
siempre para q cuando yo llege al lugar de la impresora le den click a la
ventana de imprimir para q lo imprima.

ahora como poder predestinarle a la impresion para q demore unos dos minutos
antes de enviar la imprecion asi le doy la instruccion de imprimir pero me va
a dar tiempo de llegar a la impresora.

espero me aya expresado bien

grasias por su ayuda
Post by Héctor Miguel
hola, !
... una instruccion en vB para poder mandar imprimir un fichero "(.TXT;.DOC)" etc.
en un dia y hora determinado. es para imprimir un fichero de datos
1) si lo quieres desde vba-excel, y excel estara "corriendo" cuando llegue la hora/fecha "determinada" para imprimir...
podrias programar un evento OnTime para ejecutar una macro cuando se llegue "al momento" -?-
2) (por otro lado) imprimir ficheros (.txt, .doc) -> sobre todo por el "etc."... es mas seguro que probable que...
requerira de llamadas a las aplicaciones "apropiadas" (bloc de notas, wordpad, ms-word, mas el "etc.")
3) tambien podrias aprovechar el "programador de tareas" (de windows) que es sumamente amigable
(como siempre)... si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
Héctor Miguel
2008-03-05 21:40:52 UTC
Permalink
hola, Franklin !
... tengo un problema parecido.
... tengo q imprimir en excel... la impresora esta en otra sala... tengo q pedir fabor siempre
para q cuando yo llege al lugar de la impresora le den click a la ventana de imprimir para q lo imprima.
ahora como poder predestinarle a la impresion para q demore unos dos minutos antes de enviar la imprecion
asi le doy la instruccion de imprimir pero me va a dar tiempo de llegar a la impresora...
una alternativa es que uses dos macros para una impresion "programada" (dos minutos despues)
primero, una macro que imprima (p.e.) las hojas seleccionadas del libro activo:

Sub Macro_de_impresion()
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub

segundo, una macro que sera la que ejecutes, mientras te vas a la sala de impresion, lanza la macro 2 mins. despues:

Sub Impresion_programada()
Application.OnTime Now + TimeValue("0:02:00"), "Macro_de_impresion"
End Sub

saludos,
hector.
FRANKLIN ARAGON
2008-03-07 22:21:01 UTC
Permalink
"Hola, Hector!

cual es la instruccion q se le pone a la macro para q inmprima el area de
imprecion ya que no quiero que imprima toda la hoja en ese tiempo q ablamos

grasias por darle seguimiento a mi pregunta
Post by Héctor Miguel
hola, Franklin !
... tengo un problema parecido.
... tengo q imprimir en excel... la impresora esta en otra sala... tengo q pedir fabor siempre
para q cuando yo llege al lugar de la impresora le den click a la ventana de imprimir para q lo imprima.
ahora como poder predestinarle a la impresion para q demore unos dos minutos antes de enviar la imprecion
asi le doy la instruccion de imprimir pero me va a dar tiempo de llegar a la impresora...
una alternativa es que uses dos macros para una impresion "programada" (dos minutos despues)
Sub Macro_de_impresion()
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub
Sub Impresion_programada()
Application.OnTime Now + TimeValue("0:02:00"), "Macro_de_impresion"
End Sub
saludos,
hector.
Héctor Miguel
2008-03-07 23:46:49 UTC
Permalink
hola, Franklin !
cual es la instruccion q se le pone a la macro para q inmprima el area de imprecion
ya que no quiero que imprima toda la hoja en ese tiempo q ablamos...
no se si ya has probado con un simple clic en el boton de impresion (o cualquier metodo de impresion)
que hacen lo mismo que la instruccin .PrintOut
- si la hoja tiene su area de impresion "pre-definida"... <= esta es la que se imprime
- si la hoja NO tiene area de impresion pre-definida... <= se imprime toda la hoja (o sea, el rango usado)

a menos que lo que necesites es (re)definir el area de impresion (para cada hoja ?)...
para lo que puedes indicar el rango a imprimir usando un <hoja>.PageSetup.PrintArea = "c3:h75"
o puedes limpiar el area pre-definida para que se imprima toda la hoja -> .PrintArea = ""

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
FRANKLIN ARAGON
2008-03-11 21:54:00 UTC
Permalink
"Hola; hector!

perdona la insistencia con esta pregunta

pero tengo otro problema no se donde colocor esa instruccion para la macro q
tu me diste me puedes decir donde colocarla y como trabaja para poder
entenderla es q me da un error q dice: No se puede encontrar la macro
“C:\Documents and
Settings\Franklin\Escritorio\prueba.xls’!Macro_de_impresion”.

yo colo q la instruccion en el editor de Bisual basic en Hoja 1 en general.

tu me diste dos macros pero no se por q colocar las dos y en donde y tampoco
se cual es su funcion

si fueras tan amable de aclarar mi duda

grasias
Post by Héctor Miguel
hola, Franklin !
cual es la instruccion q se le pone a la macro para q inmprima el area de imprecion
ya que no quiero que imprima toda la hoja en ese tiempo q ablamos...
no se si ya has probado con un simple clic en el boton de impresion (o cualquier metodo de impresion)
que hacen lo mismo que la instruccin .PrintOut
- si la hoja tiene su area de impresion "pre-definida"... <= esta es la que se imprime
- si la hoja NO tiene area de impresion pre-definida... <= se imprime toda la hoja (o sea, el rango usado)
a menos que lo que necesites es (re)definir el area de impresion (para cada hoja ?)...
para lo que puedes indicar el rango a imprimir usando un <hoja>.PageSetup.PrintArea = "c3:h75"
o puedes limpiar el area pre-definida para que se imprima toda la hoja -> .PrintArea = ""
si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
Héctor Miguel
2008-03-11 22:07:01 UTC
Permalink
hola, Franklin !
... tengo otro problema no se donde colocor esa instruccion para la macro q tu me diste
me puedes decir donde colocarla y como trabaja para poder entenderla
es q me da un error q dice: No se puede encontrar la macro
"'C:\Documents and Settings\Franklin\Escritorio\prueba.xls'!Macro_de_impresion".
yo colo q la instruccion en el editor de Bisual basic en Hoja 1 en general.
tu me diste dos macros pero no se por q colocar las dos y en donde y tampoco se cual es su funcion...
las dos macros de la propuesta anterior deben estar en un modulo de codigo "normal/estandar/general/..."
-> NO en un modulo "de clase", como el de ThisWorkbook, o el de alguna hoja
de lo contrario, no puede ser utilizado por un procedimiento OnTime <= OJO

te (re)transcribo la propuesta de las dos macros (para que veas cual es su intencion/objetivo/"modus operandi"/...)
y si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
una alternativa es que uses dos macros para una impresion "programada" (dos minutos despues)
Sub Macro_de_impresion()
ActiveWindow.SelectedSheets.PrintOut Copies:=1
End Sub
Sub Impresion_programada()
Application.OnTime Now + TimeValue("0:02:00"), "Macro_de_impresion"
End Sub
Loading...