Zeile nach oben springen

Hallo,
habe folgendes Problem:
habe ein Makro geschrieben, dass mir einen bestimmten Namen aus einer Tabelle raussucht. Jetzt will ich aber, sobald er den Namen gefunden hat, auch die Überschrift zu dem Namen in eine extra Variable schreiben, dazu soll er ab der Zeile, in der er den Namen gefunden hat immer eine Zeile nach oben gehen, bis er die Überschrift gefunden hat. Jetzt bräucht ich nur den Befehl, um eine Zeile höher zu springen, damit ich das in eine Schleifen schreiben kann die dann ungefähr so aussieht:

do
spring zeile höher
Ueberschrift = ActiveCell.Value

loop until Ueberschrift = "Familie Maier"