Macro Help - dropdown list to new tab

[PghYoPro]

Hi,

I have a dropdown in cell D4. This changes a unique ID in cell D7, which calculates the rest of the sheet.

Is there a simple macro that can copy cell AD57 (the result) into a different tab for each name as the macro cycles through the list in cell D4?

Thanks for any help in advance.

 

[PghYoPro]

To clarify, I don't need a tab for each name from the dropdown in cell D4.


Just looking to extract the name and the result to a new tab for a summary tab

 

[JoeMo]

Where (what cell) do you want the extracted data to go, and what do you want the name of the new tab to be? Is the drop down a data validation drop down?

 

[PghYoPro]

Name from data validation dropdown starting at cell A1 downwards.

Tab name could just be summary

 

[JoeMo]

Where is the list of names that is found on the drop down - what sheet and what range on that sheet?

 

[PghYoPro]

A5:A90 on a sheet titled "Pool Listing"

 

[JoeMo]

Run this with the sheet holding the drop down as the active sheet. Assumes a sheet with tab name "summary" is already present. List of the values in AD57 on the active sheet that result from looping through all the items on the validation list on sheet "Pool Listing" will be returned to the summary sheet in col A starting in A1.

Sub PGYYoPro()
'run this with the sheet holding the drop down active
Dim i As Long
With ActiveSheet
    For i = 5 To 90
        .Range("D4").Value = Sheets("Pool Listing").Range("A" & i).Value
        ActiveSheet.Calculate
        Sheets("summary").Range("A" & i - 4).Value = .Range("AD57").Value
    Next i
End With
End Sub

 

[PghYoPro]

Great, thanks! How would I go about adding the correlating name in D4 to column B in the summary tab to match up with the returned values?

 

[PghYoPro]

Solved. Thanks again, JoeMo

 

[JoeMo]

You are welcome - thanks for the reply.