Microsoft Access 掲示板

Microsoft Access 掲示板

文字と数字のデータを分けたい / 11

14 コメント
views
4 フォロー
11
hiroton 2023/08/04 (金) 14:30:03 d10a0@f966d >> 7

もうちょっと頭を柔らかくしてみる

式1: Val("0" & Mid([フィールド],InStr(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace([フィールド] & "{}","0","{}"),"1","{}"),"2","{}"),"3","{}"),"4","{}"),"5","{}"),"6","{}"),"7","{}"),"8","{}"),"9","{}"),"{}")))

無理やり短くする

式2: Val("0" & Mid([フィールド],Ｅｖａｌ("InStr(" & Replace("//////////","/","Replace(") & """" & [フィールド] & "{}"", " & Replace("""0/1/2/3/4/5/6/7/8/9/","/",""", ""{}""), """) & "{}"")")))

※Ｅｖａｌは～（略）
通報 ...
  • 13
    hiroton 2023/08/05 (土) 09:24:14 9fcae@2ee8f >> 11

    そもそも「数字」を見つけたいのだから「間違ってヒットしてしまわないような単語（{}）を用意する必要はなく、ヒットさせる文字自体も変換する必要ないのだからもっと短くなるね

    式1: Val("0" & Mid([フィールド],InStr(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace(Replace([フィールド] & "0","1","0"),"2","0"),"3","0"),"4","0"),"5","0"),"6","0"),"7","0"),"8","0"),"9","0"),"0")))

    まだまだ頭が固い証拠