Jump to content
  • Debido a la crisis sanitaria, hasta el día 31 de marzo, el registro al foro de Ayuda Excel será totalmente gratuito para facilitar el teletrabajo. Todos los registros que se produzcan entre estas fechas tendrán acceso gratuito ilimitado a la comunidad hasta el 30 de abril.

    Regístrate

    Si te surge alguna duda mientras estás trabajando en casa con Excel, ya tienes a quien preguntar.

    Espero que esta medida te sirva de ayuda. Frenar la expansión del coronavirus depende de todos. Sé responsable.

ubimur

macro que cumpla condicion y copie otra celda de la fila.

Recommended Posts

Hola a todos y de antemano, Muchas gracias por la ayuda que me pueden brindar.

Quiero alimentar la hoja datos, con la información que hay en las otras dos hojas. En la hoja septiembre y octubre, hay información resaltada en amarillo que quiero pasar en orden por fecha de entrada. Ejemplo: En hoja septiembre, hay varios pares de divisas GER30, NZDUSD, AUDNZD....  quiero pasar las columnas resaltadas a la hoja datos, pero en el orden que corresponden en cuanto a la fecha y divisa (ger30 a ger30, NZDUSD A NZDUSD y a si sucesivamente).

FECHA PAR POSICION STOP PIP W/L VALUE COMISION PROFIT
15/09/2016 0:33 AUDCHF Se 97,6 42,8 1 0,01 -0,06 4,36
16/09/2016 7:17 GER30 buy 50 -37,9 -1 2 0 -85,17
16/09/2016 7:36 GER30 Se 15 -30,1 -1 2 0 -67,62
16/09/2016 9:50 GER30 Se 10,8 -34,6 -1 2 0 -77,66
16/09/2016 7:15 GER30 Se 15 -21,6 -1 1 0 -24,26

 

GER30
fecha op stop pip profit
15/09/2016 0:33 1 97,6 42,8         4,36
16/09/2016 7:17 -1 50 -37,9       -85,17
16/09/2016 7:36 -1 15 -30,1      -67,62
16/09/2016 9:50 -1 10,8 -34,6      -77,66
16/09/2016 7:15 -1 15 -21,6      -24,26

Básicamente seria así. Cada vez que se digite información en las hojas de los meses, esta alimente automáticamente a la hoja datos en orden de fecha.

Tengo una macro, pero solo funciona para pasar la información de un mes, en el otro no funciona.

Agradezco toda la colaboración que me puedan dar, ya que tengo tiempo intentando y no he podido hacerlo. gracias.

datos.xlsx

Share this post


Link to post
Share on other sites

Esta macro me sirve para un solo meses, mas no se como adaptarla para que corra en todos los meses.

Sub GER30()

'busca "ger30" copia y pega

Sheets("sept").Select

'obtiene la última fila con datos de la columna b
ufila = Range("b" & Rows.Count).End(xlUp).Row
'obtiene el número de columna que representa la letra L
col = Range("b2").Column
k = 3
For i = 2 To ufila ' recorre toda la columna hasta la última celda con datos
    If Cells(i, col) = "GER30" Then
       
        Sheets("datos").Range("A" & k) = Sheets("sept").Range("A" & i)
        Sheets("datos").Range("B" & k) = Sheets("sept").Range("F" & i)
        Sheets("datos").Range("C" & k) = Sheets("sept").Range("D" & i)

Sheets("datos").Range("D" & k) = Sheets("sept").Range("E" & i)

Sheets("datos").Range("F" & k) = Sheets("sept").Range("I" & i)
        k = k + 1
    End If
Next 'va al siguiente registro
Sheets("datos").Select
End Sub

He estado varios dias intentando hacer eso, mas no he podido. Mil gracias a todas las personas que me ayuden.

 

Share this post


Link to post
Share on other sites

Hola Max2005, gracias por tu ayuda.

ya mi el archivo, este copia los de octubre y solo dos del mes de septiembre.

Yo quiero que me aparezcan el orden de las fechas y los de octubre están mas arriba que los dos de septiembre.

De todas maneras, es un avance a lo que ya tenia, gracias.

En el ejemplo coloque solo dos meses, pero se van a trabajar con todos los doce meses. 

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.



×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png