ÿÿCHHVBScriptEngine (General)(Declarations)'(Declarations) ÿ% 'Formel: BETRAG MIT AUSGABE - Zeilenformel 'Beschreibung: Ein Wert wird eingegeben, vorher wird ein Fenster geöffnet, das dazu auffordert. Function Formel () 'Ihre Formel kommt hierher msgbox "Geben Sie den Betrag ein" 'Mit der Funktion msgbox wird ein Fenster geöffnet, unter den beiden Hochkommas (") wird der Text angegeben, der angezeigt werden soll. EingabeBetrag Formel = 1 'successful = Wenn der Wert "Formel" auf 1 gesetzt wird, bedeutet das, das die Abarbeitung der Formel ordnungsgemäß abgeschlossen wurde. End Function 'End of (Declarations)