VBA Excel - Localize células que contenham fórmulas com valores literais - To locate cells containing formulas with literal values

Sempre tem alguém que pergunta, mas prá que serve essa função? Bem, se você ainda não sabe prá que essa função serve é porque ainda tem alguma experiência a desenvolver com o MS Excel ou mesmo com o desenvolvimento VBA.

Faça o seguinte: Guarde essa função em sua biblioteca, e te garanto que no futuro precisará dela, mas do que imagina.

Aos demais que compreendem sobre o que estou falando, segue:

Function CellUsesLiteralValue (Cell As Range) As Boolean      If Not Cell.HasFormula Then          Let CellUsesLiteralValue = False      Else          Let CellUsesLiteralValue = Cell.Formula Like "*[=^/*+-/()><, ]#*"      End If  End Function

Reference:

John Walkenbach e John Green

Tags: VBA, Excel, cell, formulas