¿Cómo puedo mover la selección hacia abajo una fila en Excel 2007?

Parece que sólo necesitas algo como esto:

Sub moveselection()

Selection.Offset(1, 0).Select

End Sub

Esto moverá su selección una fila hacia abajo sin cambiar el tamaño de la selección.

(a) Ese código no se mueve hacia abajo una fila como en la pregunta

(b) Sólo funcionará en la primera fila de una selección, ¿quieres que funcione en una selección de varias filas?

© En lugar de llamar a un sub para esto, podría ejecutarlo automáticamente haciendo clic con el botón derecho del ratón - puede hacerlo añadiendo haciendo clic con el botón derecho en la pestaña de su hoja, Ver Código, y pegando el código de abajo

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
    On Error Resume Next
    Range("E" & CStr(Selection.Row) & ":" & "GN" & CStr(Selection.Row)).Select
End Sub

Una alternativa que utiliza argumentos con nombre, y es, por tanto, mucho más clara, es algo así

ActiveCell.Offset(rowOffset:=1, columnOffset:=0).Activate

Un rowOffset positivo mueve la selección hacia abajo en la hoja, un rowOffset negativo mueve hacia arriba el número de filas especificado, y un offset cero deja la fila en la que reside la selección sin cambios.

Del mismo modo, los desplazamientos positivos mueven la selección hacia la derecha, mientras que los desplazamientos negativos la mueven hacia la izquierda. El cero, por supuesto, deja la columna sin cambios.

Ver Propiedad Range.Offset (Excel)

Dos descubrimientos relacionados pueden también ser de interés para los futuros visitantes.

1. Haz lo siguiente para insertar una columna. Selection.EntireColumn.Insert y tenga cuidado con Range.Insert, que genera el error de ejecución 1004, al menos en algunas circunstancias, como las hojas de trabajo protegidas (incluso con la inserción de columnas permitida mientras está protegida).
2. El método que acabamos de describir deja el punto de inserción en la nueva columna, lo que no noté hasta que llegué aquí en busca de un método para mover la selección (¡sólo para descubrir que no lo necesitaba!).

Ok,

El cursor tiene que estar en la fila y los rangos “E” y “GN” necesitan ser ajustados para diferentes columnas pero me ahorra algo de tiempo:

Sub SelectRange()

  Dim RowNumber As Integer

  RowNumber = Selection.Row
  Range("E" & CStr(RowNumber) & ":" & "GN" & CStr(RowNumber)).Select

End Sub