PowerAppsで全角を半角にする

VBAみたいに便利な関数はないみたい、対応表作って自作がベスト?

OnStartあたりにこれ仕込んでおく

ClearCollect(_W_N_,
    {W:"0",N:"0"},
    {W:"1",N:"1"},
    {W:"2",N:"2"},
    {W:"3",N:"3"},
    {W:"4",N:"4"},
    {W:"5",N:"5"},
    {W:"6",N:"6"},
    {W:"7",N:"7"},
    {W:"8",N:"8"},
    {W:"9",N:"9"},
    {W:"A",N:"A"},
    {W:"B",N:"B"},
    {W:"C",N:"C"},
    {W:"D",N:"D"},
    {W:"E",N:"E"},
    {W:"F",N:"F"},
    {W:"G",N:"G"},
    {W:"H",N:"H"},
    {W:"I",N:"I"},
    {W:"J",N:"J"},
    {W:"K",N:"K"},
    {W:"L",N:"L"},
    {W:"M",N:"M"},
    {W:"N",N:"N"},
    {W:"O",N:"O"},
    {W:"P",N:"P"},
    {W:"Q",N:"Q"},
    {W:"R",N:"R"},
    {W:"S",N:"S"},
    {W:"T",N:"T"},
    {W:"U",N:"U"},
    {W:"V",N:"V"},
    {W:"W",N:"W"},
    {W:"X",N:"X"},
    {W:"Y",N:"Y"},
    {W:"Z",N:"Z"},
    {W:"a",N:"a"},
    {W:"b",N:"b"},
    {W:"c",N:"c"},
    {W:"d",N:"d"},
    {W:"e",N:"e"},
    {W:"f",N:"f"},
    {W:"g",N:"g"},
    {W:"h",N:"h"},
    {W:"i",N:"i"},
    {W:"j",N:"j"},
    {W:"k",N:"k"},
    {W:"l",N:"l"},
    {W:"m",N:"m"},
    {W:"n",N:"n"},
    {W:"o",N:"o"},
    {W:"p",N:"p"},
    {W:"q",N:"q"},
    {W:"r",N:"r"},
    {W:"s",N:"s"},
    {W:"t",N:"t"},
    {W:"u",N:"u"},
    {W:"v",N:"v"},
    {W:"w",N:"w"},
    {W:"x",N:"x"},
    {W:"y",N:"y"},
    {W:"z",N:"z"}
);

変換したいやつにはこんな感じ
(PowerAppsの仕様変更で Result → Value に変更が必要になったので訂正、小鳥さんありがと!)

With({_string_: "Power Apps 365"},
    Concat(Split(Trim(_string_), ""),
        Coalesce(LookUp(_W_N_, W = Value).N, Value)
    )
)

StrConvとかASCがないのは残念ではあるけど、これはこれで便利
意外とお手軽だし素晴らしいですねぇ

この記事が気に入ったらサポートをしてみませんか?