Zellen haben Formel (Operator) oder nicht

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

 Ranking-Hits zurück Sitemap
Designed by www.wbrnet.info