excel udfordring!

Det vil være oplagt med en makro - Hvordan ser din data ud?

eks:

    A          B
1 varenummer Pris
2 129401     100
3 132234     432
4 234432     23
5 234443     43

Ja ligesom du har beskrevet!! Hvordan laves denne makro?

På forhånd tak

Erstat "show = Array(10, 22, 3)" med det array, der passer til dine varenumre. Hvis der også er varenumre, der indeholder tekst, skal du smide "" omkring teksten - eks show = Array("vnr:12","vnr:20")

Følgende kode kopieres ind i et makro modul. Det er forklaret her, hvordan du gør det: http://www.anthony-vba.kefra.com/vba/vbabasic1.htm


Option Explicit
Function hide()
    Dim show
    show = Array(10, 22, 3)
   
    Dim rowCount As Integer
    With ActiveSheet.UsedRange
        rowCount = .Cells(.Count).row
    End With
   
    Dim row As Integer
    For row = 1 To rowCount
        Dim i As Integer
        With Rows(row)
            .Hidden = True
            For i = 0 To UBound(show)
                If show(i) = Cells(row, 1) Then
                    .Hidden = False
                End If
            Next
        End With
    Next
End Function

Hvis du foretrækker en formelløsning, så kan du prøve med LOPSLAG. Hvis du for eksempel har varenumre og priser i A2:B16000 og du har de relevante 20 varenumre i D2:D21, så kan du i E2 indtaste:
=LOPSLAG(D1;$A$2:$B$16000;2;0)
Kopier formlen nedad til og med E21.

Hans