Custom Search

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.

En el caso que estés o desees  operar las planillas de cálculo como profesional visita el siguiente linck click acá, si quieres algo en ingés sobre Excel, entonces debes hacer click acá. 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.

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..

He publicado dos pequeños libros muy útiles, léanlo si tienen la posibilidad, ya que estoy seguro les ayudará; uno denominado FORMAS DE SELECCIONAR O REFERENCIAR CELDAS CON VBA (Spanish Edition), dirigido para el que constantemente está creando macros para automatizar las hojas de Excel y aliviar el trabajo repetitivo. El otro está dirigido a quienes trabajan constantemente con fechas en Excel y se llama FORMATOS Y FUNCIONES DE FECHA Y HORA DE MICROSOFT EXCEL (Spanish Edition)

 

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.


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