Moi!
Olisko täällä apua joltain Excel taitajalta, miten pystyn vertailemaan kahta eri saraketta, ennen kun virhe ilmoitus tulee?
Eli kyseessä nimen vertailu. B sarakkeessa on etunimi ja C sarakkeessa sukunimi.
Jos etunimi jo löytyy, pitäisi vertailu siirtyä sukunimeen. Voisiko joku auttaa? Tämä koodi vertaa ainoastaan etunimeä.. (koodi kopioitu jostain) 😒 Kiitos avusta!!
Private Sub Worksheet_Change(ByVal Target As Range)
Dim son As Long, onay, bul As String
Dim ara As Range
If Intersect(Target, Range("B:B")) Is Nothing Then Exit Sub
son = Cells(Rows.Count, "B").End(xlUp).Row
On Error Resume Next
If WorksheetFunction.CountIf(Range("B2:B" & son), Target) < 1 Then
Exit Sub
End If
If WorksheetFunction.CountIf(Range("B2:B" & son), Target) > 1 Then
bul = Empty
Set ara = Range("B2:B" & son).Find(Target, , xlValues, xlWhole)
If Not ara Is Nothing Then
adres = ara.Address
Do
bul = bul & ara.Row & " - " & Cells(ara.Row, "B") & Chr(10)
Set ara = Range("B2:B" & son).FindNext(ara)
Loop While Not ara Is Nothing And ara.Address <> adres
End If
MsgBox "This record already exists." & vbLf & "" & vbLf & "Row : Records :" & vbCrLf & Chr(10) & bul & vbLf & " ", vbCritical, ""
Target.ClearContents
Target.Activate
End If
End Sub
Saman tiedon vertailu kahteen sarakkeeseen
Anonyymi
0
578
Vastaukset
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 1031585
Välillä käy mielessä
olisiko sittenkin ollut parempi, että emme koskaan olisi edes tavanneet. Olisi säästynyt monilta kyyneleiltä.781224- 881147
- 1391066
Mika Muranen juttu tänään
Jäi puuttumaan tarkennus syystä teolle. Useat naapurit olivat tehneet rikosilmoituksia tästä kaverista. Kaikki oli Muras11027Uskoontulo julistetun evankeliumin kautta
Ja kun oli paljon väitelty, nousi Pietari ja sanoi heille: "Miehet, veljet, te tiedätte, että Jumala jo kauan aikaa sitt5821015- 20920
Hanna Kinnunen sai mieheltään tiukkaa noottia Tähdet, tähdet -kotikatsomosta: "Hän ei kestä, jos..."
Hanna Kinnunen on mukana Tähdet, tähdet -kisassa. Ja upeasti Salkkarit-tähti ja radiojuontaja onkin vetänyt. Popedan Lih8912Oho! Farmi-tippuja Wallu Valpio ei säästele sanojaan Farmi-oloista "Se oli niin luotaantyöntävää..."
Wallu oikein listaa epämiellyttävät asiat… Monessa realityssä ollut Wallu Valpio ei todellakaan säästele sanojaan tippum9774Helvetin hyvä, että "hullut" tappavat toisensa
On tämä merkillistä, että yritetään pitää hengissä noita paskaperseitä, joilla ei ole muuta tarkoitusta, kuin olla riida8700