Macros

hola, Joaquin !

Ya localice el error, a ver si es posible corregirlo
Las columnas F y G, forman parte de una celdas que estan combinadas
al ocultarlas de forma manual no hay problema pero al hacerlo con codigo entra en conflicto
como se puede corregir eso? Gracias

si se puede corregir pero, antes (como suelo comentar en estos casos)...
el (ab)uso de celdas combinadas resulta en toda una "odisea" para la navegacion por la hoja de calculo (aun por codigo)
(en resumen y a particular apreciacion)... son como una astilla que no te deja permanecer... comodamente sentado :))

en lugar de usar instrucciones que realmente seleccionan filas/columnas donde pudieran existit celdas "combinadas"...
cambia de tus codigos (p.e.)

de:
Sub Macro3()
Columns("F:G").Select
Selection.EntireColumn.Hidden = True
End Sub

a:
Sub Macro3()
Columns("f:g").EntireColumn.Hidden = True
End Sub

saludos,
hector.

Hector
Perfecto, muchas gracias
Una pregunta mas, mira en una hoja quiero eliminar filas que esten vacias a
partir de cierto rango es decir

a1 si
a2 si
a3 si
Apartir de a4, empezar a eliminar, hasta que 1n tenga valor


Saludos



"Héctor Miguel" escribió en el mensaje
news:%

hola, Joaquin !

Ya localice el error, a ver si es posible corregirlo
Las columnas F y G, forman parte de una celdas que estan combinadas
al ocultarlas de forma manual no hay problema pero al hacerlo con codigo
entra en conflicto
como se puede corregir eso? Gracias

si se puede corregir pero, antes (como suelo comentar en estos casos)...
el (ab)uso de celdas combinadas resulta en toda una "odisea" para la
navegacion por la hoja de calculo (aun por codigo)
(en resumen y a particular apreciacion)... son como una astilla que no te
deja permanecer... comodamente sentado :))

en lugar de usar instrucciones que realmente seleccionan filas/columnas
donde pudieran existit celdas "combinadas"...
cambia de tus codigos (p.e.)

de:
Sub Macro3()
Columns("F:G").Select
Selection.EntireColumn.Hidden = True
End Sub

a:
Sub Macro3()
Columns("f:g").EntireColumn.Hidden = True
End Sub

saludos,
hector.

hola, Joaquin !

Una pregunta mas... en una hoja quiero eliminar filas que esten vacias a partir de cierto rango es decir
a1 si
a2 si
a3 si
Apartir de a4, empezar a eliminar, hasta que 1n tenga valor

si las celdas no vacias empiezan desde la fila 1... prueba la siguiente instruccion
(en alguna macro o desde la ventana de inmediato)

activesheet.columns("a").specialcells(xlcelltypeblanks).entirerow.delete

saludos,
hector.

hola, Joaquin !

Una pregunta mas... en una hoja quiero eliminar filas que esten vacias a partir de cierto rango es decir
a1 si
a2 si
a3 si
Apartir de a4, empezar a eliminar, hasta que 1n tenga valor

si las celdas no vacias empiezan desde la fila 1... prueba la siguiente instruccion
(en alguna macro o desde la ventana de inmediato)

activesheet.columns("a").specialcells(xlcelltypeblanks).entirerow.delete

saludos,
hector.

Hector

El codigo si funciona muy bien, pero debe tener condiciones, debe empezar en
a20 por ej. y de ahi empezar a validar con condiciones,

saludos


"Héctor Miguel" escribió en el mensaje
news:

hola, Joaquin !

Una pregunta mas... en una hoja quiero eliminar filas que esten vacias a
partir de cierto rango es decir
a1 si
a2 si
a3 si
Apartir de a4, empezar a eliminar, hasta que 1n tenga valor

si las celdas no vacias empiezan desde la fila 1... prueba la siguiente
instruccion
(en alguna macro o desde la ventana de inmediato)

activesheet.columns("a").specialcells(xlcelltypeblanks).entirerow.delete

saludos,
hector.