Problema con Cadenas

17/06/2005 - 03:10 por diegoar | Informe spam
buenas, necesito ayuda. Terngo esta funcion que me devuelve una cadena
de extrarla de otra de este tipo AAAA - xxxxxx, devoleviendome AAAAA.
Ahora necesito otra que haga lo contrario, que me devuelva la parte
despues del "-". Gracias


devuelveid = (Left(aux, InStr(aux, " - ") - 1))


saludos


Responder

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
17/06/2005 - 06:15 | Informe spam
hola, diego !

... esta funcion... me devuelve una cadena... de otra de este tipo AAAA - xxxxxx, devolviendome AAAAA.
... necesito otra que haga lo contrario, que me devuelva la parte despues del "-". Gracias
... devuelveid = (Left(aux, InStr(aux, " - ") - 1))



devuelveid = Mid(aux, InStr(aux, " - ") + 3)

o... si prefieres usar 'directamente' funciones de hoja de calculo EN la hoja de calculo [p.e. de A1]
[para la parte de la izquierda] =izquierda(a1,hallar(" - ",a1)-1)
[para la parte de la derecha] =extrae(a1,hallar(" - ",a1)+3,255)

saludos,
hector.
Respuesta Responder a este mensaje
#2 diegoar
17/06/2005 - 11:38 | Informe spam
querido hector, obviamente sigo con los problemas de las referencias
perdidas de las funciones basicas de vba, por lo tanto mid, no la
reconoce. Ahora, no existe forma de uqe con la misma funcion que yo
estaba usando
devuelveid = (Left(aux, InStr(aux, " -
") - 1))

en vez de buscar hasta el - , busque hasta el fin de linea y ahi voy
apoder seguir usando Left qeu si la reconoce

espero me puedas sacar de este apuro...gracias
Respuesta Responder a este mensaje
#3 Héctor Miguel
18/06/2005 - 04:55 | Informe spam
hola, diego !

... sigo con los problemas de las referencias perdidas de las funciones basicas de vba
... mid, no la reconoce... existe forma de que con la misma funcion que... estaba usando
... devuelveid = (Left(aux, InStr(aux, " - ") - 1))
en vez de buscar hasta el - , busque hasta el fin de linea y... poder seguir usando Left que si la reconoce



si no funciona 'mid'... pero si funciona 'left'... -???-
[espero que tambien funcionen 'right' y 'len'] :DD
op1: devuelveid = Right(aux, Len(aux) - InStr(aux, " - ") - 2)

en caso 'contrario'... [creo que] siempre podras 'echar mano' del metodo evaluate [p.e.:
op2: devuelveid = Evaluate("mid(""" & aux & """,find("" - "",""" & aux & """)+3,255)")
-> solo no olvides que 'representar' comillas dobles dentro de cadenas de texto en vba...
requiere [en ocasiones] de 'dobles comillas dobles'... a veces 'triples'... y hasta 'cuadruples' :))

saludos,
hector.
Respuesta Responder a este mensaje
#4 diegoar
18/06/2005 - 05:16 | Informe spam
hector, mira te cuento. Con el temaq de las fucniones que no me andaban
(como mid, right etc) es que tenia referencias ausentes. Las busque en
la web, las incorpore y salio andando todo. Ahora yo te pregunto: las
referencias son propias de cada maquina o cada archivo tiene sus
propias referencias??. Te explico poruqe: yo voy a ejecutar mi sistema
en 36 maquinas diferentes y no se que referencias van atener en cada
maquina, por lo tanto, yo tengo que usar funciones comunes. Ahora si
las referencias son del propio archivo, independientemente de la
maquina donde se ejecuta, se me soluciona el problema. Pero de no ser
asi, podria cargar las referencias dinamincamente cuadno abre el
archivo????

espero que me puedas dar una mano...

saludos
Respuesta Responder a este mensaje
#5 Héctor Miguel
18/06/2005 - 06:16 | Informe spam
hola, diego !

... de las funciones que no me andaban (como mid, right etc)... tenia referencias ausentes
... busque en la web, las incorpore y salio andando todo
... las referencias son propias de cada maquina o cada archivo tiene sus propias referencias??
... yo voy a ejecutar... en 36 maquinas diferentes y no se que referencias van a tener en cada maquina
... por lo tanto, yo tengo que usar funciones comunes
... si las referencias son del propio archivo... se me soluciona el problema
... de no ser asi, podria cargar las referencias dinamicamente cuando abre el archivo????



[hasta donde se]... las referencias son 'enlaces' [generalmente] a librerias de objetos/vinculos dinamicos/... etc.
'son' componentes que [OPCIONALMENTE] se 'cargan/copian/...' desde el momento de instalar una aplicacion
[por lo tanto] los 'archivos' [o proyecto de macros] SOLO 'hacen uso' de las librerias INSTALADAS [en cada pc]
aunque se [por referencias] de empresas/usuarios que hacen instalaciones 'recortadas' de las aplicaciones...
donde 'NI SIQUIERA' instalan los archivos de ayuda en linea... [ya no digamos que instalen los componentes vba]
[quizas por 'ahorrarse' espacio... o quiza por 'politica' de la empresa] -???-
[de momento] no 'recuerdo' que una vez instalados los componentes vba... 'fallen' las llamadas a las funciones 'basicas' :-(
probablemente [como en tu caso] algun 'agente externo' hubiera corrompido/eliminado/... dichos componentes -parcialmente?-
existen algunas librerias 'especiales'... donde la version 'instalada' del componente necesario pudiera 'hacer la diferencia'
[es decir... que funcionen o no en instalaciones con versiones 'anteriores' del componente]... como ADO, DAO [y 'similares']
en cuyo caso, la 'recomendacion' [general] es... 'programar en la version mas baja -conocida-' con la que se vaya a 'trabajar :-)
[me temo que]... si necesitaras 'asegurarte' que las librerias 'necesarias'... 'existan'... en las 36 maquinas... -????-

[seguramente] el tema 'da para mas'... pero... no tengo idea de cuales son los requerimientos de uso que tienes en mente ;)

saludos,
hector.
Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaSiguiente Respuesta Tengo una respuesta
Search Busqueda sugerida