Ninho não adiciona
Replace(Replace(HomePhone,')',''),'(','')
Veja como a função replace funciona. Ele espera string With Text To Evaluate, string para substituir, string para substituir)
Ao adicioná-los, você deve obter o número listado duas vezes, mas se o tipo de dados não for longo o suficiente, poderá estar truncando valores. aninhando, você está dizendo ao sistema para substituir o ) e, em seguida, usar essa string sem o ) para ter o ( substituído por ''.