Expertos es posible modificar un rango a copiar en una macro

Expertos tengo la siguiente macro que copia cierta cantidad de rangos, pero quisiera que la cantidad de rango lo dictaminara una celada, todos los datos comienzan desde a19.-

Range("A19:C517").Select
Selection.Copy
Sheets("PASO 2").Select
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("INFORME").Select
Application.DisplayAlerts = False