VBA to Loop Through Rows and Update Different Sheet Based on Certain Criteria

[Just Mike]

Hi All

Looking for some help from you good people.

I have a workbook with two sheets. Sheet 1 is labeled Summary and Sheet 2 is labeled Detail.

Hoping to have Column R on Summary sheet to be update based on data found on the Detail sheet.

The logic I am trying to create would be If Column A on Detail Sheet matches Column B on Summary sheet and all of column G is "Complete" then Column R on Summary would show "Complete", If all of column G shows "On Hold" then Column R on summary would show "On Hold", If just one row in Column G shows "Not Started" then Column R on Summary would show "Not Started" and if just one row in Column G shows "In Progress" then Column R on Summary would show "In Progress"

Detail sheet below

A B C D E F G H

Project	Associate	Role	Site	Function	Estimated Time per Week	Status	% Complete
F	E	Project Lead	I	TP	1	Complete	10
F	R	Involved	L	TP	2	Complete	20
F	D	Involved	L	TP	3	Complete	30
F	M	Involved	H	TP	4	Complete	40
F	C	Involved	H	TP	5	Complete	50
F	T	Involved	H	TP	6	Complete	60
F	TY	Involved	H	TP	7	Complete	70
F	R	Involved	N	TP	8	Complete	80
Not F	E	Project Lead	I	TP	1	Complete	10
Not F	R	Involved	L	TP	2	Not Started	20
Not F	D	Involved	L	TP	3	Complete	30
Not F	M	Involved	H	TP	4	Complete	40
Not F	C	Involved	H	TP	5	Complete	50
Not F	T	Involved	H	TP	6	Complete	60
Not F	TY	Involved	H	TP	7	Complete	70
Not F	R	Involved	N	TP	8	Complete	80

Example below

B8 on Summary shows Project F / A2 - A8 on Detail show Project "F" and G2 - G8 show "Complete" so R8 on Summary sheet should show "Complete"