Outra abordagem:
Pressione Alt F8 Clique em Novo e deve abrir o editor de código, cole este
function stripToInteger(s as string) nums="0123456789" stripToInteger="" for i=1 to len(s) if instr(1,nums,mid(s,i,1))>0 then stripToInteger=stripToInteger+mid(s,i,1) endif next end function
O uso é como
=STRIPTOINTEGER("oi123oi12po3i")
que deve exibir 123123
(ele faz no meu LibreOffice ;-p).
Em seguida, use TEXT(reference,"000-0000")
ou similar para exibi-lo em um formato legal.