** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Otros de Microsoft: Windows y Office > Excel
  Mensajes nuevos Mensajes nuevos RSS - Extraer datos en base a fechas
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoExtraer datos en base a fechas

 Responder Responder
Autor
Mensaje
Dany Solis Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 23/Octubre/2010
Localización: Cd. Juarez Méx
Estado: Sin conexión
Puntos: 845
Enlace directo a este mensaje Tema: Extraer datos en base a fechas
    Enviado: 30/Abril/2021 a las 23:48
Que tal a todos,

Tengo una hoja excel (Sheet1) con "N" filas, en una de las columnas tengo un dato tipo fecha (columna z), en (sheet2) quiero obtener un rango de datos de la hoja 1 a la hoja 2 en base a lass fechas que yo le pase ejemplo en (A2, Fecha Inicio) y (b2, Fecha Fin)

 Con esta formula, cuento las filas que estan en ese rango, como puedo ahora traerme al sheet2 el rango que necesite?:
=SUMPRODUCT((SharePoint!$W$2:$W$1000>=Sheet1!G2)*(SharePoint!$W$2:$W$1000<=Sheet1!H2))


Alguna idea o sugerencia?

De antemano gracias.

DS
Donde hay educación, no hay distinction de clases. (Confusio)

Dany Solis
Arriba
AnSanVal Ver desplegable
Administrador
Administrador
Avatar

Unido: 16/Marzo/2005
Localización: España
Estado: Sin conexión
Puntos: 5814
Enlace directo a este mensaje Enviado: 01/Mayo/2021 a las 18:02

Suponiendo que el rango ORIGEN es una Tabla de Excel (Insertar > Tablas > Tabla); la manera más simple es mediante Filtro avanzado.

Ejemplo (construye este ejemplo para que te quedes con la idea):

- La tabla origen (Hoja1) es  Tabla1    (no importa en que rango esté).

- Los campos (títulos) que quieres capturar son: Fecha, Concepto e Importe (no importa que la tabla ORIGEN sea mayor).

- El rango destino es  Hoja2!B3:D3

- Está libre el rango Hoja2!J1:K2     (es para los criterios -puede ser otro rango-)

1.- [B3]   Fecha       [C3]   Concepto       [D3]  Importe

2.- [J1]   Fecha        [K1]   Fecha

3.- [J2]   =">=07/01/2021"         [K2]   ="<=24/01/2021"     (significa: >=J2  y  <=K2)

 

4.- Datos > Ordenar y filtrar > Avanzadas > ...

5.- ... (marca) Copiar a otro lugar > (Rango de la lista) Tabla1[#Todo] > ...

6.- ... (Rango de criterios) J1:K2 > (Copiar a) B3:D3 > Aceptar

 

 

Saludos desde Tenerife.

Mi sitio_web con ejemplos Excel.
Arriba
Dany Solis Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 23/Octubre/2010
Localización: Cd. Juarez Méx
Estado: Sin conexión
Puntos: 845
Enlace directo a este mensaje Enviado: 03/Mayo/2021 a las 15:57
Gracias Antonio, me ha quedado así:

Sub getData()

Sheets("SharePoint").Range("A1:Y1000").AdvancedFilter Action:=xlFilterCopy, _
CriteriaRange:=Sheets("MainPage").Range("U3:V4"), _
copytorange:=Sheets("Issues").Range("A1:Y1"), Unique:=False

End Sub


Muchas gracias, se puede cerrar el hilo.

DS
Donde hay educación, no hay distinction de clases. (Confusio)

Dany Solis
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable