Is it possible to extract just the numeric part of text field?

var text Space = SearchAndReplace(Upper([Store Number]), " ","");
var text A = SearchAndReplace($Space, "A","");
var text B = SearchAndReplace($A, "B","");
var text C = SearchAndReplace($B, "C","");
var text D = SearchAndReplace($C, "D","");
var text E = SearchAndReplace($D, "E","");
var text F = SearchAndReplace($E, "F","");
var text G = SearchAndReplace($F, "G","");
var text H = SearchAndReplace($G, "H","");
var text I = SearchAndReplace($H, "I","");
var text J = SearchAndReplace($I, "J","");
var text K = SearchAndReplace($J, "K","");
var text L = SearchAndReplace($K, "L","");
var text M = SearchAndReplace($L, "M","");
var text N = SearchAndReplace($M, "N","");
var text O = SearchAndReplace($N, "O","");
var text P = SearchAndReplace($O, "P","");
var text Q = SearchAndReplace($P, "Q","");
var text R = SearchAndReplace($Q, "R","");
var text S = SearchAndReplace($R, "S","");
var text T = SearchAndReplace($S, "T","");
var text U = SearchAndReplace($T, "U","");
var text V = SearchAndReplace($U, "V","");
var text W = SearchAndReplace($V, "W","");
var text X = SearchAndReplace($W, "X","");
var text Y = SearchAndReplace($X, "Y","");
var text Z = SearchAndReplace($Y, "Z","");

ToNumber($Z)​