VBA: copy by address filtered selection of cells

hi
I am trying to copy a group of cells (a selection)from one sheet ("SOURCE")
to another ("DEST"). Before I copy I am doing a filter (using AutoFilter)for that cells, so only rows start with column "YES" will be copied.


Sub Build()

Application.ScreenUpdating = False

Worksheets("SOURCE").Activate

[SOURCE!B3:D6].AutoFilter Field:=1, Criteria1:="YES"

' copy by value
'[SOURCE!B3:D6].Copy Sheets("DEST").[A1]

' copy by address
Range("SOURCE!B3:D6").Select
[DEST!A1:C4].Formula = "=SOURCE!" & ActiveCell.Address(0, 0)

[SOURCE!B3:D6].AutoFilter

Application.ScreenUpdating = True

End Sub

If I copy the cells by value (using copy method) it's OK - the filter works.
But I want to copy the cells by reference (address) so change in the SOURCE
will affect the cell in the DEST. Here the filter is ignored. What can I do
to copy cells by reference and still using the filter? ?
Tnx

Originally Posted by arlu1201

Your requirement is not very clear. Maybe you could try explaining again?

I am trying to copy the address of rows that match the criteria of "YES".
Copy the values of cells that match the criteria works well, but I want to copy address of those cells that match the criteria.

Not sure what this is exactly what you want, but try.

well in general it works, but:
First, its a complicated solution. I thought about something more simple since I need to duplicate this code to some other sheets I have.
Second, this solution is copying also the "YES" column, but I don't need to copy it. of course I can change the indices in the array to accomplish it , however , to debug such code , now or in the future, is a very difficult mission to me.
thanks anyway