how to loop thru cell in 2 columns

G

Guest

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Network drive problems 2
How do I add the E column basd on the F column 4
list box remove item by combobox 4
method "range" of object "_worksheet" fails 5
slightly confused - object reference 1
Workbook open code to do 2 things 1
SumProduct in "for each" loop 3
merge worksheets 3

Top