Avatar billede cali1 Mester
25. oktober 2015 - 16:28 Der er 7 kommentarer og
1 løsning

Sammenlign værdier i kolonner.

Hej jeg har et excelproblem.

Jeg har 2 kolonner med værdier (tal).

Jeg skal finde værdier som er i kolonne 2 men ikke i kolonne 1.

Jeg skal finde værdier som er i kolonne 1 men ikke i 2.

Jeg skal finde værdier som findes i begge kolonner.

Synes ikke der er nogen filtre som kan hjælpe mig med denne opgave så håber jeg kan få hjælp her på sitet.

På forhånd tak
Avatar billede supertekst Ekspert
25. oktober 2015 - 16:31 #1
Lidt VBA kan gøre det!
Kunne det være en ide at farvelægge cellerne efter de forekomster du nævner?
Avatar billede cali1 Mester
25. oktober 2015 - 17:41 #2
Ja det med farvelægning ville være en lækker feature. Jeg kan dog slet ikke VBA....
Avatar billede supertekst Ekspert
25. oktober 2015 - 18:19 #3
Ok - det skal jeg nok prøve - vender tilbage senere..
Avatar billede cali1 Mester
25. oktober 2015 - 18:24 #4
Mange tak :-) jeg kører excel 365.
Avatar billede jens48 Ekspert
25. oktober 2015 - 22:14 #5
Det er ret let med betinget formattering. I kolonne A skriver du

=COUNTIF($B:$B;A1)>0

og i kolonne B skriver du

=COUNTIF($A:$A;B1)>0

Giv dem samme farve for begge betingelser. Det er dem der findes begge steder. De andre findes kun et sted
Avatar billede cali1 Mester
26. oktober 2015 - 06:23 #6
Mange tak Jens48,er det vba du har lavet? Er du venlig at forklare det med farverne...

Tak:-)
Avatar billede jens48 Ekspert
26. oktober 2015 - 08:55 #7
Nej, det har ikke noget med VBA at gøre. Mærk A kolonnen op, gå ind i Betinget formattering, vælg en ny regel og indsæt den første formel, og formatter med den ønskede farve. Og gør så det samme med kolonne B
Hvis du har en dansk version så hedder COUNTIF TÆL.HVIS
Avatar billede supertekst Ekspert
26. oktober 2015 - 09:38 #8
VBA-version kunne se således ud:

Hvis du sender en mail - kan du få min testfil. @-adresse under min profil.

VBA-koden indsættes under relevante ark / Højreklik på ark / Vis programkode.
Eksekver koden fra alm. visning med Alt+F8 / Afspil makro

Public Sub findFællesTal()
Dim antalRæk As Integer, ræk As Integer, tal, ræk2 As Integer
    antalRæk = ActiveCell.SpecialCells(xlLastCell).Row
   
    For ræk = 1 To antalRæk
        tal = Range("A" & ræk)
        If tal <> "" Then
            ræk2 = findRække("B1:B" & antalRæk, tal)
            If ræk2 > 0 Then
                Range("A" & ræk).Select
                Selection.Interior.ColorIndex = 4
                Range("B" & ræk2).Select
                Selection.Interior.ColorIndex = 4
            End If
        End If
    Next ræk
End Sub
Private Function findRække(område, id)
    With ActiveSheet.Range(område)
        Set c = .Find(id, LookIn:=xlValues, LookAt:=xlWhole)
        If Not c Is Nothing Then
            findRække = c.Row
        Else
            findRække = 0
        End If
    End With
End Function
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester