Need Help in VBA Codes

[Manoj_Mishra]

I have an excel sheet with multiple columns (A,B,C,D,E,F) below

Date Worked	Project	Name	Code	Service Deliver	Worked Hours
9/14/2017	Alfa	Ram	123	Quality Check	2.5
9/14/2017	Alfa	Ram	123	No Work	2.5
9/14/2017	Alfa	XYZ	579	Quality Check	2.5
9/14/2017	Alfa	XYZ	579	No Work	2.0
9/14/2017	Alfa	ABC	932	Quality Check	2.5
9/14/2017	Beta	ABC	932	No Work	2.5
9/14/2017	Beta	Ram	123	Quality Check	2.5
9/14/2017	Beta	Ram	123	No Work	2.5
9/14/2017	Alfa	XYZ	579	Quality Check	2.5
9/14/2017	Alfa	XYZ	579	No Work	2.5
9/14/2017	Gama	ABC	932	Quality Check	2.5
9/14/2017	Gama	ABC	932	No Work	2.0
9/14/2017	Gama	Ram	123	Quality Check	2.5
I want to remove the duplicates rows by grouping data columns (A,B,C,D,E,) but summing the values in the G column corresponding to the repeating rows as shown in below image. Date Worked Project Name Code Service Deliver Worked Hours 9/14/2017 Alfa Ram 123 Quality Check 7.5 9/14/2017 Alfa Ram 123 No Work 2.5 9/14/2017 Beta Ram 123 No Work 2.5 9/14/2017 Beta ABC 932 No Work 2.5 9/14/2017 Gama ABC 932 No Work 2.0 9/14/2017 Alfa ABC 932 Quality Check 2.5 9/14/2017 Gama ABC 932 Quality Check 2.5 9/14/2017 Alfa XYZ 579 Quality Check 5.0 9/14/2017 Alfa XYZ 579 No Work 4.5 <tbody> </tbody><colgroup><col><col><col><col><col><col></colgroup>

<tbody>
</tbody><colgroup><col><col><col><col><col><col></colgroup>

 

[shg]

You could copy the data, remove duplicates in the first five columns, and use a formula:

A​

B​

C​

D​

E​

F​

G​

H​

I​

J​

K​

L​

M​

N​

1​

Date Worked​

Project​

Name​

Code​

Service Deliver​

Worked Hours​

Date Worked​

Project​

Name​

Code​

Service Deliver​

Worked Hours​

2​

9/14/2017​

Alfa

Ram

123​

Quality Check

2.5​

9/14/2017​

Alfa

Ram

123​

Quality Check

2.5​

M2: =SUMIFS($F$2:$F$14, $A$2:$A$14, H2, $B$2:$B$14, I2, $C$2:$C$14, J2, $D$2:$D$14, K2, $E$2:$E$14, L2)

3​

9/14/2017​

Alfa

Ram

123​

No Work

2.5​

9/14/2017​

Alfa

Ram

123​

No Work

2.5​

4​

9/14/2017​

Alfa

XYZ

579​

Quality Check

2.5​

9/14/2017​

Alfa

XYZ

579​

Quality Check

5.0​

5​

9/14/2017​

Alfa

XYZ

579​

No Work

2.0​

9/14/2017​

Alfa

XYZ

579​

No Work

4.5​

6​

9/14/2017​

Alfa

ABC

932​

Quality Check

2.5​

9/14/2017​

Alfa

ABC

932​

Quality Check

2.5​

7​

9/14/2017​

Beta

ABC

932​

No Work

2.5​

9/14/2017​

Beta

ABC

932​

No Work

2.5​

8​

9/14/2017​

Beta

Ram

123​

Quality Check

2.5​

9/14/2017​

Beta

Ram

123​

Quality Check

2.5​

9​

9/14/2017​

Beta

Ram

123​

No Work

2.5​

9/14/2017​

Beta

Ram

123​

No Work

2.5​

10​

9/14/2017​

Alfa

XYZ

579​

Quality Check

2.5​

9/14/2017​

Gama

ABC

932​

Quality Check

2.5​

11​

9/14/2017​

Alfa

XYZ

579​

No Work

2.5​

9/14/2017​

Gama

ABC

932​

No Work

2.0​

12​

9/14/2017​

Gama

ABC

932​

Quality Check

2.5​

9/14/2017​

Gama

Ram

123​

Quality Check

2.5​

13​

9/14/2017​

Gama

ABC

932​

No Work

2.0​

14​

9/14/2017​

Gama

Ram

123​

Quality Check

2.5​

 

[Macropod]

Manoj_Mishra: Kindly familiarize yourseld with this board's rules, especially those on duplicate posting (rule 12) and cross-posting (rule 13): http://www.mrexcel.com/forum/board-announcements/99490-forum-rules.html