Avatar billede Chewie Novice
05. oktober 2015 - 09:58 Der er 2 kommentarer og
1 løsning

tekst i B indgår i A

Hej XLer

Jeg sidder med en lille udfordring som jeg ikke rigtig kan finde svare på.

Jeg har 2 kolonner A og B (ca. 5000 rækker lange)

I kolonne A
Står der en del tekst i cellerne eks.

- Røde morten
- Gule Anton
- Blå Søren
- gule Flemming

I kolonne B
Står der og nogle tekster eks.

- Morten
- Gul

Jeg vil gerne i kolonne C have resultatet af følgende:
Alle celler i A som indeholder tekst fra B

Fra ovenstående vil resultater blive:

Røde morten
Gule Anton
gule Flemming

Håber mit lille problem giver mening
05. oktober 2015 - 10:09 #1
Et hurtigt skud fra hoften

Sub Find()
    Application.ScreenUpdating = False
    Dim c As Range
    Dim cc As Range
    For Each c In Range("B1", Range("B" & Rows.Count).End(xlUp)).Cells
        For Each cc In Range("A1", Range("A" & Rows.Count).End(xlUp)).Cells
            If InStr(1, LCase(cc.Text), LCase(c.Text)) > 0 Then
                Range("C" & Rows.Count).End(xlUp).Offset(1, 0).Value = cc.Value
            End If
        Next
    Next
    Application.ScreenUpdating = True
End Sub
Avatar billede Chewie Novice
05. oktober 2015 - 10:16 #2
Lige i skabet .. tak

smid et svar
05. oktober 2015 - 10:18 #3
Super :)
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
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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