Equivalencia de funciones
Publicado por Pablo (42 intervenciones) el 16/05/2009 10:07:12
Tengo un pequeño problema.
Convierto un string en un número único de manera que me diferencie hoLa de Hola y puedo encontrar coincidencias únicas con la función buscarv.
Usando la función código, derecha e izquierda voy separando cada uno de los elementos del string que siempre tiene cinco caracteres.
Para el primer elemento sería: CODIGO(DERECHA(IZQUIERDA(DERECHA($K2;5);5);1))
Luego voy elevando ese número a las diferentes potencias de 256 y hago la suma.
Bien, mi problema es:
Quiero hacer una función personalizada para evitar que esa fórmula tenga cinco renglones, así es que he hecho (para el primer elemento):
Dim String as Variant
Dim Char1 as Variant
Char1 = CODE(Right(Left(String, 1), 1))
pero me da error.
He intentado encontrar equivalencias entre las funciones de Excel y las de VBA y no las encuentro.
agradezco vuestros comentarios de antemano.
Convierto un string en un número único de manera que me diferencie hoLa de Hola y puedo encontrar coincidencias únicas con la función buscarv.
Usando la función código, derecha e izquierda voy separando cada uno de los elementos del string que siempre tiene cinco caracteres.
Para el primer elemento sería: CODIGO(DERECHA(IZQUIERDA(DERECHA($K2;5);5);1))
Luego voy elevando ese número a las diferentes potencias de 256 y hago la suma.
Bien, mi problema es:
Quiero hacer una función personalizada para evitar que esa fórmula tenga cinco renglones, así es que he hecho (para el primer elemento):
Dim String as Variant
Dim Char1 as Variant
Char1 = CODE(Right(Left(String, 1), 1))
pero me da error.
He intentado encontrar equivalencias entre las funciones de Excel y las de VBA y no las encuentro.
agradezco vuestros comentarios de antemano.
Valora esta pregunta
0
