Question: Sub TWS ( ) tot - 0 LastRow - Cells ( Rows . Count, 1 ) . End ( xIUp ) . Row For i
Sub TWS
tot
LastRow CellsRowsCount, EndxIUpRow
For i LastRow To Step
If CellsiValue "FRANK" Or CellsiValue "Lila" Then
tot tot CellsiValue
Else
tot tot Cells iValue
End If
Next I
MsgBox "The final result is & tot,
End Sub
Step by Step Solution
There are 3 Steps involved in it
1 Expert Approved Answer
Step: 1 Unlock
Question Has Been Solved by an Expert!
Get step-by-step solutions from verified subject matter experts
Step: 2 Unlock
Step: 3 Unlock
