Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Excel - DESCOMBINAR CELDAS

  Imprimir  
Vista:
Me gusta: Está pregunta es útil y esta clara
0
No me gusta: Está pregunta no esta clara o no es útil
 
Asunto:

DESCOMBINAR CELDAS

Autor:carlos augusto (76 intervenciones)
Fecha:07/12/2007 11:56:45
HOLA AMIGOS. NECESITO SABER CUAL ES LA RUTINA (CODIGO VBA) QUE SE DEBE APLICAR PARA DESCOMBINAR TODAS LAS CELDAS QUE ESTEN COMBINADAS DE UNA HOJA. (MACRO)
Responder
información
Otras secciones de LWP con contenido similar...
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:DESCOMBINAR CELDAS

Autor:José Luis (700 intervenciones)
Fecha:07/12/2007 21:11:56
Utiliza el grabador de macros.

Saludos
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:DESCOMBINAR CELDAS

Autor:carlos augusto (76 intervenciones)
Fecha:07/12/2007 21:49:29
JUAN CARLOS LO HICE, PERO APARECE UN ERROR QUE DICE MACRO MUY EXTENSA
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:DESCOMBINAR CELDAS

Autor:camilo perea (1 intervención)
Fecha:13/05/2008 14:57:47
necesito la respuesta sobre este tema por favor
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

DESCOMBINAR CELDAS

Autor:Manuel (1 intervención)
Fecha:21/10/2011 00:51:31
Listo prueba esta rutina y la ajustas a tus necesidades:
Nota: fila = F, columna = C, la macro recorre todas las filas de la primera columna y descombina las celdas que estén combinadas, cuando llega a "SIGUIENTE" pasa a la siguiente columna, así sucecivamente hasta que le coloques "FIN" en la ultima columna y ultima fila.


Sub DESCOMBINAR()
F = 1
C = 1

Do While Not Worksheets(1).Cells(F, C).Text = "FIN"
Worksheets(1).Cells(F, C).UnMerge
F = F + 1
If Worksheets(1).Cells(F, C).Text = "SIGUIENTE" Then
F = 1
C = C + 1
End If
Loop
End Sub
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

DESCOMBINAR CELDAS

Autor:alixon alixon_montilla@hotmail.com (1 intervención)
Fecha:01/03/2013 21:30:20
muy buena tu macro.
trate de utilizarla pero no me sirvió.
estoy emigrando desde una pagina de la empresa tres reportes de ventas, los cuales están armados con 9 columnas y aproximadamente 20 mil filas por reporte.
cada reporte tiene un encabezado y el encabezado esta conformado por dos filas combinadas.
estoy tratando de des-combinarlas con tu macro pero me resulta muy lenta por la cantidad de datos que tiene que recorrer hasta llegar al final y volver a comenzar con la siguiente columna.
si me podrías ayudar con una macro que en vez de viajar por columnas, que esta valla directo a las celdas combinadas y las des combine todas a las vez estaría muy agradecido. normalmente lo hago manual y por cada hoja, son 54 hojas que le hago el proceso y no solo eso, diariamente tengo que armar la base de datos.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

DESCOMBINAR CELDAS

Autor:Juan Chero (1 intervención)
Fecha:26/06/2014 19:16:39
Amigo prueba esta unica linea de código. a mi me funcionó con reportes similares a los tuyos. me avisas como t fue.

Range("A1:AY2537").UnMerge

En lugar del rango q he puesto pon el tuyo y pruebas.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

DESCOMBINAR CELDAS

Autor:Gerson (1 intervención)
Fecha:25/07/2014 17:06:39
Excelente aporte muy buen código

Muchas Gracias ¡¡
Comentar