Let([

$txt=フィールド; //文字列フィールドを指定
$byt=XX;　　//制限バイト数を指定
$LengthB=”Length($txt & Filter($txt;RomanZenkaku(KanaZenkaku($txt))))”;
$LeftB=”Case(Evaluate($LengthB)<=$byt; $txt; Let([$txt=Left($txt; Length($txt)-1)];Evaluate($LeftB)))”];
Evaluate($LeftB)
)