Need VBA code Help

[4 Barrel Harold]

I'm not very good with vba's so I hope i explain this right. Ok I need to enter a value in cell E6, after value is entered and when the button is pressed the vba searches for same value in column C (which answer to search would be C11). then I need the vba to add the input data in E6 to E11 (20+40 =60). After the addition is done then the vba would clear contents in Cell E6. E6 would be waiting on next value and button pressed again

 

[fadee2]

try using below code

lr = Sheets("sheet4").Range("d8").SpecialCells(xlCellTypeLastCell).Row
For j = 8 To lr
    If Cells(j, 4) = Range("e6") Then
        Range("e2").Value = Range("e6").Value + Cells(j, 5).Value
    Else
    End If
Next j
Range("e6").Value = ""

 

[Fluff]

Another option

Sub fourBarrelHarold()
   Dim Fnd As Range
   Set Fnd = Range("C:C").Find(Range("E6").Value, , , xlWhole, , , , , False)
   If Not Fnd Is Nothing Then
      Fnd.Offset(, 2).Value = Fnd.Offset(, 2).Value + Range("E6").Value
   Else
      MsgBox "Not found"
   End If
End Sub

 

[4 Barrel Harold]

Another option

Sub fourBarrelHarold()
   Dim Fnd As Range
   Set Fnd = Range("C:C").Find(Range("E6").Value, , , xlWhole, , , , , False)
   If Not Fnd Is Nothing Then
      Fnd.Offset(, 2).Value = Fnd.Offset(, 2).Value + Range("E6").Value
   Else
      MsgBox "Not found"
   End If
End Sub

Worked like a charm THANKS

 

[Fluff]

Glad we could help & thanks for the feedback.