Ga naar inhoud

Welkom op PC Helpforum!
PC Helpforum helpt GRATIS computergebruikers sinds 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!


PieterHeymans

dubbele waarden vergelijken

Aanbevolen berichten

Hallo

 

In bijlage heb ik een lijst met klanten gegevens.

aan deze klanten hebben wij verkocht op een beurs.

Dit is nu het tweede jaar.

uiteraard moeten wij ook factureren aan deze klanten.

ik wil nu nagaan welke klanten al in ons systeem zitten aan de hand van het BTW nummer.

In kolom J staat de BTW-nummers van de klanten. In kolom K staan de BTW nummers van de klanten van vorig jaar.

Bestaat er een oplossing om aan te duiden in kolom J welke BTW nummers al in kolom K staan?

Zo weten welke nieuwe klanten zijn en wij moeten aanmaken.

 

Alvast bedankt voor de hulp!

vergelijking BTW.xlsx

Deel dit bericht


Link naar bericht
Delen op andere sites


Geplaatst: (aangepast)
Op 28/5/2019 om 11:05, PieterHeymans zei:

Bestaat er een oplossing om aan te duiden in kolom J welke BTW nummers al in kolom K staan?

Sub tst()
    Set sht = Blad1
    sn = sht.Range("K2:K" & sht.Cells(sht.Rows.Count, 11).End(xlUp).Row)
    With CreateObject("scripting.dictionary")
        For i = 2 To UBound(sn)
            If sn(i, 1) <> vbNullString Then x0 = .Item(Trim(sn(i, 1)))
        Next
        y = .Count
        sht.Range("J2:J" & sht.Cells(sht.Rows.Count, 10).End(xlUp).Row).Interior.Color = xlNone
        For Each cl In sht.Range("J2:J" & sht.Cells(sht.Rows.Count, 10).End(xlUp).Row)
            If cl <> vbNullString Then cl.Interior.Color = IIf(.exists(Trim(cl.Value)), vbGreen, vbRed)
        Next
    End With
End Sub

De groene cellen zijn de bestaande nummers, de rode de nieuwe.

aangepast door bakerman

Deel dit bericht


Link naar bericht
Delen op andere sites

Doe mee aan dit gesprek

Je kunt dit nu plaatsen en later registreren. Indien je reeds een account hebt, log dan nu in om het bericht te plaatsen met je account.

Gast
Reageer op dit topic

×   Geplakt als verrijkte tekst.   Plak in plaats daarvan als platte tekst

  Er zijn maximaal 75 emoji toegestaan.

×   Je link werd automatisch ingevoegd.   Tonen als normale link

×   Je vorige inhoud werd hersteld.   Leeg de tekstverwerker

×   Je kunt afbeeldingen niet direct plakken. Upload of voeg afbeeldingen vanaf een URL in


Logo

OVER ONS

PC Helpforum helpt GRATIS computergebruikers sinds juli 2006. Ons team geeft via het forum professioneel antwoord op uw vragen en probeert uw pc problemen zo snel mogelijk op te lossen. Word lid vandaag, plaats je vraag online en het PC Helpforum-team helpt u graag verder!

×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.