copiar formato de columnas de excel

hola, Esteban !

Mostrar la cita

... tengo una hoja... y necesito copiar el formato y pergarlo en otra columna
... el formato necesito pegarlo completo incluso con los nombres de las celdas.

si por 'nombres de las celdas' te refieres a rangos a los cuales les has definido/asignado/... nombres ?...
toma en cuenta que no puede haber dos [ni mas] nombres *iguales* coexistiendo en una misma hoja :-(
[es como si quisieras tener en un mismo libro dos -o mas- hojas con el mismo nombre] -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

On 6 jun, 01:58, "Héctor Miguel"
wrote:
Mostrar la cita

hola, Esteban !

> ... tengo una hoja... y necesito copiar el formato y pergarlo en otra columna
> ... el formato necesito pegarlo completo incluso con los nombres de las celdas.

si por 'nombres de las celdas' te refieres a rangos a los cuales les has definido/asignado/... nombres ?...
toma en cuenta que no puede haber dos [ni mas] nombres *iguales* coexistiendo en una misma hoja :-(
[es como si quisieras tener en un mismo libro dos -o mas- hojas con el mismo nombre] -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

no lo que necesito es pegar esa columna en otras hoja pero con todo el
formato que tengo

hola, Esteban !

Mostrar la cita

Mostrar la cita

Mostrar la cita

... tengo una hoja... y necesito copiar el formato y pergarlo en otra columna
... el formato necesito pegarlo completo incluso con los nombres de las celdas.

Mostrar la cita

si por 'nombres de las celdas' te refieres a rangos a los cuales les has definido/asignado/... nombres ?...
toma en cuenta que no puede haber dos [ni mas] nombres *iguales* coexistiendo en una misma hoja :-(
[es como si quisieras tener en un mismo libro dos -o mas- hojas con el mismo nombre] -?-

no lo que necesito es pegar esa columna en otras hoja pero con todo el formato que tengo

prueba con algo +/- como lo siguiente:

Sub Copiar_Columna_Completa()
Worksheets("hoja1").Columns("d").EntireColumn.Copy _
Destination:=Worksheets("hoja2").Range("g1")
End Sub

saludos,
hector.