Actividad pública reciente
Voto positivo a la respuesta
Restar dos fecha cualquieras
Par esto debes utilizar la función Datediff la cual devuelve el numero de intervalos entre dos fechas. Sería algo como esto : Dim Fecha1 As Date Dim Fecha2 As Date Dim Meses As Integer Private Sub Command1_Click() Fecha1 = Format(Text1, "yyyy/mm/dd")...