Avatar billede m_claus Nybegynder
24. januar 2007 - 13:27 Der er 9 kommentarer og
2 løsninger

Sorting af tekst

Jeg har 3 celler A1, A2 og A3

A1 indholder 2 for følgende "AKQJT98765432" f.eks "KT"
A2 indholder 3 for følgende "AKQJT98765432" f.eks "AJ2"

A3 laver en "=CONCATENATE(A1;A2)" som giver "KTAJ2"

Problemet er at A3 gerne skulle sorters efter denne liste "AKQJT98765432" således at dette lille eks blev til "AKJT2"

håber en eller andet kan hjælpe.


(jeg har kun en engelske version)
Avatar billede excelent Ekspert
24. januar 2007 - 18:45 #1
indsæt kode i et alm. modul
i Arket tast : =mysort(A1;A2)


Function mySort(selle1, selle2)
Dim nøgle, streng, selle3, t, tt
Application.Volatile

nøgle = "AKQJT98765432"
selle3 = selle1 & selle2

For tt = 1 To Len(nøgle)
  For t = 1 To Len(selle3)
    If Mid(selle3, t, 1) = Mid(nøgle, tt, 1) Then streng = streng & Mid(selle3, t, 1)
  Next
Next

mySort = streng
End Function
Avatar billede m_claus Nybegynder
25. januar 2007 - 08:43 #2
det virker ikke ...

det giver #name?
Avatar billede excelent Ekspert
25. januar 2007 - 08:52 #3
har prøvet at ændre ø til o
kan måske være det der driller


Function mySort(selle1, selle2)
Dim nogle, streng, selle3, t, tt
Application.Volatile

nogle = "AKQJT98765432"
selle3 = selle1 & selle2

For tt = 1 To Len(nogle)
  For t = 1 To Len(selle3)
    If Mid(selle3, t, 1) = Mid(nogle, tt, 1) Then streng = streng & Mid(selle3, t, 1)
  Next
Next

mySort = streng
End Function
Avatar billede m_claus Nybegynder
25. januar 2007 - 09:00 #4
det havde jeg prøvet .. det er noget andet .. der skal slås til eller sådanne noget fordi :

Function mysort(selle1, selle2)
Dim selle3
Application.Volatile
selle3 = selle1 & selle2
mySort = selle3
End Function

=mysort(A1;A2)

virker heller ikke ..
Avatar billede excelent Ekspert
25. januar 2007 - 10:31 #5
har lige prøvet den korte version på uk-ver. virker ok her

hvad skriver du i arket mysort(.... ?
Avatar billede m_claus Nybegynder
25. januar 2007 - 10:54 #6
A1 = AJ
A2 = JKJ

A3 skriver jeg =mysort(a1;a2)

og den skriver #NAME?
Avatar billede excelent Ekspert
25. januar 2007 - 11:09 #7
jeg oploader lige min eks.fil når jeg kommer hjem
Avatar billede excelent Ekspert
25. januar 2007 - 15:20 #8
Avatar billede m_claus Nybegynder
26. januar 2007 - 11:12 #9
jaaa .. jeg kan pine dø ikke selv få det til at virke - men dit regneark virker fint i excel 2007 (også selvom jeg gemmer det som .xlsx)

så jeg kopier mit eget over i dit .. 1000 tak for hjælpen.
Avatar billede excelent Ekspert
26. januar 2007 - 11:32 #10
ok velbekom
Avatar billede excelent Ekspert
28. januar 2007 - 17:16 #11
?
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