Søg gennem søjle med tekst og indsæt teksten i en celle, når søjlen med tekst indeholder et bestemt bogstav
Hej,
Jeg vil gerne lave en funktion, som søger gennem en søjle med tekst og indsætter teksten i en ny celle, hvis teksten indeholder et bestemt bogstav.
Jeg har en søjle med 37 celler, hvor der i dette tilfælde står den samme tekst i alle 37 celler. Jeg vil gerne have, at i den nye celle vises den tekst, som står i alle de 37 celler medmindre, at der er forskellig tekst i nogle af cellerne.
Det vil sige i dette tilfælde, skal den indsætte "S355" i en ny celle, men hvis en af cellerne har en anden tekst eksempelvis "S455", så skal den nye celle skrive, at der er to forskellige tekster.
AI bliver først for alvor en del af arbejdet, når teknologien integreres i den måde, vi arbejder på. At have adgang til AI betyder ikke nødvendigvis, at medarbejderne er klar til at bruge den.
Hvis du har teksterne i kolonne A kan du bruge denne makro:
Sub CheckCelleindhold() x = Application.CountA(Range("A:A")) Z = Cells(1, 1) For y = 2 To x If Z <> Cells(y, 1) Then Z = "Der er flere forskellige tekster" GoTo A: End If Next A: Range("B2") = Z End Sub
Indsæt denne formel i B2, og kopier ned så langt du mener at du har forskellige emner i A kolonnen. Data i A er fra A2 og ned til A40. Den vil løbe A kolonne igennem, og indsætte de forskellige i B2 og nedefter. {=INDEKS($A$2:$A$40;SAMMENLIGN(0;TÆL.HVIS($B$1:B1;$A$2:$A$40);0))}
Formlen er en Array formel, og skal indsættes ved hjælp af Ctrl+Shift og Enter så der dannes de 2 (Tuborg) klammer rundt om formlen.
Nå, jeg glemte at der skulle stå "Flere forskellige tekster", hvis en af cellerne har en anden tekst, men så:
Dansk: =HVIS(OG(A1=A1:A37);A1;"Flere forskellige tekster") Engelsk: =IF(AND(A1=A1:A37);A1;"Flere forskellige tekster")
Synes godt om
Ny brugerNybegynder
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.