Actualizacion datos externos

Buenas tardes, estoy teniendo un pequeño problema con una macro; resulta que tengo una hoja que a traves de un botón actualiza una tabla proveniente de internet, y una vez que actualiza, realiza operaciones (remplaza "." por "," para que me lo pueda leer como número)

Pero resulta que al ejecutarla me he dado cuenta que primero realiza las operaciones y por ultimo actualiza, cuando en realidad el orden es al revés, porque puede ser? Alguno que me oriente porque me desconcertó el problema.

El código que uso es :

ActiveWorkbook.RefreshAll


Dim i, f, final As Integer


'todo


Sheets("Todo").Activate

For i = 2 To 10000

If Cells(i, 1) = "" Then

final = i - 1

Exit For

End If

Next


Range("B2:B" & final, "D2:G" & final).Select



Dim celda As Range

Application.StatusBar = "Convirtiendo celdas seleccionadas a formato de número..."

For Each celda In Selection

    'Se evalua cada celda del rango y se hace la conversión

    celda.Value = CStr(celda)

Next celda

Application.StatusBar = False

[/CODE]

Muchisimas gracias de antemano!!!

Saludos