2

Primero destacar que es la primera vez que intento programar en VBA, dicho esto, mi problema es que intento borrar dos columnas que están vacías pero al especificar cuales son, termina por borrar una pero la siguiente no, de hecho borra otra que no la declare. paso código e imagen para mayor visualización del problema.

Lo que deseo eliminar son las columnas "I" y "K", las pinte para resaltar mas el resultado.

introducir la descripción de la imagen aquí

Luego ejecuto este código

Sub eliminar()
Columns("I").Delete
Columns("k").Delete
End Sub

Este es el resultado obtenido introducir la descripción de la imagen aquí

tambien he probado cambiar los nombres de las columnas por su numero

Sub eliminar()
Columns(9).Delete
Columns(11).Delete
End Sub

siendo el resultado, el mismo

1 respuesta 1

3

Al eliminar una columna, se reacomodan (obviamente las posiciones), por lo que si haces: (a) Borrar Columna 1, (b) Borrar columna 2, en realidad la columna 2, ya no es la columna 2 original sino la 3 que pasó a ser la 2, esto por que son dos operaciones independientes. Para que esto no ocurra, la eliminación debería hacerse sobre un conjunto previamente construido con la selección de las columnas, típicamente, usando Range() para seleccionar, y sobre esta selección luego aplicamos el Delete

Range("I:I,K:K").Delete

Range() aplica por defecto a la ActiveSheet.

0

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.