Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Copiar celdas distintas de cero y pegar al final de linea

aldomemar

New member
Registrado
11 Abr 2019
Mensajes
6
Hola estoy peleándome con vba para hacer una macro que no me sale

Necesitaría copiar los datos FILA por FILA, de solo aquellas celdas distintas de cero y pegarlos en la primera celda libre de...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Hola,

Gracias por tu respuesta

La idea es pegarlos a partir de la columna donde pone "RESULTADO ->", a partir de la columna H, de seguido, sin celdas en blanco de por medio.

Gracias de nuevo
 
Hola que tal:

Yo hice esta macro y que la probé siguiendo tu imagen adjunta:
Código:
<i>
</i>
Sub quitar_ceros()
'Por Vico
Application.ScreenUpdating = False
Dim r1, c1, nCol As Integer
Dim cA As...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
de nuevo, la corregí porque le dejé un msgbox cuando probaba :shock:
Código:
<i>
</i>
Sub quitar_ceros()
'Por Vico
Application.ScreenUpdating = False
Dim r1, c1, nCol As Integer
Dim cA As Range...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Volver
Arriba