そもそも「数字」を見つけたいのだから「間違ってヒットしてしまわないような単語({}
)を用意する必要はなく、ヒットさせる文字自体も変換する必要ないのだからもっと短くなるね
式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")))
まだまだ頭が固い証拠
通報 ...