none
Error 13 cuando ejecuto desde macro Application.WorksheetFunction RRS feed

  • Pregunta

  • Hola a todos,

    Ahora mismo estoy con Excel 2019, al ejecutar los siguiente comandos obtengo el siguiente error y por más que he buscado no le encuentro solución:

    Se ha producido el error '13' en tiempo de ejecución: no coinciden los tipos.

    Dim jan1 As String

    Debug.Print Application.WorksheetFunction.ISOWeekNum("26/12/2020") jan1 = Application.WorksheetFunction.ISOWeekNum("26/12/2020")


    El error me da tanto en el Debug.Print como en la asignación.

    ¿Qué hago mal? o ¿no funciona Application.WorksheetFunction?

    Muchas gracias por adelantado.

    martes, 18 de junio de 2019 15:23

Todas las respuestas

  • Hola

    Según la documentación que puedes ver aquí, el parámetro de fecha tiene que ser doble.

    Prueba a pasarle la fecha convertida a doble, usando por ejemplo la función DateSerial y la función de conversión Cdbl

    Salu2,


    José Mª Fueyo

    miércoles, 19 de junio de 2019 10:36