Just nu i M3-nätverket
Gå till innehåll
Bo Bjärdahlen

Jämföra kolumner i Excel

Rekommendera Poster

Bo Bjärdahlen

Jag har två kolumner med telefonnummer och vill ha ut alla nummer som inte finns i båda kolumnerna.

 

Hur gör jag?

 

[inlägget ändrat 2001-06-20 10:45:08 av Bo Bjärdahlen]

[inlägget ändrat 2001-06-20 10:46:06 av Bo Bjärdahlen]

[inlägget ändrat 2001-06-20 10:48:21 av Bo Bjärdahlen]

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser
XL-Dennis

Hej,

 

Du hittar ett flertal tips på min hemsida: http://www.xldennis.com,'>http://www.xldennis.com,

bl a "Jämföra listor"

 

Mvh

Dennis

 

 

 

 

 

 

 

http://www.xldennis.com

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser
DQ

Skapa ett makro med koden:

 

Private Function returneraNummer() As Collection

Dim ruta As Excel.Range

Dim kontroll As Boolean

Dim i As Integer, j As Integer

Dim lista As Collection

 

Set lista = New Collection

Set ruta = Blad1.Range("a1")

 

Do

j = 0

kontroll = False

Do

If ruta.Offset(j, 1) = ruta.Offset(i) Then

kontroll = True

End If

j = j + 1

Loop While Not ruta.Offset(j, 1) = "" And Not kontroll

If Not kontroll Then

Call lista.Add(ruta.Offset(i).Text)

End If

i = i + 1

Loop While Not ruta.Offset(i) = ""

 

Set returneraNummer = lista

End Function

 

Private Sub skrivUt(ByRef lista As Collection)

Dim i As Integer

Dim ruta As Excel.Range

 

Set ruta = Blad2.Range("a1")

 

For i = 1 To lista.Count

ruta.Offset(i) = lista(i)

Next i

End Sub

 

'denna som anropas utifrån Excel

Public Sub skrivUtTel()

Dim lista As Collection

 

Set lista = returneraNummer

Call skrivUt(lista)

End Sub

 

 

Hoppas det löser sig. Jag har testat koden och det här fungerar. Sen får du ange dina startrutor eller skriva en metod som letar upp dem - vilket du vill och det samma för de blad eller böcker du vill skriva i/till. =) Lycka till!

 

Tillägg: denna kod fungerar inte bara för telefonnummer - den kan jämföra vilka typer av värden som helst. Så länge värdeA inte finns i kolumn1 men inte i kolumn2 så skrivs det ut.

 

//Emma

 

 

[inlägget ändrat 2001-06-20 14:39:52 av DQ]

[inlägget ändrat 2001-06-20 14:42:39 av DQ]

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser
Bo Bjärdahlen

 

Hur väljer jag vilka kolumner som den skall jämför och var skriver den ut nummerna?

 

 

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser
XL-Dennis

Bo,

 

Uppenbarligen gillar du inte formeltekniska lösningar men då Emmas kod missar poängen så får du chansen en gång till här ;-)

 

1. Slå ihop dina två listor till en.

2. Sätt en rubrik ovanför listan.

3. Välj kommandot Data | Filter | Avancerat filter.

4. I dialogrutan väljer "kopiera till annan plats" och bcökar för "Endast unika poster".

 

Lycka till,

Dennis

 

http://www.xldennis.com

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

Skapa ett konto eller logga in för att kommentera

Du måste vara medlem för att kunna kommentera

Skapa ett konto

Skapa ett nytt konto på vårt forum. Det är lätt!

Registrera ett nytt konto

Logga in

Redan medlem? Logga in här.

Logga in nu



×
×
  • Skapa nytt...