Avatar billede spoi Nybegynder
04. april 2007 - 08:57 Der er 14 kommentarer og
2 løsninger

udtrække del af tekst streng

Eks

121 e45000145 2 st
122 e45000144 1.614 st
osv

jeg skal bruge det der står før st
dvs i den ene linie 2 i den næste 1.614

LN
Avatar billede tida Juniormester
04. april 2007 - 09:09 #1
Hvad med denne formel

=MIDT(B7;15;LÆNGDE(B7)-17)
Avatar billede tida Juniormester
04. april 2007 - 09:13 #2
Forresten B7 skal du rette til den for dig aktuelle celle.
Avatar billede spoi Nybegynder
04. april 2007 - 09:25 #3
ups det var forkert efter St står der yderligere nogle tegn - sorry - det gik vist for stærkt for mig. det er ikke det samme antal tegen der står
LN
Avatar billede tida Juniormester
04. april 2007 - 09:38 #4
Ok, hvad så med denne

=MIDT(B7;15;FIND("st";B7)-15)
Avatar billede tida Juniormester
04. april 2007 - 09:41 #5
Hov...fik et mellemrum for meget med, det skal være

=MIDT(B7;15;FIND("st";B7)-16)
Avatar billede kabbak Professor
04. april 2007 - 21:23 #6
prøv at lege med denne funktion

Public Function StrengDeling(Streng As String, Delimeter As String, Søg As String, Forskydning As Integer)
    Dim Dat As Variant, I As Integer
    Dat = Split(Streng, Delimeter)
    For I = 0 To UBound(Dat)
        If Dat(I) = Søg Then
            StrengDeling = Dat(I + Forskydning)
            Exit Function
        End If
    Next
    StrengDeling = "Fejl"
End Function
Avatar billede kabbak Professor
04. april 2007 - 21:24 #7
kaldes f.eks. sådan, hvis strengen er i A1
=StrengDeling(A1;" ";"st";-1)
Avatar billede excelent Ekspert
04. april 2007 - 22:15 #8
Udtrækker fra selle A2

=HØJRE(A2;LÆNGDE(A2)-FIND("|";UDSKIFT(A2;" ";"|";LÆNGDE(A2)-LÆNGDE(UDSKIFT(A2;" ";""))-1)))
Avatar billede excelent Ekspert
05. april 2007 - 12:13 #9
Ignorer kommentar 22:15:03

i arket taster du fx.  =xFind(A2)

Function xFind(Sel)
c = Left(Sel, WorksheetFunction.Find("st", Sel) - 2)
Application.Volatile
For t = 1 To Len(c)
If Mid(c, t, 1) = " " Then sp = t - 1
Next
xFind = Right(c, Len(c) - sp) * 1
End Function
Avatar billede excelent Ekspert
08. april 2007 - 13:12 #10
Udtrækker fra A3

=--MIDT(A3;FIND("|";UDSKIFT(VENSTRE(A3;FIND("st";A3)-2);" ";"|";LÆNGDE(VENSTRE(A3;FIND("st";A3)-2))-LÆNGDE(UDSKIFT(VENSTRE(A3;FIND("st";A3)-2);" ";""))))+1;(LÆNGDE(VENSTRE(A3;FIND("st";A3)-2)))-(FIND("|";UDSKIFT(VENSTRE(A3;FIND("st";A3)-2);" ";"|";LÆNGDE(VENSTRE(A3;FIND("st";A3)-2))-LÆNGDE(UDSKIFT(VENSTRE(A3;FIND("st";A3)-2);" ";""))))+1)+1)
Avatar billede spoi Nybegynder
10. april 2007 - 06:51 #11
jeg fandt en løsning men med inspiration herfra.

Læg et svar ;O)
LN
Avatar billede excelent Ekspert
11. april 2007 - 20:30 #12
hvem skal svare ?
Avatar billede excelent Ekspert
12. april 2007 - 14:26 #13
hvis vi måtte se din løsning kunne vi måske gætte
Avatar billede excelent Ekspert
18. april 2007 - 17:56 #14
hmm
Avatar billede excelent Ekspert
20. august 2007 - 18:57 #15
svar
Avatar billede spoi Nybegynder
10. oktober 2007 - 06:15 #16
Sorry har ikke nået andet at arbejde arbejde arbejde. Og ikke haft det mindste tid til at kigge herinde.
Nu er jeg på en svar og porint runde;O)
Det er svært at give svaret fra min side ide jeg har splittet formlen op - så kan jeg bedre selv holde styr på havd der sker. Dvs små bidder hen over flere kolonner, som jeg så bare skjuler - idet arket kun er/var til eget brug.
Tak for hjælpen
LN
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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