In diesem Beispiel verwendet Microsoft Excel in Sheet1 die Lotus 1-2-3-Regeln zur Formeleingabe.
Worksheets("Sheet1").TransitionFormEntry = True