Få præsenteret rækker fra et anden ark der matcher værdi i kolonne a

En let måde at gøre dette på er at benytte sig af Excels indbyggede filterfunktion. Så filtrer og kopier. Evt. kan der anvendes en lille VBA-kode a la denne:

Sub KopierFiltrede()

Dim ws1 As Worksheet: Set ws1 = ThisWorkbook.Sheets("Dataark")
Dim ws2 As Worksheet: Set ws2 = ThisWorkbook.Sheets("Søgeark")

Application.ScreenUpdating = False
ws2.Columns("A:XFD").Delete Shift:=xlToLeft 'Sletter indholdet af søgearket før nyt filtreret udtræk kopieres over i arket
On Error Resume Next
ws1.UsedRange.SpecialCells(xlCellTypeVisible).Copy _
ws2.Range("A1")
Application.ScreenUpdating = True

End Sub

Se det udført i praksis i dette eksempel:

http://gupl.dk/692805/

Jeg tager lige et kig på den når jeg kommer hjem på forhånd tak.