Imprimir

23/05/2009 - 10:32 por Luis | Informe spam
Hola de nuevo:
Tengo una macro para imprimir las celdas no vacias, lo consigo siempre que
halla formulas ó la celda este determinada por lineas.
pdria imprimir sólo las que tiene un valor numerico >=1
gracias anticipadas
Luis

esta es mi macro

Sub Nueva()
Worksheets("hoja6").Activate
x = ActiveCell.Row
y = ActiveCell.Column
z = 0
Do While Cells(x, y).Value <> ""
x = x + 1
z = z + 1
Loop

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
 

Leer las respuestas

#1 Luis
23/05/2009 - 14:09 | Informe spam
"Luis" escribió:

Hola de nuevo:
Tengo una macro para imprimir las celdas no vacias, lo consigo siempre que
NO halla formulas ó la celda este determinada por lineas.
podria imprimir sólo las que tiene un valor numerico >=1?
gracias anticipadas
Luis

esta es mi macro

Sub Nueva()
Worksheets("hoja6").Activate
x = ActiveCell.Row
y = ActiveCell.Column
z = 0
Do While Cells(x, y).Value <> ""
x = x + 1
z = z + 1
Loop

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub

Preguntas similares