/ Forside/ Teknologi / Administrative / MS-Office / Spørgsmål
Login
Glemt dit kodeord?
Brugernavn 

Kodeord  


Reklame
Top 10 brugere
MS-Office
#NavnPoint
sion 18609
refi 14474
Klaudi 8489
Rosco40 5695
berpox 5456
dk 5398
Benjamin... 4870
webnoob 4747
o.v.n. 4637
10  EXTERMINA.. 4373
Sortere dubletter fra i VBA
Fra : Flemming_Clausen
Vist : 76 gange
30 point
Dato : 07-12-17 09:53

Hej

Jeg skal have lavet VBA, der kan sortere dubletter fra.

A B
Pærer Æbler
Appelsiner Citroner
Bananer Bananer
Meloner
Appelsiner

Jeg vil gerne have at VBA'en kan sortere Citroner og Meloner fra, dvs. at den skal slette Cellen med Æbler, Bananer og Appelsiner, evt. kopiere Citroner og meloner over i kolonne C.

Håber det giver mening.

 
 
Kommentar
Fra : CiviC


Dato : 08-01-18 20:42

Kan du bruge denne?
Den skriver dem der er dubletter af i kolonne C

Sub Dubletter()
Dim d As Object, c
Dim ar As Long, br As Long

Set d = CreateObject("scripting.dictionary")
ar = Range("A" & Rows.Count).End(xlUp).Row
br = Range("B" & Rows.Count).End(xlUp).Row
For Each c In Range("A1:A" & ar)
d(c.Value) = 1
Next c
For Each c In Range("B1:B" & br)
If d(c.Value) = 1 Then
cr = Range("C65000").End(xlUp).Row + 1
Range("C" & cr) = c
End If
Next c
End Sub


Alternativt, kan du lave en betinget formatering, der highlighter dubletterne
Se her: http://www.excel-easy.com/examples/find-duplicates.html


Mvh
Civic

Du har følgende muligheder
Dette spørgsmål er blevet annulleret, det er derfor ikke muligt for at tilføje flere kommentarer.
Søg
Reklame
Statistik
Spørgsmål : 174438
Tips : 31730
Nyheder : 719565
Indlæg : 6389327
Brugere : 218336

Månedens bedste
Årets bedste
Sidste års bedste