Autor Tema: Restar Fechas Mediante Macros En Excel (Leído 4562 veces)

agri13 · « **en:** Martes 10 de Julio de 2007, 22:03 »

Hola a todos!!

He creado un formulario con varios textbox, en los cuales debo introducir fechas y en uno de ellos me debe aparecer automaticamente la resta entre dos fechas (en dias), y no consigo dar con el código adecuado, ya que unas veces solo me resta los dias, otras los meses y otras los años, agradecería si alguien me pudiese facilitar un código con el que realizar esta operación.

Gracias, un saludo.

agri13

He encontrado una secuencia, pero que no funciona bien y no se por que, es la siguiente:

Private Sub TextBox3_Change()
Range("D11").FormulaR1C1 = CDate(TextBox3.Text)
End Sub

Private Sub TextBox6_Change()
Range("H11").FormulaR1C1 = CDate(TextBox6.Text)
TextBox11 = Val(TextBox6.Text) - Val(TextBox3.Text)
End Sub

Private Sub TextBox11_Change()
Range("I11").FormulaR1C1 = TextBox11
End Sub

Lo que sucede por ejemplo al restar 06/07/07-06/06/07 es que me da 100 en lugar de 30 dias y no logro saber porque.

Saludos.

Jefralago

hola tu..
espero que no sea muy tarde.... pero si aun no lo has solucionado.. pues que quede para despues..

yo intentaría en de vez de convertir el contenido de los text en Cdate, los convertiría en CDouble, y ahi si hacer la resta, por lo general la respuesta que te da es un número entero que representarían los días.
ojalá no sea muy tarde..:-)

SoloCodigo

Autor Tema: Restar Fechas Mediante Macros En Excel (Leído 4562 veces)

agri13

Restar Fechas Mediante Macros En Excel

agri13

Re: Restar Fechas Mediante Macros En Excel

Jefralago

Re: Restar Fechas Mediante Macros En Excel