Es común ver en algunas bases de datos que se dispone para su análisis o archivos en general celdas en blanco, las cuales necesitan ingresarle un valor para que sea más manejable al momento de realizar cualquier acción, como uso de fórmulas, o simplemente porque debería de tener algún valor. Es por ello que en este artículo se presentará una macro que se encargue de rellenar celdas en blanco con algún valor.
En este caso, el ejemplo consiste en rellenar las celdas en blanco de la columna "Certificado" con el valor de "No disponible" , ya que, supongamos que por descuido no se llenó. En la figura siguiente se muestra el botón "Rellenar celdas en blanco", el cual llamará a la macro.
(Para mayor visualización de la imagen, hacer click en la misma)
- El primer paso consiste en declarar las variables, Rango_C es el rango de la columna de certificado y "Certificado" es la variable que será utilizada para recorrer el rango.
- El siguiente paso consiste en asegurarse si se desea conservar el archivo antes de realizar el cambio:
(Para mayor visualización de la imagen, hacer click en la misma)
- Luego se define el rango, previamente se debe de seleccionar el rango en el cual se desea rellenar las celdas en blanco en la hoja de excel antes de ejecutar la macro con el botón. Si se cuenta con un rango ya establecido se reemplazaría Set Rango_C = Selection por
Set Rango_C = Range("C4:C14") o el rango que se desee.
- Finalmente la siguiente parte del código se encarga de verificar si es una celda vacía y si en el caso lo es, lo rellena con el texto "No disponible"
- El resultado final es el siguiente:
NOTA: La macro no sombrea la celda rellenada, fue sombreada para que se vea el cambio.
El siguiente link contiene el archivo excel: Rellenar celdas en blanco por algun valor
Realizado por: Leyla Paredes
29/03/2016 a las 1:50 pm
Valioso aporte, gracias, de mucha utilidad....
31/05/2016 a las 5:08 pm
consulta:
necesito que la celda en blanco la llene con el valor de la celda superior
gracias
22/03/2018 a las 2:20 pm
Hola,
Se podría hacer sin seleccionar celdas, es decir, detectar la ultima de la izquierda con valor???
Gracias y felicitarte por el aporte.
05/05/2019 a las 8:39 am
hola... valioso aporte.. gracias
05/05/2019 a las 10:37 am
hola al colocar el rango me da error de sintexis , pergunto es asi ? (A4:A15) o lleva las doble fechas que creo que es mayor que y menor que ?
yo coloco esto :
Set Rango_C = Range(M55:M60) y me da error
yo quiero agregar un rango como este ; E13:E52;G13:G52;I13:I52
por fa me gustaria tu ayuda
10/06/2020 a las 7:09 am
Hola!
Necesito poder actualizar datos en dos hojas de mi libro de excel.
Ejemplo, Desde la hoja1 a la hoja2
Cualquier cambio que hago en la hoja1 se refleja en la hoja2, pero si quiero hacer un cambio en la hoja2, no se refleja en la hoja1
Gracias
03/01/2021 a las 9:35 pm
Muchas gracias, me fue de mucha utilidad!