Search for unique numbers and copy thier specific data to another sheet in excel VBA code

I have a workbook which has three sheets.

On Second Sheet named "Grade Wise" i have raw data. I want to create a button on 3rd Sheet named "Sheet1" which will copy data from 2nd sheet to 3rd sheet.

On 2nd sheet which has raw data, in column A and B data is repeated due to fact that these farmers have provided different grades with different weights.

Now the challenge here is i want to copy unique Farmer numbers and names (of column A and Column B) data for each farmers to 3rd sheet (As shown in attached picture).

In 2nd sheet, Column C has different grades, whose starting alphabets are X,C,M,B and their third alphabets includes A,F,C also.

CHALLENGE 1: Now, i want to copy sum of all X to X (on 3rd sheet column D), sum of all C to C(on 3rd sheet Column E), sum of all M to M (on 3rd sheet Column F) and sum of all B to B (on 3rd sheet Column G) for each unique number--As Shown In Attached Picture.

(VBA CODE IS WRITTEN FOR THIS CHALLENGE AND IS WORKING PROPERLY BUT I WANT TO ADD BELOW OPERATIONS TO THE VBA CODE) SHEET SAMPLE IS ATTACHED

CHALLENGE 2:It should also look for third alphabet(A,F,C) and copy their Sum of all A to A (on 3rd sheet column N), Sum of all F to F (on 3rd sheet column O), Sum of all C to C (on 3rd sheet column P) as shown in attached pictures I need VBA code for this operations please help me. :Untitled-1.png

If I understood you correctly replace the main procedure code.

Please Login or Register  to view this content.

You must enter your access path in the code - here

.InitialFileName = "your access path" ' e.g. "c: \ Users \ User \ Downloads \ Temp1 \".

Each time the 'Import data' button is used, the data A-E and H-X will be deleted.

Solution in the attachment.