Thread: [Solved] How to Pass Arguments in a Formula?
View Single Post
 
Old 10-13-2014, 06:10 AM
tinfanide tinfanide is offline Windows 7 64bit Office 2010 32bit
Expert
  
Join Date: Aug 2011
Posts: 312
tinfanide is on a distinguished road
Default
I've resolved it myself.

Code:
Dim sIndirect As String

sIndirect = "INDIRECT(""" & oSchoolWorkTable.Name & "[#This Row]"")"

With oSchoolWorkTable.ListColumns("Name").Range.FormatConditions _
    .Add(xlExpression, Formula1:="=COUNTIF(" & sIndirect & ",FALSE)>0")
End With
Reply With Quote