¿como diseñar esta macro?

06/01/2006 - 23:38 por Ramón | Informe spam
Saludos a la comunidad
Debido a que tengo que poner una información generada en un archivo pdf a
excel para imprimirla en un formato, al copiarla en excel me pone los cuatro
datos juntos y yo necesito separarlos, por ejemplo, ya una vez copiados los
datos los pongo en la celda A1, BB0484 50 lavavajillas 88.75; ahora
necesito copiar BB0484 a la celda F11, 50 a la F12, lavavajillas a la G11 y
88.75 a la G15. Antes de copiar el 88.75 debo insertar espacios en blanco
entre este valor y lavavajillas ya que la descripción del producto puede ser
hasta de 35 caracteres. Si lo hago con el grabador de macros, me deja grabado
estos valores y cuando necesito tomar otros, siempre me aparecen los
iniciales.
Agradesco de antemano la valiosa ayuda

Ramón
 

Leer las respuestas

#1 Héctor Miguel
07/01/2006 - 06:36 | Informe spam
hola, Ramón !

... ejemplo... en la celda A1, BB0484 50 lavavajillas 88.75
... necesito copiar BB0484 a la celda F11, 50 a la F12, lavavajillas a la G11 y 88.75 a la G15
Antes de copiar el 88.75 debo insertar espacios en blanco entre este valor y lavavajillas
ya que la descripcion del producto puede ser hasta de 35 caracteres.
... con el grabador de macros, me deja grabado estos valores y cuando necesito tomar otros [...]



no estoy seguro de si 'realmente' necesitas utilizar macros -?-
suponiendo que no... prueba con las siguientes formulas...
[F11]...
=izquierda(a1,hallar(" ",a1)-1)
[F12]...
=extrae(a1,hallar(" ",a1)+1,hallar(" ",sustituir(a1," ","",1))-hallar(" ",a1))
[G11]...
=extrae(a1,hallar(" ",sustituir(a1," ","",1))+2,buscar(2,1/(extrae(a1,fila(indirecto("1:100")),1)=" "),fila(indirecto("1:100")))-hallar(" ",sustituir(a1," ","",1))-2)
[G15]...
=derecha(a1,largo(a1)-hallar("|",sustituir(a1," ","|",largo(a1)-largo(sustituir(a1," ","")))))

solo toma en cuenta que mi sistema usa como separador de argumentos a la coma ',' NO al punto y coma ';' :D
y si requieres que los resultados en 'F12' y 'G15' sean considerados como valores numericos...
-> agrega un doble-menos despues del signo '=' p.e. 'F12' =--extrae(a1,hallar(" ",a1)+1,hallar(" ",sustituir(a1," ","",1))-hallar(" ",a1))

saludos,
hector.

Preguntas similares