Excel - Crear macro para excel

   
Vista:

Crear macro para excel

Publicado por David (3 intervenciones) el 27/10/2011 02:35:40
Buenos dias a todos,

Necesito crear un macro, pero no tengo ni idea de programación. Hasta ahora siempre que he necesitado un macro, lo he tomado de algún foro de Internet y lo he adaptado con pequeños cambios, pero para el que necesito ahora me es imposible encontrar uno similar. Para que sea mas sencillo de entender, lo explicaré como si las celdas tuviesen texto, pero en realidad contienen números:

Tengo dos columnas: A y B. En la A tengo nombres de amigos (recordemos, en realidad tengo números, esto es solo para hacerlo más inteligible), y en la B los nombres de sus novias. Lo que pasa es que hay amigos que son un poco golfos y tienen varias novias. En ese caso, en la columna A tendré el nombre del amigo en varias celdas, una debajo de la otra, y al lado de estas, en la columna B, los nombres de sus respectivas. Algo así como:
A B
Paco Sonia
Paco Helena
Paco Marta
Raul Paula
Jose Nina
Jose Rosa



Mi objetivo es conseguir que cada amigo y todas sus novias estén en la misma fila.

¿Alguien sabe hacerlo?

Gracias de nuevo!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Crear macro para excel

Publicado por jcs (494 intervenciones) el 27/10/2011 09:53:49
Muy buenas,

suponiendo que tus datos iniciales los tengas en la Hoja1, pon esta macro en cualquier otra hoja que tengas vacía:

Sub reagrupar()
fila = Sheets("Hoja1").Range("a1").End(xlDown).Row
MsgBox fila
i2 = 2
i1 = 2
While i1 < fila
Cells(i2, 1) = Sheets("Hoja1").Cells(i1, 1)
j2 = 2
While Cells(i2, 1) = Sheets("Hoja1").Cells(i1, 1)
Cells(i2, j2) = Sheets("Hoja1").Cells(i1, 2)
j2 = j2 + 1
i1 = i1 + 1
Wend
i2 = i2 + 1
Wend
End Sub

Adáptala a tus necesidades. La que te he puesto está pensada para que en la fila 1 de la Hoja1 tengas los t´tiulos, y los datos empiecen a partir de la fila 2.

Un saludo. Juanjo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Crear macro para excel

Publicado por David (3 intervenciones) el 28/10/2011 17:57:00
Muchas gracias Juanjo por tu aportación desinteresada. Este fin de semana lo probare, y con lo que sea ya te diré algo.

Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Crear macro para excel

Publicado por David (3 intervenciones) el 02/11/2011 14:41:03
Pues ya lo he probado y funciona perfectamente. Muchísimas gracias de nuevo.

Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar