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がないのは残念ではあるけど、これはこれで便利
意外とお手軽だし素晴らしいですねぇ
この記事が気に入ったらサポートをしてみませんか?