Macro para seleccionar datos variables e imprimir en excel vba
Como puedo seleccionar rango de datos viarables de fila y columna, sabiendo que tengo formulas en filas hasta 800 y columna hasta AG.
Desde otra hoja ingreso datos y se reflejan en esta hoja los resultados.
Como resultado es seleccionar el rango de datos como muestro en el ejemplo A6:Q12, como varía puede ser A6:AD600, etec.
Y luego mostrar una vista previa para impmir por selección gracias por anticipado
1 Respuesta
Respuesta de Dante Amor
2
Prueba la siguiente:
Sub seleccionaRango()
'Por Dante Amor
Dim uFil As Long, uCol As Long
Dim rng As Range
With ActiveSheet
uFil = .Range("A6", .Cells(.Rows.Count, .Columns.Count)).Find("*", , xlValues, , xlByRows, xlPrevious).Row
uCol = .Range("A7", .Cells(.Rows.Count, .Columns.Count)).Find("*", , xlValues, , xlByColumns, xlPrevious).Column
Set rng = .Range("A6", .Cells(uFil, uCol))
rng.Select
.PageSetup.PrintArea = rng.Address
.PrintPreview
End With
End Sub
