Macro para eliminar columnas en Excel
Eliminar columnas en Excel es tan fácil como seleccionar toda la columna dese su cabecera o título, hacer clic con el botón derecho y seleccionar la opción eliminar, pero en algunos casos cuando se tienen muchas columnas, es buena idea tener una forma más sencilla de eliminar una columna, y ahí es cuando la macros nos resultan de utilidad.
A continuación colocamos el código de una macro que pide al usuario introducir la columna a eliminar, se introduce se da clic en aceptar y listo.
Sub eliminarcolumna()
Dim operacion As String
Dim fila As String
operacion = InputBox("Ingrese la columna que desea borrar")
Range(operacion + "1").Select
Columns(operacion).Select
Selection.Delete
Range("A1").Select
End Sub
Con ello no tenemos que desplazarnos hasta la columna que necesitamos borrar. Basta con ejecutar la macro e introducir la columna, y asea en minúscula o en mayúscula. Es indiferente.
Importante anotar que las columnas eliminadas de esta forma no se pueden recuperar simplemente presionando cntrl+z. La eliminación es definitiva, no se puede deshacer.
