Advance Filter Return

[Fable]

Hello,

I've created an Adv. Filter that copies data from Sheet2 to Sheet3
(headers included), the issue is that I would like to give the ability
to the user to select which record from the possible multiple that
populated from the Adv. Filter.

Example user clicks column "A" ("Date", Sheet3) and on the record / ROW
he or she is needs to be populate back to Sheet1 for editing.

I do have a “unique record” tie this all together which date & time
(merge, column "F" as text) that would be like my lookup unique record,
but I simple cant think of a way to get macro to run based on position,
or hyperlink, checkbox to make this work, any ideas.

Any help is appreciated!

 

[broro183]

Hi Fable,

You may have solved this issue yourself (or by reposting) by now but
anyway...

re "I've created an Adv. Filter that copies data from Sheet2 to
Sheet3"
I have never been able to get an advanced filter to copy data from one
sheet to another so I'm curious, what version of Excel are you using?

To allow them to select & copy one or multiple rows for pasting back to
sheet1, have a look at:
http://www.j-walk.com/ss/excel/tips/tip36.htm.

You could incorporate the macro on the above page into your workbook,
get the users to select the complete row/s by holding down control as
they click on the row #'s to select the entire row, & then run this
macro.
NB: Test this on a copy of your workbook first & you will notice that
after you select the cell you want it pasted to, it pastes the rows in
the same layout as they were when copied (ie there may be blank rows
between them). This is just one possibility but may be a helpful
starting point.

hth,
Rob Brockett
NZ
Always learning & the best way to learn is to experience...

 

[Peo Sjoblom]

If you start from the other sheet you can copy advanced filtered results to
another sheet

http://www.contextures.com/xladvfilter01.html#ExtractWs

--
Regards,

Peo Sjoblom

Northwest Excel Solutions

Portland, Oregon

 

[broro183]

Hi Peo,
Ahh, I see...
Thanks, another little gold mine from Debra that will come in
handy.

Cheers
Rob Brockett
NZ
Always learning & the best way to learn is to experience...

 

[Fable]

Sorry for the delay in response Rob, I was traveling between Mexico and
Argentina and in meeting all week. Any how, I did not see Peo posting
prior (Thanks Peo) but I was able to solve my problem with the code
below. In a nut shell the user click in Col. B (yellow Boxes) and it
will import that record. The only "side effect" is that the adrress is
value is place in the yellow box, which is really not a problem since
with a little make up you can fix it (conditional formatting) or a code
that clears the B Col. (Range). Hope this help as it did for me.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel
As Boolean)
Application.ScreenUpdating = False
Cancel = True
Dim IntersectRange As Range
Set WatchRange = Range("B10:B5000")
Set IntersectRange = Intersect(Target, WatchRange)
If IntersectRange Is Nothing Then
MsgBox ("Select an option from the yellow high lights")
Else
Target = "C" & ActiveCell.Row & ":AD" & ActiveCell.Row
Range(Target).Select
Selection.Copy
Range("C12").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range("B10").Select
End If
Call EXEC_IMPORT
Sheets(4).Select
Range("D15").Select
Sheets(3).Select
Application.ScreenUpdating = True
End Sub

 

[broro183]

Hi Fable,
I'm pleased you were able to solve your problem

Rob Brockett
NZ
Always learning & the best way to learn is to experience...