Hi hzppby,
Try this while on the 'players' tab:
HTH![]()
Option Explicit Sub Macro1() Dim rngCell As Range Application.ScreenUpdating = False For Each rngCell In Range("G1", Range("G" & Rows.Count).End(xlUp)) If IsError(rngCell) = True Then rngCell.ClearContents End If Next rngCell Application.ScreenUpdating = True End Sub
Robert
Bookmarks