Gracias
Reglas de conducta de los grupos de noticias:
http://support.microsoft.com/default.aspx?scid=fh;ES-ES;newsreglas
"tomeu" <bto...@hotmail.com> escribió en el mensaje
news:%237J2See...@TK2MSFTNGP09.phx.gbl...
Puedes seleccionar un rango de varias formas, pero en el caso de que las filas y columnas iniciales y finales sean variables puedes usar la propiedad Cells, p.ej.;
Sub prueba()
Dim FilaInicial As Long, FilaFinal As Long
Dim ColumnaInicial As Byte, ColumnaFinal As Byte
Dim rango As Range
FilaInicial = 1
FilaFinal = 20
ColumnaInicial = 3
ColumnaFinal = 7
Set rango = Range(Cells(FilaInicial, ColumnaInicial), Cells(FilaFinal, ColumnaFinal))
MsgBox rango.Address
End Sub
Un saludo.
Fernando Arroyo
MS MVP - Excel