Jump to content

pasar formula como funcion personalizada


Recommended Posts

Me ha parecido que en tu archivo adjunto la UDF que tienes es para extraer el texto.

Esta UDF te puede servir.

Function ExtraeTexto(Txt As String)
With CreateObject("VBScript.RegExp")
.Pattern = "\d+"
.Global = True
ExtraeTexto = .Replace(Txt, "")
End With
End Function[/PHP]

Link to comment
Share on other sites

gracias obed, solo que me gustaria saber si se puede pasar fácilmente de la fórmula en ingles a una funcion directamente por ejemplo para la funcion que pretendo resolver :

Function formulafun(Cadena As Range) As String

con formula es en la celda A9

=SI(ESERROR(ENCONTRAR("/",(IZQUIERDA(A9,(IZQUIERDA((ENCONTRAR((extraernumeros(A9)),A9))))-1)))),(IZQUIERDA(A9,(IZQUIERDA((ENCONTRAR((extraernumeros(A9)),A9))))-1)),IZQUIERDA((IZQUIERDA(A9,(IZQUIERDA((ENCONTRAR((extraernumeros(A9)),A9))))-1)),ENCONTRAR("/",(IZQUIERDA(A9,(IZQUIERDA((ENCONTRAR((extraernumeros(A9)),A9))))-1)))-1))

esta formula es la que me funciona correctamente para lo que pretendo su equivalente en ingles es:

=IF(ISERROR(FIND("/",(LEFT(A9,(LEFT((FIND((extraernumeros(A9)),A9))))-1)))),(LEFT(A9,(LEFT((FIND((extraernumeros(A9)),A9))))-1)),LEFT((LEFT(A9,(LEFT((FIND((extraernumeros(A9)),A9))))-1)),FIND("/",(LEFT(A9,(LEFT((FIND((extraernumeros(A9)),A9))))-1)))-1))

ahora solo quiero saber si se puede expresar como funcion sin modificarla en su formato en ingles, pensaba yo que seria asi:

formulafun = formulafun & "formula en ingles"....de tal manera que hice este intento

formulafun = formulafun & IF(ISERROR(FIND("/",(LEFT(cadena,(LEFT((FIND((extraernumeros(cadena)),cadena))))-1)))),(LEFT(cadena,(LEFT((FIND((extraernumeros(cadena)),cadena))))-1)),LEFT((LEFT(cadena,(LEFT((FIND((extraernumeros(cadena)),cadena))))-1)),FIND("/",(LEFT(cadena,(LEFT((FIND((extraernumeros(cadena)),cadena))))-1)))-1))

solo que no me funciona no se porque, en otro caso si me resulto como en ejemplo 1 con

formulafunejemplo = formulafunejemplo & Mid$(Cadena, 1, 3)

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Crear macros Excel

  • Posts

    • Pues tienes toda la razón.  Mucho más simplificado. ¡GRACIAS!
    • Que tal, verificando la consulta no veo necesidad de duplicar la Tabla de Reparto, dado que se puede simplemente agregar una columna (Importe total) con la siguiente fórmulación: =SUMAR.SI(Consumos!AR$2:AR$8;[@[Nombre completo]];Consumos!AK$2:AK$8)*[@[%]] Espero les sea útil.
    • Hola de nuevo por aquí. Sigo con el fichero de consumos y con problemas. Ayer me ayudasteis y mucho a determinar los conductores y sus consumos. Ahora lo que necesito es lo siguiente. Tengo una tabla donde los empleados imputan de manera porcentual a distintas ordenes de trabajo. Está en la hoja Reparto. Veréis que por ejemplo el primer empleado reparte un 50 a una OT y otro 50 a otra. El segundo empleado imputa un 40 a una OT y otro 60 a otra y el tercero imputa un 25 a una OT, un 65 a otra y un 10 a otra. Esto desglosarlo es un autentico lío, y cada mes me emplea muchísimo tiempo . Lo que quisiera es que en la hoja que le he llamado desglose me creara una tabla o en la que he hecho y me calculara el consumo de combustible de cada empleado teniendo en cuenta la OT y su porcentaje. He creado la tabla y he puesto los importes que deberían salir. Los importes de cada consumo están en la hoja Consumos en la columna AK (IMP_TOTAL). Por ejemplo en la hoja Desglose el primer empleado sería GARCIA FERNANDEZ, VICENTE y a la OT 11000001 tendría un importe de 28,70 euros ya que en la hoja Reparto decimos que imputa un 50 a esa OT y el consumo total de ese empleado de la hoja Consumo es de 57,40 euros. Y así con el resto. He puesto una tabla para que sea dinámico y si hay más consumos o empleados se vaya actualizando dinámicamente, o eso creo. Lo que no veo claro es que busque y autorrellene con formulas la tabla sin hacerlo con macros. Al menos para mi se me hace muy difícil ver la posibilidad. No tengo claro si he conseguido explicarme, cualquier duda os respondo. Y como siempre muy agradecido por vuestro tiempo y compartir tan hábiles conocimientos, y además de manera desinteresada y amable. Gracias.   Ejemplo consumos combustible sq.xlsx
    • Hola, yo también tengo el mismo problema, ¿podrías decir cómo lo solucionaste, por favor? :c
    • Hola Oscar, funciona perfectamente. He probado igual que con Silvia e independientemente del orden o incluso mezclando fechas funciona bien.   Gracias.  
  • Recently Browsing

    • No registered users viewing this page.
×
×
  • Create New...

Important Information

Privacy Policy