Question: Sub TWS ( ) tot - 0 LastRow - Cells ( Rows . Count, 1 ) . End ( xIUp ) . Row For i

Sub TWS()
tot -0
LastRow - Cells(Rows.Count, 1).End(xIUp).Row
For i - LastRow To 8 Step -1
If Cells(i,1).Value - "FRANK" Or Cells(i,1).Value - "Lila" Then
tot - tot + Cells(i,2).Value
Else
tot - tot + Cells \((i,4)\).Value
End If
Next I
MsgBox "The final result is "\& tot, ,"2200"
End Sub
Sub TWS ( ) tot - 0 LastRow - Cells ( Rows .

Step by Step Solution

There are 3 Steps involved in it

1 Expert Approved Answer
Step: 1 Unlock blur-text-image
Question Has Been Solved by an Expert!

Get step-by-step solutions from verified subject matter experts

Step: 2 Unlock
Step: 3 Unlock

Students Have Also Explored These Related Programming Questions!