Regarding Current Region

[bhandari]

Sub CurrentRegion_Property()
Set rngCond = ActiveSheet.cells.SpecialCells(xlCellTypeAllFormatConditions)
If Not rngCond Is Nothing Then
  rngCond.BorderAround xlContinuous
End If
End Sub

What should i use variable for rngcond
"Variable not defined"

 

[JLGWhiz]

Sub CurrentRegion_Property()
Set rngCond = ActiveSheet.cells.SpecialCells(xlCellTypeAllFormatConditions)
If Not rngCond Is Nothing Then
  rngCond.BorderAround xlContinuous
End If
End Sub

What should i use variable for rngcond
"Variable not defined"

You need to make a Dim statement to define the data type for rngCond. If your cells with conditional formatting are all contiguous cells, you can Dim it as a range. If they are not contguous, you will probably get a different error telling you that it can't do that with split ranges.