What does this code do as I am trying to debug and I don't understand this part?

[dpaton05]

Other people helped me with this and I am trying to debug this. What does the following line of code do in this section?

                                AutoFilterCounter = .Columns(1).SpecialCells(xlCellTypeVisible).Count

                                'Check the count Autofilter
                                AutoFilterCounter = .Columns(1).SpecialCells(xlCellTypeVisible).Count
                                'If value less than 2, only the heading is visible so skip to the next sheet.
                                If AutoFilterCounter < 2 Then
                                    .AutoFilter
                                    'Add 1 to a sheet counter
                                    SheetCounter = SheetCounter + 1
                                    'If SheetCounter = 12, none of the 12 monthly sheets have the entered date and request number so let the user know
                                    If SheetCounter = 12 Then
                                        MsgBox "A job with the date and request number entered does not exist"
                                    End If
                                    GoTo SkipNextSheet
                                End If

Thanks

 

[Michael M]

Simply counts the visible cells based on an autof ilter of column "A:A"

 

[dpaton05]

Thanks Michael