I'm working to run through a range of Rows (62 in total) to see which ones have zero values. Those that have values will be copied and placed elsewhere. However, I'm running into issues getting things to sum.
I've tried a few versions, none of which are working. Getting error 438 with this version. Any help would be much appreciated.
I've tried a few versions, none of which are working. Getting error 438 with this version. Any help would be much appreciated.
VBA Code:
Dim RowNumber As Long
For RowNumber = 3 to 65 Step 1
If Application.Worksheetfunction.Sum(Range("BC" & RowNumber & ":BM" & RowNumber) <> 0 Then
Range("BC" & RowNumber & ":BM" & RowNumber).Copy
Move data where it needs to go here.
End If
Next RowNumber