how to loop thru cell in 2 columns
 

How do I get the cell information From the E cels based on the F cells

Dim sht As Worksheet
Dim cel As Range
Dim j As Integer
For Each sht In Worksheets
For Each cel In sht.Range("E:E")
If Cel= TotalHours.Projects.Text Then
'TotalHoursToDate.Text = TotalHoursToDate.Text +
Range(Sheet1!Range("E" + j))
'TotalHoursToDate.Text = 33
End If
Next cel
Next sht

how to loop thru cell in 2 columns
 

I think anyone here will need more information in order to help you out.

"DMB" wrote:

How do I get the cell information From the E cels based on the F cells

Dim sht As Worksheet
Dim cel As Range
Dim j As Integer
For Each sht In Worksheets
For Each cel In sht.Range("E:E")
If Cel= TotalHours.Projects.Text Then
'TotalHoursToDate.Text = TotalHoursToDate.Text +
Range(Sheet1!Range("E" + j))
'TotalHoursToDate.Text = 33
End If
Next cel
Next sht