Restar dos fecha cualquieras

La idea es restar dos fecha que están en dos textbox y restarlos
De modo que el resultado en un tercer textbox de en meses.

1 respuesta

Respuesta
5
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")
     Fecha2 = Format(Text2, "yyyy/mm/dd")
     Meses = DateDiff("m", Fecha2, Fecha1)
     Text3 = Format(Meses, "###0")
End Sub
Si fuesen días entonces se utiliza "d" y para años "yyyy"
Para las fechas recomiendo un control como el Datapicker (Mscomctl2.Ocx) el cual se agrega por componentes y no es necesario validar las fechas pues no deja insertar fechas erradas. Se agrega al proyecto por :
Componentes
     Microsoft Windows Common Controls 5.0 (SP2)
Suerte !
El control Datapicker se agrega por :
Proyecto
    Componentes
              Microsoft Windows Common Controls-2 6.0 (SP2)
Suerte !
ifrancoz te agradezco tu dedicación, la ayuda me sirvió de mucho
Y que el compromiso por la programación nunca termine.
ATT: fagolo

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Crystal Report - Fechas

Tengo diseñado un archivo Crystal Report pero cuando le paso la consulta que selecciona entre qué fechas deseo imprimir los datos, con SelectionFormula, me da un error en la fórmula. ¿Cómo soluciono esto?
2 respuestas

Macro filtrar rango fechas con textbox

Como puedo hacer para hacer un filtro de rango fechas entre 2 textbox. Ejemplo: textbox1=fecha1 textbox2=fecha2 el filtro que necesito es que la fecha1 sea mayor o =, y la fecha 2 se menor o =.
1 respuesta

Filtrar por fecha y mostrar en listbox de excel

Tengo un formulario con un listbox, un botón y dos textbox. Tengo en una hoja un rango de datos "x", entre ellos una columna que muestra la fecha para cada fila. Necesito ingresar en los textbox un rango de fechas, presionar el botón, y que en el...
1 respuesta

Macro para filtrar con dos columnas

Tengo una macro para hacer un filtro en dos columnas, una en la que le doy el valor de filtrado por un textbox, y en la otra, por dos textbox con dos fechas (inicio y fin). Algo estoy haciendo mal por que no me funciona. La fecha la tengo en la...
1 respuesta

Restar fechas

Tengo un problema tengos 3 campos fecha dos de ellos los debo de sumar y me deben de dar cierta cantidad en años, meses y días, esa es la primera duda, como le hago para que salga así, y luego el resultado de estos dos campos mencionados los debo de...
3 respuestas

Filtrar en excel desde visual basic

Me gusta mucho tu estilo, por eso recurro a ti, tengo una dificultad cuando quiero hacer un filtro en una hoja de excel con datos introducidos desde un formulario, porque el resultado no muestra ninguna fila, sin embargo, al entrar directamente al...
1 respuesta

Resta de Fecha

Recurro a usted, para plantearle una duda que tengo, necesito saber como puedo determinar cuantos meses hay entre dos fechas dadas. Agradeciento todo su colaboración, se despide. Joe Vargas
2 respuestas

Problema al ejecutar macro para filtrar rango de fechas

Tengo la siguiente Macro Sub filtrarfechas() fecha1 = InputBox("Fecha de inicio") If Not IsDate(fecha1) Then Exit Sub fecha1 = Format(fecha1, "dd/mm/yyyy hh:mm") fecha2 = InputBox("Fecha final") If Not IsDate(fecha2) Then Exit Sub fecha2 =...
1 respuesta

Problemas con el cálculo de la diferencia entre horas desde dos campos de texto en Visual Basic

Coo estas fíjate que tengo un problema al hacer el resultado de una hora y otra tengo dos campos de texto y quiero sacar la diferencia entre una hora y otra y la verdad no me da el resultado bueno lo que pensé hacer fue separar las horas y los...
1 respuesta

Restar tiempos en Oracle

Esta ha de ser muy sencilla: Cuando tengo en una tabla dos campos de tipo date (D1, D2) y realizo una select del tipo 'select D2-D1 from tabla' me devuelve el resultado en días, y yo lo quiero en segundos. ¿Qué función de formato debo aplicarle?
1 respuesta