VBA/Excel/Access/Word/Excel/Evaluate

Test for empty cell

   <source lang="vb">

Sub IsActiveCellEmpty()

  Dim stFunctionName As String
  Dim stCellReference As String
  stFunctionName = "ISBLANK"
  stCellReference = ActiveCell.Address
  MsgBox Evaluate(stFunctionName & "(" & stCellReference & ")")

End Sub

</source>
   
  

Use Evaluate function to execuate function

   <source lang="vb">

Public Sub ConcatenateExample1()

  Dim X As String, Y As String
  X = "Jack "
  Y = "Smith"
  MsgBox Evaluate("CONCATENATE(""" & X & """,""" & Y & """)")

End Sub

</source>