Seleccionar mes

Hola Mario:
celda: variable para dar valor a todas las celdas

fecha = Cells(1,1)
Mes = Month(fecha)
if Mes = 5 then ..

Con un do while podés ir cambiando el valor fecha

Saludos, fer

"Mario" escribió en el mensaje
news:824301c495be$7029f7e0$
Tengo una columna con datos de fecha (en formato
dd/mm/aaaa hh:mm am/pm). ¿Qué código debería utilizar
para seleccionar sólo los datos correspondientes a un mes
determinado?

Muchas gracias

Mario

Gracias, Fer.
El tema es que ese método sólo me selecciona un registro
por vez, y yo pretendía seleccionar todo el rango que
cumple con la condición.
Me explico un poco mejor: en una solapa guardo, con fecha
y hora, una serie de actividades ejecutadas a lo largo
del día. Cada día se registran un promedio de 10
actividades. Al finalizar el mes, necesito seleccionar
sólo las del mes que finaliza, y con ellas elaborar un
informe.
Lo que vos decís implicaría que el código seleccione la
hoja, seleccione el primer registro que cumple con la
condición, lo copie, seleccione otra hoja, pegue el
registro, así tantas veces como registros encuentre.
Es una solución interesante, pero ¿se puede optimizar?

Gracias,

Mario

Hola Mario:
celda: variable para dar valor a todas las celdas

fecha = Cells(1,1)
Mes = Month(fecha)
if Mes = 5 then ..

Con un do while podés ir cambiando el valor fecha

Saludos, fer

"Mario" escribió

en el mensaje

news:824301c495be$7029f7e0$
Tengo una columna con datos de fecha (en formato
dd/mm/aaaa hh:mm am/pm). ¿Qué código debería utilizar
para seleccionar sólo los datos correspondientes a un mes
determinado?

Muchas gracias

Mario


.

Hola Mario:

Disculpame si no entiendo la consigna o doy por sentado algunas cosas que no
son tan obvias, es que no estoy muy acostumbrado al grupo de noticias.

Suponiendo que tenés en la columna A las fechas:
Dim fila As Intenger,

fila=1

Do while cells(fila,1)<>""

fecha = Cells(fila,1)

Mes = Month(fecha)

if Mes = 5 then ..

End if

fila=fila+1

Loop

No se que tipo de informes necesitas, pero luego del then tenés muchas
opciones para realizar (igualar cada dato seleccionado en otra hoja, es una
de ellas, pero la eficiencia del código va a depender de lo que quieras
hacer con esta información).

Saludos, fer


"Mario" escribió en el mensaje
news:8d8201c4966a$16d47a60$
Gracias, Fer.
El tema es que ese método sólo me selecciona un registro
por vez, y yo pretendía seleccionar todo el rango que
cumple con la condición.
Me explico un poco mejor: en una solapa guardo, con fecha
y hora, una serie de actividades ejecutadas a lo largo
del día. Cada día se registran un promedio de 10
actividades. Al finalizar el mes, necesito seleccionar
sólo las del mes que finaliza, y con ellas elaborar un
informe.
Lo que vos decís implicaría que el código seleccione la
hoja, seleccione el primer registro que cumple con la
condición, lo copie, seleccione otra hoja, pegue el
registro, así tantas veces como registros encuentre.
Es una solución interesante, pero ¿se puede optimizar?

Gracias,

Mario

Hola Mario:
celda: variable para dar valor a todas las celdas

fecha = Cells(1,1)
Mes = Month(fecha)
if Mes = 5 then ..

Con un do while podés ir cambiando el valor fecha

Saludos, fer

"Mario" escribió

en el mensaje

news:824301c495be$7029f7e0$
Tengo una columna con datos de fecha (en formato
dd/mm/aaaa hh:mm am/pm). ¿Qué código debería utilizar
para seleccionar sólo los datos correspondientes a un mes
determinado?

Muchas gracias

Mario


.