Determinar si una celda tiene fórmula





Posiblemente cuando creamos una macro sea necesario determinar si una celda contiene una fórmula, surgiendo la necesidad de saber como codificar la macro para que detecte una celda con fórmula ingresada, este pos y el ejemplo que se incorpora tiene por finalidad enseñar como saber si una determinada celda tiene fórmula, en ese caso realizar el procedimiento correspondiente.

Bien, adentrándonos en el tema, el ejemplo lo que hace es determinar en primer lugar todo el rango usado, una vez que se seleccionó, se procede a recorrer todas las celdas del rango marcado, coloreando la celda con rojo en caso que la misma contenga una fórmula, a su vez se van contando las celdas con fórmula, usando la variable al final para informar la cantidad de celdas con fórmula que existen en el rango usado, por último sale un msgbox que informa la cantidad de celdas con fórmula encontradas

Para probar el ejemplo basta con presionar el botón que está en la hoja, si quieres probar otras celdas escribe las fórmulas donde quieras y presiona el botón, solo de determina el rango de datos y las celdas donde buscar si tienen fórmulas en su interior; el código lo encontrarás más abajo y al final el link para descargar el ejemplo si lo requieres..

Antes de seguir recomiendo leer un excelente libro sobre Excel que te ayudará operar las planillas u hojas de cálculo, haz click acá, si quieres aprender sobre Excel, en inglés, entonces debes hacer click here. Si lo que necesitas es aprender o profundizar sobre la programación de macros con VBA este es unos de los mejores cursos on line que he visto en internet.

  

Desde el final podrás descargar el ejemplo mencionado, ver su codificación o bien adaptarlo a lo necesites, el código es libre y totalmente gratuito, para su uso particular.

El vídeo que sigue muestra una explicación más detallada y gráfica de la macro presentada, recomiendo observar para una más fácil comprensión de la macro; suscribe a nuestra web desde la parte superior derecha de la página ingresando tu mail y a nuestro canal de You Tube para recibir en tu correo vídeos explicativos sobre macros interesantes, como  por ejemplo formulario que crea un listado de todas las hojas para poder luego seleccionarlasbuscar en listbox mientras escribes en textboxordenar hojas libro excel por su nombreconectar Excel con Access y muchos ejemplos más.




Código que se inserta en un módulo



Sub HayForm()
Dim conta As Integer
ActiveSheet.UsedRange.Select
Selection.Interior.Color = xlNone
For Each cell In Selection
If cell.HasFormula Then
cell.Interior.Color = 255
conta = conta + 1
End If
Next cell
MsgBox ("Existen " & conta & " formulas en todo el rango usado"), vbInformation, "AVISO"
End Sub



Si te fue de utilidad puedes INVITARME UN CAFÉ y de esta manera ayudar a seguir manteniendo la página, CLICK para descargar en ejemplo en forma gratuita.



If this post was helpful INVITE ME A COFFEE and so help keep up the page, CLICK to download free example.


Si te gustó por favor compártelo con tus amigos
If you liked please share it with your friends