tengo un archivo de excel que genera un sistema en mi trabajo, los valores de las celda en la columna "I" son fechas, en el formato "12/12/2016" por ejemplo, el formato de cada celda es "General", dependiendo del valor en la columna J, a la fecha de la columna I necesito sumarle 14 dias:
If Range("J" & No).Value = 14 Then
Range("I" & No).Value = DateAdd("d", 14, Range("I" & No).Value) ' se suman los 14 dias
End If
ya que termino de hacer todas las modificaciones, tengo que convertir los valores de la columna "I" en texto
Columns("I").Select
Selection.NumberFormat = "@"
pero al realizar la conversion, las celdas donde modifique el valor, se convierten en numeros por ejemplo42586 y no en una fecha como yo la necesito, el numero no me sirve.
espero alguien me pueda ayudar a solucionar este problema.
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Compañeros, tengo el siguiente problema
tengo un archivo de excel que genera un sistema en mi trabajo, los valores de las celda en la columna "I" son fechas, en el formato "12/12/2016" por ejemplo, el formato de cada celda es "General", dependiendo del valor en la columna J, a la fecha de la columna I necesito sumarle 14 dias:
If Range("J" & No).Value = 14 Then
Range("I" & No).Value = DateAdd("d", 14, Range("I" & No).Value) ' se suman los 14 dias
End If
ya que termino de hacer todas las modificaciones, tengo que convertir los valores de la columna "I" en texto
Columns("I").Select
Selection.NumberFormat = "@"
pero al realizar la conversion, las celdas donde modifique el valor, se convierten en numeros por ejemplo42586 y no en una fecha como yo la necesito, el numero no me sirve.
espero alguien me pueda ayudar a solucionar este problema.