Code:
Sub COUNT() Dim ARRDATA As Variant '§ with range=>array must ALLWAYS be variant. Dim ROWidx As Integer Dim COLidx As Integer '§ COLidxlect amount Dim ARRCOUNTER() As Integer '§ count results for each line Dim COUNTER As Integer Dim TOTAL As Integer '§ COLidxlect numbers
Leave a comment: