Remove the character (Chr26) at the bottom of Column B or change this line as shown
If InStr(1, Trim(arr(i, 2)), "TOTAL") = 0 And Not (arr(i, 2) = Empty) And Not (arr(i, 2) = Chr(26)) Then
Remove the character (Chr26) at the bottom of Column B or change this line as shown
If InStr(1, Trim(arr(i, 2)), "TOTAL") = 0 And Not (arr(i, 2) = Empty) And Not (arr(i, 2) = Chr(26)) Then
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'
Posting Permissions
Reply With Quote