Foro de Ayuda Excel | ||
| Soluciona tus problemas con Excel |
|
#1
| |||
| |||
| Hola, estoy imprimiendo unos formularios que toman datos de planilla excel, ahora, necesito imprimir en distintas impresoras y resulta que el metodo PrintForm imprime solo en la impresora predeterminada en Windows. Para solucionar esto encontré ActivePrinter, que por definicion devuelve o establece el nombre de la impresora activa. String de Lectura/Escritura. El problema es que simpre termina imprimiendo en la misma impresora (la predeterminada por windws, no se efectuan cambios. Alguien logra ver el problema? Desde ya muchas gracias. impActual = Application.ActivePrinter impNueva = "canon pixma ip1000 en ne02:" Application.ActivePrinter = impNueva FormPrueba.PrintForm |
|
#2
| |||
| |||
| Hola, ese tipo de configuracion solo lo puedes hacer usando el API de Windows, es decir las funciones del sistemas, eso lo logras con la función DECLARE que te permite "insertar" las funciones del SO a tu código VBA. Ahorita estoy un poquitín ocupado y no te puedo ayudar de lleno, pero a mediados de la otra semana saco un ratico a ver como es la cosa. Por tu cuenta puedes averiguar "Windows API" y es simplemente que te busques que función cambia la Impresora predeterminada y juegas con eso. Suerte con eso...
__________________ Aquel que pregunta es un tonto por cinco minutos, pero el que no pregunta permanece tonto por siempre. http://vbaycpp.blogspot.com/ |
|
#3
| |||
| |||
| Hola prueba con esto... Código:
Sub SetDefaultPrinter(ByVal ImpName As String)
Dim MyImpresora As Object
Set MyImpresora = CreateObject("WScript.Network")
MyImpresora.setdefaultprinter ImpName
End Function
__________________ Aquel que pregunta es un tonto por cinco minutos, pero el que no pregunta permanece tonto por siempre. http://vbaycpp.blogspot.com/ |
| Herramientas | |
| Desplegado | |
| |