Using Match and Address within Macro/VBA

I have 2 worksheets "Data" and "P558 Main FE Defects"

In "Data" I want to be able to click a button and paste "E46" into the correct location in "P558 Main FE Defects". I am able to find the value of a given cell with this formula, but what I am needing is the address so I know where to copy and paste "E46" to. Here is the formula that gives me the value of the cell...

=INDEX('P558 Main FE Defects'!B2:AF45,MATCH(Data!D2,'P558 Main FE Defects'!A2:A45,0),MATCH(Data!A2,'P558 Main FE Defects'!B1:AF1,0))

Once I find the address of this cell I want to paste the value of "Data!E46" into this location. I am somewhat new to VBA/Macros and was wondering if anyone could help?

Data.PNG ("Data")
P558 Main FE Defects.PNG ("P558 Main FE Defects")

That is really a better job for a pivot table. Use the table on Data (A:E) as your source, with Defect as the row field, Date as the column field, and Qty as the data field.

You could use looping code to produce the table by processing all of column E - do you really want the button to do just one row?

Please Login or Register  to view this content.

What if I wanted to add shifts like you see in the images I have posted below? I tried using the same macro but it kept placing all the information in the 1st Shift Column. In the total column is the sum formula for shifts 1-3.

Data.PNG(Data)

P558 Main FE Defects.PNG(P558 Main FE Defects)

Try changing

Please Login or Register  to view this content.

to

Please Login or Register  to view this content.

Please Login or Register  to view this content.