Solved: Major issue blank cells

[khalid79m]

            With Range("Talk_Time").SpecialCells(xlCellTypeBlanks)
                    .NumberFormat = "hh:mm:ss"
                End With

My code looks changes the format of all blanks cells in range ("Talk_Time") to HH:MM:SS.

but if there are no blank cells it throws up a debug message cells not found.. ? can anyone help

[Bob Phillips]

[vba]
On Error Resume Next

Set rng = Range("Talk_Time").SpecialCells(xlCellTypeBlanks)
On Error Goto 0

If Not rng Is Nothing Then rng.NumberFormat = "hh:mm:ss"
[/vba]

[khalid79m]

thanks mate