como insertar funcion de concatenar
Publicado por Noe (48 intervenciones) el 07/03/2009 04:44:26
hola foro !!
espero me puedan ayudar con un programita estoy exportando una tabla de Visual Fox v7.0 hacia Excel todo esta correcto . pero deseo concatenar 2 columnas (P y Q y dejarlo en R) se que con =P2&Q2 o =CONCATENATE(P1,q2) lo concatena pero como le inserto la formula a todos los registros tengo este codigo
close data all
select 1
use datos
export to c:SerUrbdatos type xl5
oExcel=createobject('excel.application')
with oExcel
.workbooks.open("datos")
.activeworkbooks.activesheet.usedrange.columns.autofit
.range("r2").select
for a = 1 to 50
***aqui como es la forma de ir incrementando las lineas para poder utilizar
***=p2&q2
***=concatenate(p2,q2)
endfor
.activeworkbooks.save
workbooks.close
oExcel=.null.
Gracias espero respuesta
saludo.
espero me puedan ayudar con un programita estoy exportando una tabla de Visual Fox v7.0 hacia Excel todo esta correcto . pero deseo concatenar 2 columnas (P y Q y dejarlo en R) se que con =P2&Q2 o =CONCATENATE(P1,q2) lo concatena pero como le inserto la formula a todos los registros tengo este codigo
close data all
select 1
use datos
export to c:SerUrbdatos type xl5
oExcel=createobject('excel.application')
with oExcel
.workbooks.open("datos")
.activeworkbooks.activesheet.usedrange.columns.autofit
.range("r2").select
for a = 1 to 50
***aqui como es la forma de ir incrementando las lineas para poder utilizar
***=p2&q2
***=concatenate(p2,q2)
endfor
.activeworkbooks.save
workbooks.close
oExcel=.null.
Gracias espero respuesta
saludo.
Valora esta pregunta


0