Makro bzw. Funktion definieren

ich habe folgendes Problem. Wie kann ich ein Makro der folgenden Form als Makro bzw. Funktion definieren, so dass ich es einer Schaltfläche zuweisen kann?
zeile=11
=EINGABE(" : ";)
=SOLANGE(AKTIVE.ZELLE()<>"stop")
=WENN(AKTIVE.ZELLE()=Eingabe)
=AUSWÄHLEN("Z"&zeile&"S1:Z"&zeile&"S32")
=AUSWÄHLEN("Z1S1")
=INHALTE.EINFÜGEN(3)
=ABBRECHEN.KOPIEREN()
=belegdruckEng()
=AUSWÄHLEN(!$A$1)
=RÜCKSPRUNG()
=ENDE.WENN()
zeile=zeile+1
=AUSWÄHLEN("z"&zeile&"S1")
=WEITER()
=AUSWÄHLEN(!$A$1)
=RÜCKSPRUNG()
Vielen Dank im voraus.