Ayuda impresión especial..

menu Archivo-Area de impresión.


"JOCKY" escribió en el mensaje
news:

Buenas,
resulta que tengo un archivo que calcula préstamos, el problema és que la
area de impresión son 10 hojas a veces tan solo seran necesarias 2 o 4

p.ej.

Mi pregunta es si hay posibilidad de decir que el area de impresion és

desde

A1: hasta la última celda llena ej. H15, H300, H60

gracias

quizás no me he explicado bien, lo que quiero que detecte el area de
impresion y solo imprima ese area y no las 10 hojas que ocuparia toda el area
de impresión

gracias

Puedes pegar el siguiente código en el módulo del libro (en ThisWorkbook):

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet
If .Name <> "Hoja1" Then Exit Sub 'La hoja que se ajustará será solamente Hoja1
.UsedRange
.PageSetup.PrintArea = .UsedRange.Address
End With
End Sub

En este caso, la hoja cuyo área de impresión se ajustaría al área usada sería Hoja1.
Un saludo.


Fernando Arroyo
MS MVP - Excel


"JOCKY" escribió en el mensaje news:

quizás no me he explicado bien, lo que quiero que detecte el area de
impresion y solo imprima ese area y no las 10 hojas que ocuparia toda el area
de impresión

gracias

Gracias lo probaré