Calcula dias naturales - 30 de Noviembre 2012 - Solo codigos

Bienvenido(a) Visitante | RSS

Mi sitio

Inicio » » Calcula dias naturales

9:34 PM

Calcula dias naturales

    Function Dias_Naturales(ByVal fechaIni As Date, ByVal sDias As Integer) As Date
        fechaIni = Format("dd/MM/yyyy", fechaIni)
        'Dias_Naturales = DateDiff(("d"), fechaIni, fechaFin)
        Dias_Naturales = DateAdd(DateInterval.Day, sDias, fechaIni)
    End Function