View Single Post
 
Old 10-17-2019, 05:26 AM
p45cal's Avatar
p45cal p45cal is offline Windows 10 Office 2019
Expert
 
Join Date: Apr 2014
Posts: 948
p45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond repute
Default

Untested:
Code:
If (InStr(1, UCase(Vals(rw, colm)), "X") > 0 Or InStr(1, UCase(Vals(rw, colm)), "K") > 0) Then ThisRowCount = ThisRowCount + 1 Else ThisRowCount = 0
Reply With Quote