Vba clearcontents: ¿cómo borrar el contenido de una celda?

Puntos clave

• Para borrar el contenido de una celda, debe utilizar el método ClearContents.
• Puede usarlo para una sola celda, un rango o una hoja de trabajo completa.

Método borrar contenido

En VBA, existe un método llamado ClearContents que puede utilizar para borrar valores y fórmulas de una celda, un rango de celdas y toda la hoja de trabajo.

 Expression.ClearContents

Para utilizar este método, primero debe establecer la expresión en un lugar donde desee borrar el contenido y luego escribir «.ClearContents».

Borrar el contenido de una sola celda.

Supongamos que desea borrar los valores de la celda A1. Primero, debe definir la celda A1 usando el objeto de rango y luego el método ClearContents.

Entonces el código sería:

 Sub ClearContentExamples() Range("A1").ClearContents End Sub

También puedes usar la propiedad de celdas para definir una celda y el código sería:

 Sub ClearContentExamples() Cells(1, 1).ClearContents End Sub

Borrar el contenido de una pista

De manera similar, puede definir un rango y luego usar el método ClearContent para borrar valores y fórmulas de ese rango. Supongamos que desea borrar los valores del rango A1:A10, en este caso el código sería algo como el siguiente.

 Sub ClearContentExamples() Range("A1:A10").ClearContents End Sub

Borrar el contenido de una hoja de cálculo completa

Para borrar el contenido de una hoja de trabajo completa , puede utilizar el siguiente código:

 Sub ClearContentExamples() Cells.ClearContents End Sub

Y para borrar de una hoja de trabajo específica:

 Worksheets("Sheet1").Cells.ClearContents

Borrar contenidos de selección

Si desea escribir código dinámico que pueda borrar el contenido de las celdas seleccionadas, puede utilizar el siguiente código.

 Sub ClearContentExamples() Selection.ClearContents End Sub

Otros metodos

Éstos son algunos de los otros métodos que puede utilizar:

 Sub ClearContentExamples() Range(“A1”).Clear 'Clears Everything Range(“A1”).ClearComments 'Clear Comments Range(“A1”).ClearFormats 'Clears Formatting Range(“A1”).ClearHyperlinks 'Clear Hyperlinks Range(“A1”).ClearNotes 'Clear Notes Range(“A1”).ClearOutline 'Clears Outline End Sub