Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Mando a ordenar y no ordena....

04/04/2007 - 23:31 por ruben20032004 | Informe spam
Ayuda Hacer una pregunta
hola a tod@s tengo un programita en VB6 con Access2000 y
exporto a Excel2000 los datos de salida todo va muy bien
salvo cuando exporto a Excel fechas antes debo decirles que he
hecho casi de todo lo que se de Excel para "obligarlo a ordenar" en el
proceso de automatizacion desde VB6 pero funciona en muchos, pero
en otros no el caso se da cuando en el programo cargo un nuevo
registro con sus fechas(desde, hasta)... aun siendo guardadas en
formato fecha y declaradas tipo fecha en la base de datos Access...
cuando exporto a Excel ordeno con estas lineas de codigo..

' rango a ordenar
-
excelhoja.Range("A12:C" & tRow69).Select
'-

' le pongo formato, sino hace esto una asi --> 03/01/1999 .. lo pone
asi --> 01/03/1999
' el formato lo arregla
-
excelhoja.Application.Selection.NumberFormat = "mm/dd/yyyy"
'-

' luego mando a ordenar por la fecha_hasta(C12), nombre(A12) y
fecha_desde(B12) ...
' DESCENDIENTE
-
excelhoja.Application.Selection.Sort Key1:=excelhoja.Range("C12"),
Order1:=xlDescending, Key2:=excelhoja.Range( _
"A12"), Order2:=xlDescending, Key3:=excelhoja.Range("B12"),
Order3:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False,
Orientation:=xlTopToBottom

este es un caso QUE NO ORDENA.

NOMBRE FECHA_D FECHA_H
LUIS 18/03/1996 31/10/1997
MARIA 09/10/1998 31/03/2007
JOSEFA 17/11/1993 29/01/1994
BETTY 06/05/1990 16/11/1993
PABLO 01/11/1997 15/10/1998
LUCIA 12/03/1981 01/07/1987

... asi deberia quedar

NOMBRE FECHA_D FECHA_H
MARIA 09/10/1998 31/03/2007
PABLO 01/11/1997 15/10/1998
LUIS 18/03/1996 31/10/1997
JOSEFA 17/11/1993 29/01/1994
BETTY 06/05/1990 16/11/1993
LUCIA 12/03/1981 01/07/1987

alguien se le ocurre una idea le ruego compartirla conmigo...
porque lo que se esto me tiene verde gracias de antemano.
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Héctor Miguel
05/04/2007 - 01:46 | Informe spam
hola, ruben !

... en VB6 con Access2000 y exporto a Excel2000 los datos de salida
... todo va muy bien ... salvo cuando exporto a Excel fechas
... antes debo decirles que he hecho casi de todo lo que se de Excel para "obligarlo a ordenar"
en el proceso de automatizacion desde VB6 pero funciona en muchos, pero en otros no
... el caso se da cuando en el programo cargo un nuevo registro con sus fechas(desde, hasta)
... aun siendo guardadas en formato fecha y declaradas tipo fecha en la base de datos Access...
cuando exporto a Excel ordeno con estas lineas de codigo...



[probablemente] el 'detalle'... va a estar en 'el como'... 'deposites'... las fechas desde access hasta excel -?-
[seguramente] las fallas ocurren en sistemas cuyo orden de fechas NO coincide con el de la pc donde se genero el 'access' -?-
[hasta donde se] una im/ex/portacion de datos desde access a excel es 'textual' [aunque]...
-> si el tipo de datos es 'identificable' [para excel], le aplica un formato 'numerico apropiado' [esto, cuando es posible]
-> pero... hablando de fechas... si se trata de orden de fechas distintos... -???- [dd/mm/aaaa <-> mm/dd/aaaa]

comentas [si hubiera] algun detalle mas... 'significativo' ?
saludos,
hector.

__ el resto de la consulta y fracciones del codigo expuesto __
' rango a ordenar
excelhoja.Range("A12:C" & tRow69).Select
' le pongo formato, sino hace esto una asi --> 03/01/1999 .. lo pone asi --> 01/03/1999
' el formato lo arregla
excelhoja.Application.Selection.NumberFormat = "mm/dd/yyyy"
' luego mando a ordenar por la fecha_hasta(C12), nombre(A12) y fecha_desde(B12) ...
' DESCENDIENTE
excelhoja.Application.Selection.Sort Key1:=excelhoja.Range("C12"),
Order1:=xlDescending, Key2:=excelhoja.Range( _
"A12"), Order2:=xlDescending, Key3:=excelhoja.Range("B12"),
Order3:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False,
Orientation:=xlTopToBottom
este es un caso QUE NO ORDENA.
NOMBRE FECHA_D FECHA_H
LUIS 18/03/1996 31/10/1997
MARIA 09/10/1998 31/03/2007
JOSEFA 17/11/1993 29/01/1994
BETTY 06/05/1990 16/11/1993
PABLO 01/11/1997 15/10/1998
LUCIA 12/03/1981 01/07/1987
... asi deberia quedar
NOMBRE FECHA_D FECHA_H
MARIA 09/10/1998 31/03/2007
PABLO 01/11/1997 15/10/1998
LUIS 18/03/1996 31/10/1997
JOSEFA 17/11/1993 29/01/1994
BETTY 06/05/1990 16/11/1993
LUCIA 12/03/1981 01/07/1987
alguien se le ocurre una idea le ruego compartirla conmigo...
porque lo que se esto me tiene verde gracias de antemano...

Preguntas similares

 

Busqueda sugerida :