• Domingo 22 de Diciembre de 2024, 13:39

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

agri13

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Restar Fechas Mediante Macros En Excel
« en: Martes 10 de Julio de 2007, 22:03 »
0
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

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Re: Restar Fechas Mediante Macros En Excel
« Respuesta #1 en: Jueves 12 de Julio de 2007, 19:26 »
0
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

  • Nuevo Miembro
  • *
  • Mensajes: 15
    • Ver Perfil
Re: Restar Fechas Mediante Macros En Excel
« Respuesta #2 en: Jueves 17 de Julio de 2008, 22:21 »
0
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..:-)