Visual Basic para Aplicaciones - Sobre VBA y EXCEL

Alguien sabe como puedo arreglarlo ?
El problema es este :

Tengo una instruccion que me crea una hoja (Sheet) en mi documento
luego a esa hoja, con un ciclo for, le pone a cada columna El nombre
del Campo que corresponde

y con otro ciclo for relleno la Tabla con los valores de los campos
pero el problema se presenta cuando el dato a llenar es de tipo Numero
pues cuando se crea el primer registro,este formato se respeta para esa celda , pero cuando se introduce otro registro,ya no respeta
el formato porque ??

Solo funciona la primera Vez..
La instruccion que uso es algo como esto ( una idea )

For i = 1 to 3
if i = 3 then
cells(fila,i).Numberformat="0.00"
end if
columns(2,i).value = Choose(i,Texto,texto, numero)
next

Para las demas veces - 2 en adelante -, excel me recomienda que
cambie el formato de estas celdas a tipo numero ...(Manualmente)
esto es lo que quiero evitar..

Gracias por su ayuda...