Is active cell empty : Formula « Excel « VBA / Excel / Access / Word






Is active cell empty

 
     Sub IsActiveCellEmpty()
         Dim sFunctionName As String, sCellReference As String
         sFunctionName = "ISBLANK"
         sCellReference = ActiveCell.Address
         MsgBox Evaluate(sFunctionName & "(" & sCellReference & ")")
     End Sub

 








Related examples in the same category

1.Fill formula to cell
2.Inserts a formula in cell A11 of a worksheet that calculates the sum of the values in the range A2:A10 using the Excel application's SUM function
3.Use [] to evaluate formula
4.Two ways you can use Evaluate to generate a reference to a Range object, and assign a value to that object
5.The Evaluate method can also be used with arrays.
6.Assigns the values 101 to 200 to the range B1:B100, and again does it more efficiently than a For...Next loop
7.Use Copy and Paste or AutoFill functions
8.Create a set of related formulas in a column: use a looping structure to iterate through the cells that receive the formula