............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

macro que inserte una fila cada cuatro celdas

Ver el tema anterior Ver el tema siguiente Ir abajo

macro que inserte una fila cada cuatro celdas

Mensaje por justo el Miér Abr 07, 2010 2:42 pm

Buenas tardes, me estoy iniciando en esto y lo qu quiero es ayuda para ver como puedo insertar una fila dentro de un conjunto de 3000 datos cada cuatro de esos datos, me explico, tengo datos de un mes cuarto horarios y lo que quiero es introducir una fila, para obtener valores horarios, si pueden ayudar se lo agradecería!!!

justo

Masculino Cantidad de envíos : 10
Edad : 34
Ciudad - Pais : Madrid
Version de Excel : 2007
Fecha de inscripción : 07/04/2010

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por P@li el Miér Abr 07, 2010 3:25 pm

Hola Justo,
Desde ya te aclaro que no se entiende bien lo que estás pidiendo.
Tampoco sé cuánto es lo que sabés o no de macros, estimo que vas a poder implementar el código que te paso a continuación:
Código:

dim i as long
dim fila as long

fila=5 ' fila inicial
for i = 1 to 3000 step 4
'va a recorrer este bucle desde 1 a hasta la 3000 (cantidad de datos) saltando de a 4
fila=fila+5 (los 4 datos + la fila que se agrega)

rows(fila).insert

next

Esto solo es una propuesta fácil de implementar y adaptable, hay miles de maneras de lograr lo mismo, incluso más rápidas que esta, pero la idea es también que puedas aprender.

Saludos.
Pablo.

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 34
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por justo el Miér Abr 07, 2010 3:28 pm

Muchísimas gracias!!!, la verdad que me interesa aprender y de hecho consulto un manual pero voy poco a poco!!, a pesar de no explicarme lo has entendido perfectamente, y por cierto, se podría incorporar a la misma macro, otra que incorporara la suma de esos cuatro datos que salta?

Mil gracias y disculpa las molestias,

justo

Masculino Cantidad de envíos : 10
Edad : 34
Ciudad - Pais : Madrid
Version de Excel : 2007
Fecha de inscripción : 07/04/2010

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por GalileoGali el Miér Abr 07, 2010 5:38 pm

P@li: que tal!!!
yo cambie (tal vez por no haber entendido bien, esta línea
fila = 0 'valor inicial

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
ampliando a la suma

Código:
Sub test()
Dim i As Long
Dim fila As Long

fila = 0 ' fila inicial
For i = 1 To 3000 Step 4
'va a recorrer este bucle desde 1 a hasta la 3000 (cantidad de datos) saltando de a 4
fila = fila + 5 '(los 4 datos + la fila que se agrega)

Rows(fila).Insert
With Cells(fila, 1)
.Value = Application.Sum(Range(Cells(fila - 4, 1), Cells(fila - 1, 1)))
.Font.Bold = True
End With
Next
End Sub

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1963
Edad : 62
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por P@li el Miér Abr 07, 2010 7:54 pm

Hola Gali, estoy medio desaparecido jaja!! Vos en que andás?
Lo completaste excelente.

Gracias y saludos!
Pablo.

P@li
Admin

Masculino Cantidad de envíos : 243
Edad : 34
Ciudad - Pais : Buenos Aires, Argentina
Version de Excel : Microsoft Excel 2002 (10.2614.2625)
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por GalileoGali el Miér Abr 07, 2010 11:33 pm

Otra manera con un solo indice

Código:
Sub test()
Dim i As Long

For i = 4 To 3000 Step 5
Rows(i + 1).Insert
With Cells(i + 1, 1)
.Value = Application.Sum(Range(Cells(i - 3, 1), Cells(i, 1)))
.Font.Bold = True
End With
Next
End Sub

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1963
Edad : 62
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por justo el Jue Abr 08, 2010 4:02 am

Gracias por todo, y como poder extraer los datos de lo que se ha creado en otra hoja de excel?

justo

Masculino Cantidad de envíos : 10
Edad : 34
Ciudad - Pais : Madrid
Version de Excel : 2007
Fecha de inscripción : 07/04/2010

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por GalileoGali el Jue Abr 08, 2010 7:57 am

Justo: este foro tiene como premisa "no hacerle el trabajo a nadie", solo colaborar en el avance. Hasta ahora "tiraste" sólo ideas,,,, para aprender eso no alcanza, Cuando tengas dificultades puntuales, a consecuencia de tus intentos, entonces vuelve y consúltanos exhibiéndolos....


Última edición por GalileoGali el Jue Abr 08, 2010 8:07 am, editado 1 vez

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1963
Edad : 62
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por justo el Jue Abr 08, 2010 8:04 am

de acuerdo, así lo haré.

Gracias.

justo

Masculino Cantidad de envíos : 10
Edad : 34
Ciudad - Pais : Madrid
Version de Excel : 2007
Fecha de inscripción : 07/04/2010

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por Alef-Thau el Jue Abr 08, 2010 9:55 am

Buen intento Justo jejeje ;-)

Saludos

Alef-Thau

Masculino Cantidad de envíos : 22
Edad : 53
Ciudad - Pais : España
Version de Excel : actualmente 2010
Fecha de inscripción : 23/05/2009

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por federico ramirez marron el Vie Abr 09, 2010 2:59 am

con otro codigo parecido, pero ahora con step 5.
varias un poco el codigo, para que copie cada cinco filas es decir las sumas hechas, y activas la hoja2, y ahi lo pegas!!
avatar
federico ramirez marron

Masculino Cantidad de envíos : 95
Edad : 44
Ciudad - Pais : acapulco, gro mexico
Fecha de inscripción : 03/03/2008

Volver arriba Ir abajo

Re: macro que inserte una fila cada cuatro celdas

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.