Turinys
Ištraukite skaitinę eilutės dalį
Ši funkcija ištrauks skaitinę dalį iš eilutės:
Funkcija „Extract_Number_from_Text“ (frazė kaip eilutė) kaip dvigubai šviesi ") Tada Temp = Temp & Mid (frazė, Current_Pos, 1) End if If (Mid (Phrase, Current_Pos, 1) =". ") Tada Temp = Temp & Mid (frazė, Current_Pos, 1) Baigti, jei (IsNumeric (Vidurinė (frazė, dabartiniai_pozicijos, 1))) = tiesa, tada temp = temp ir vidutinė (frazė, dabartinė_pozicija, 1) pabaiga, jei kita dabartinė_pozicija, jei len (temp) = 0, tada ištraukimo_numeris_from_tekstas = 0 kita Pabaigos funkcija
Taigi, pavyzdžiui:
„Extract_Number_from_Text“ („uuigguo 995“) grąžins 995
„Extract_Number_from_Text“ („uuigguo 0.12995“) grąžins 0.12995
„Extract_Number_from_Text“ („yu00.000456“) grąžins 0,000456
= Extract_Number_from_Text („juii -0009.9987iihiii“) grąžins -0.9987
Jei frazėje nėra skaičiaus, grąžinamas nulis.
Norėdami atsisiųsti .XLSM failą iš šio straipsnio, spustelėkite čia.
