¿Cómo quitar el error "#¡DIV/0!" de una celda en la que se realiza una fórmula?

Tengo un botón creado con un macro el cual haya la media de una serie de casillas cuando es pulsado.

Si se pulsa y no hay ningún dato en las casillas sale el error "#¡DIV/0!" en la casilla donde tiene que mostrar el resultado del promedio.

Este es el resultado:

El señor Dante Amor me ha dado una posible solución para esto, pero no sé como adaptar adaptar esa posible solución a mi fórmula.

Esta es la solución que me ha dado Dante:

=si.error(tu fórmula, "")

y esta es mi formula:

Range("C6") = Application.Average(Range(Cells(6, "E"), Cells(6, uc))) 

¿Como puedo solucionar este problema?

2 Respuestas

Respuesta
1

La respuesta que de ha dado Dante es para ponerla en la celda en cuestión, entiendo que tu fórmula se ejecuta desde VBA y no desde la barra de fórmulas de excel.

Mi duda es porque usas una macro para realizar una operación, no se si seria más fácil colocar en la columna MEDIA la fórmula correspondiente para que cuando varíes el valor aparezca esa media al instante.

Por ejemplo:

=si.error(promedio(6e;6x);"Error)

Si esta opcion no te convence y quieres seguir usando VBA (macro) puedes desactivar todos estos errores en la configuracion de Excel.

Ves a opciones de excel>fórmulas>normas de comprobación de errores

Ahí puedes desactivar los errores que no quieres que se muestren, junto cada tipo de error tienes una i dentro de un circulo que te indica que errores activas o desactivas.

Piensa que esto afectara todo el libro.

¡Gracias! Por tu respuesta, he probado lo que me pones y me va de fábula. Seguramente haya hecho macros de más en mi aplicación, pero veía que era la forma más sencilla, aunque si hubiese hecho las cosas a base de fórmulas posiblemente me hubiese liado menos.

Como dijo uno... -Todos los caminos conducen a roma, y dijo el otro... -De donde crees que vengo yo ahora. je je.

En serio Gracias.

Respuesta
1

Cambia tu línea por esto

If Not IsError(Application.Average(Range(Cells(6, "E"), Cells(6, uc)))) Then
    Range("C6") = Application.Average(Range(Cells(6, "E"), Cells(6, uc)))
Else
    Range("C6") = 0
End If

Cualquier duda avísame.

Saludos. Dante Amor

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Al insertar una columna en mi macro, esta se queda seleccionada. ¿Como puedo hacer que esto no suceda?

Al insertar una columna a través de un macro, esta se queda seleccionada y aún dirigiendo la casilla activa a otra celda la columna se sigue quedando seleccionada quedando estéticamente feo. ¿Cómo podría solucionar este problema?. Sub AnadirTest() '...
2 respuestas

Crear una macro para sumar valores de celdas donde la fila y la primera columna son fijas pero la ultima columna es variable.

Pues lo dicho. Necesito vuestra ayuda ya que soy novato en estas lides. Estoy intentando crear una macro para sumar valores de celdas donde la fila y la primera columna son fijas pero la ultima columna es variable. He encontrado este código: Dim...
1 respuesta

Cambiar valores n/a a 0

Tengo hojas de excel con valores los cuales están vinculados y ahora deseo realizar una macro pero tengo una duda como cambiar valores #N/A a un valor 0 sin perder vínculos ya que algunos valores no tienen valores y me posiciona automáticamente los N/A
2 respuestas

VBA llenar fórmula en celda si se cumple cierta condición.

Estaría necesitando una macro que me llene una celda con la fórmula Sum, si una celda en la misma fila tiene una X. Deseo hacer una planilla, supongamos con 6 columnas, y que si en la primer columna tiene una la celda tiene una “x”, que en esa misma...
1 respuesta

Macro que sume de acuerdo al primer dígito

Muy buenos días: Estoy en busca de una macro, "No Fórmula de excel", que realice suma de acuerdo al primer dígito como se ve en la ilustración, lo que esta resaltado en color seria el resultado de la macro. ¿Esto se puede?
1 respuesta

Macro para ingresar en base de datos

Para Dante Amor. Quisiera una macro para ingresar datos en Hoja2 desde Hoja1. En Hoja1 un formulario que recogiese 3 datos: Nº socio, Fecha e Importe. En la Hoja2 aparecería del siguiente modo la base de datos: La macro ha de buscar según el Nº SOCIO...
1 respuesta

Sumatorio total por año y cliente para dante amor

Tengo un excel con 5 pestañas, una para cada año 2010-2014. En cada pestaña hay una tabla con 3 culumnas: nr cliente, descripcion cliente e importe. Necesito, en otra pestaña, hacer un resumen. 7 columnas: nr cliente, descripcion, importes 2010,...
2 respuestas

Macro para copiar valores de determinadas celdas a otra hoja

Agradeciendo de antemano su valiosa ayuda y deseando los mejores éxitos en sus vidas, mi solicitud es la siguiente: Necesito una macro que me copie solo los valores de las celdas C6, C5, D5, F5, G5, E8, C9, E9, E10 (deben ir en éste mismo orden) de...
1 respuesta

Ejecutar macro después de un enter validando los datos

Vi una respuesta tuya para una persona quería orientación para ejecutar una macro después de un enter y ami me sirvió un poco una respuesta tuya. Pero quisiera pedirte de favor si me ayudas con mi inquietud. Mira lo que tengo hasta ahora es esta...
1 respuesta

Macro para rellenar automáticamente celdas adyacentes al seleccionar valor en lista desplegable

Llevo varios días tratando de modificar una macro para adaptarla a mi hoja de cálculo sin éxito alguno. La macro la tomé de está pregunta: Con un macro.. ¿Cómo rellenar automáticamente una celda según el valor de lo que se escribe en otra?. Mi...
2 respuestas