Select specific value on filter and copy paste value

[Anantha Krishna]

Hello All,

Kindly help me for the below requirement

On Sheet4 i have country name and on Sheet2 i have pivot table with formula.

So on sheet2 if i select particular country, i want to copy cell value from the columnE which is highlighted with yellow and paste into sheet4 Result column .

Attached Excel file for your reference.

Thanks in Advance,
Krishna

 

[Nebu]

Hi:
May be the code as below..

Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
i& = WorksheetFunction.Match(Me.[B1], Sheet3.Range("A2:A5"), 0)
j = Application.Max(Me.Range("E4:E23"))
If IsNumeric(i) Then: Sheet3.Range("B" & i + 1) = j: Sheet3.Range("B" & i + 1).Copy: Sheet3.Range("B" & i + 1).PasteSpecial
Application.CutCopyMode = False
End Sub

Thanks

 

[Anantha Krishna]

Hi:
May be the code as below..



Thanks

Hello Nebu,

The code which provided by you, it is not working.

Can you please advise.

 

[vletm]

Anantha Krishna
Sample for this case ...
Press [ Get Results ]-button in Sheet4
Are Your given results ... correct?

 

[Anantha Krishna]

Anantha Krishna
Sample for this case ...
Press [ Get Results ]-button in Sheet4
Are Your given results ... correct?

Thank you so much vletm it is working