Group,

I am working on a project that selects 2 values and looks
for those 3 values in another sheet. My question is how
can i make it add the variable found ones the two criteria
are met. (code is below)


Thanks in advance,

Fish

Dim fsheet As String
Dim rng As Range
Dim val As String
Dim val1 As String


Do
ActiveCell.Offset(1, 0).Select
val = ActiveCell.Offset(0, -12).Value


With Workbooks(fnameb).Worksheets(fsheet)
Set rng = .Columns(3).Find(val)
End With
If Not rng Is Nothing Then
val1 = rng.Offset(0, 11).Value