Bonjour Eliane de la bas...
Sub decal()
If Not ActiveCell.Row >= 4 Then Exit Sub
Range(ActiveCell, ActiveCell.Offset(-4, 3)).Select
End Sub
J'ai juste testé si la ligne de la cellule active n'est pas < que 4 , sinon on sort sur tableau par le haut, loll
activecell.offset(+/- lignes , +/- colonne)
ça fonctionne donc en négatif et positif mais attention encore à la cellule de départ.
Bye