Obviar filas en blanco

23/02/2005 - 08:59 por Jorge AP | Informe spam

Buenos días a todos,

Tengo en una columna diferentes datos y necesito copiarlos a otra columna,
pero en la columna que los peque no debo tener en cuenta las filas que no
contengan datos. Ejemplo:

Columna A Columna B
1 Jorge Jorge
2 Felipe
3 Felipe Sara
4
5 Sara

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Héctor Miguel

23/02/2005 - 09:34 | Informe spam

hola, Jorge !

... columna diferentes datos... copiarlos a otra... no debo tener en cuenta las filas que no contengan datos.
Ejemplo:
Columna A Columna B
1 Jorge Jorge
2 Felipe
3 Felipe Sara
4
5 Sara

'aprovechando' la respuesta a Nancho... :))
saludos,
hector.
en un modulo de codigo 'normal' ==Sub CopiarNoVacias()
If [a1].AutoFilter Then [a1].AutoFilter
Range([a1], [a65536].End(xlUp)).AutoFilter Field:=1, Criteria1:="<>"
Range([a1], [a65536].End(xlUp)).SpecialCells(xlCellTypeVisible).Copy [b1]
[a1].AutoFilter
End Sub

Responder a este mensaje

#2 Jorge AP

23/02/2005 - 13:27 | Informe spam

Gracias

"Héctor Miguel" escribió:

hola, Jorge !

> ... columna diferentes datos... copiarlos a otra... no debo tener en cuenta las filas que no contengan datos.
> Ejemplo:
> Columna A Columna B
> 1 Jorge Jorge
> 2 Felipe
> 3 Felipe Sara
> 4
> 5 Sara

'aprovechando' la respuesta a Nancho... :))
saludos,
hector.
en un modulo de codigo 'normal' ==> Sub CopiarNoVacias()
If [a1].AutoFilter Then [a1].AutoFilter
Range([a1], [a65536].End(xlUp)).AutoFilter Field:=1, Criteria1:="<>"
Range([a1], [a65536].End(xlUp)).SpecialCells(xlCellTypeVisible).Copy [b1]
[a1].AutoFilter
End Sub

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida