Nur ein Versuch:
_lst := MeinFeldMitListe ;
_new := @ReplaceSubstring( _lst ; "0" : "1" ....... : "9" ; "~~" ) ;
_lst2 := @Left( _new ; "~~" ) ;
_lst3 := @Left( _lst ; 1 ) ;
_lst4 := @Trim( @ReplaceSubstring( @UpperCase( _lst3 ) ; "A" : "B" ..... : "Z" ; "" ) ) ;
_wert := _lst4 + _lst2 ;
_wert
Nur ein Versuch ohne jeglichen Test !!!
Aber warum keine Schleife?? ??? :-:
Es geht deutlich "einfacher" (Einzeiler für das reine doing) und ohne Schleife:
Liste := "ABC":"DEF":"8HI":"9ER":"XYZ";
Liste_Neu := @Trim(@Transform(Liste;"ListElement";@If(@Contains(@Left(ListElement;1);"0":"1":"2":"3":"4":"5":"6":"7":"8":"9");"";ListElement)));
@Prompt([Ok];"Was kommt da denn raus??";@Implode(Liste_Neu;"*"));
Formula Rulez 8) O0
Der @Transform ist übrigens was das Verarbeiten von Listen angeht wirklich nicht von schlechten Eltern ....
Interessant wäre es auch das so zu schreiben:
Liste := "ABC":"DEF":"8HI":"9ER":"XYZ";
Liste_Neu := @Transform(Liste;"ListElement";@If(@IsNumber(@integer(@Left(ListElement;1)));""; ListElement));
@Prompt([Ok];"Was kommt da denn raus???";@Implode(Liste_Neu;"*"));
Aber da meckert er rum, egal ob man jetzt @textToNumber oder @integer nimmt. Scheinbar funkioniert hier @isnumber nicht richtig.
Da hast du mich gerade noch an was erinnert. Damit kann man dann auch das @trim weglassen:
Liste_Neu := @Transform(Liste;"ListElement";@If(@Contains(@Left(ListElement;1);"0":"1":"2":"3":"4":"5":"6":"7":"8":"9");@nothing;ListElement));
@nothing, auch so eine "neue" Funktion unter V6.