escribir una serie de datos en excel

[ebu]

hola amigos!
tengo problemas para escribir en el excel una serie de datos.
les explico: yo cojo del sw unas ecuaciones como p.e.:
"AL"=200
"D4@Croquis1"="AL"-156
y quiero q en el excel me aparezca los siguiente:

........................A .............................B
1.....................AL ........................ =200
2.............D4@Croquis1...............=AL-156

pero no consigo quitar las ".
hasta el momento este es el codigo q tengo:
For i = 0 To nCount
a = EqnMgr.equation(i) 'aqui va cogiendo las ecuaciones como string
aText = Split(a, "=") 'la ecuacion la separa en dos
k = k + 1
Cells(k, 1) = aText(0)
Cells(k, 2) = aText(1)
next i

y obtengo lo siguiente:
..........................A....................... .......B
1......................"AL"....................... ...200
2..............."D4@Croquis1"............."AL"-156


alguien sabe de alguna otra propiedad como el split para q pueda quitar las " pero no el =. soy principiante y tampoco se muxas mas.
gracias x adelantado!

p.d: los puntos son pa q se diferencien las celdas