Dim Impresora As Printer
' mImpresora es String y es ele nómbre de la impresora
Etiqueta.Caption = "Imprimiendo en " & mImpresora
' esto es para seleccionar impresora
For i = 0 To Printers.Count - 1
If Printers(i).DeviceName = mImpresora Then
Set Impresora = Printers(i)
Exit For
End If
Next i
' Distancias(x,y) es Integer
' AQUÍ ES EL PROBLEMA
Impresora.CurrentX = Distancias(1, 1)
Impresora.CurrentY = Distancias(1, 2)
Impresora.Print mEncabezado.Nombre
Impresora.CurrentX = Distancias(3, 1)
Impresora.CurrentY = Distancias(3, 2)
Impresora.Print mEncabezado.Dir1
' ***** Continúa *******
Resulta que Impresora.CurrentX, me da un Run-Time Error '383', que dice que la propiedad es de solo lectura...
¿Que podrá ser?
¿Faltará algún componente o referencia?



