Notifikationer

Markér alle som læst Log ud

mile Juniormester

27. marts 2007 - 12:17 Der er 4 kommentarer og
1 løsning

Kode til adskillelse og sæt ind nedad.

Jeg har en celle der indeholder over 1000 telefonnumre, adskilt af komma. eks.

99999999,88888888,33333333, osv.

Er der en af jer hajer der kan lave en stump kode der for hvert komma indsætter det næste nummer i cellen under neden, således at de godt 1000 numre kommer til at stå adskilt i en kolonne og ikke hen af rækken (som med importer), for der er jo ikke rækker nok ? Nogen der er friske ?

Synes godt om

excelent Ekspert

27. marts 2007 - 12:33 #1

marker sellen og kør sub (antager alle tlf.nr. er 8 tegn)

Sub Opsplit()
rk = 2
x = ActiveCell.Value
For t = 1 To Len(x) Step 9
Cells(rk, 1) = Mid(x, t, 8)
rk = rk + 1
Next
End Sub

Synes godt om

mile Juniormester

27. marts 2007 - 13:01 #2

Den er bare helt fin. Lægger du et svar så du kan få nogle velfortjente points ? Og tusind tak for hjælpen.

Synes godt om

excelent Ekspert

27. marts 2007 - 13:02 #3

ok velbekom

Synes godt om

kabbak Professor

27. marts 2007 - 13:02 #4

en anden måde, sætter værdierne ind i B kolonnen

Sub Opsplit()
Dim X
X = Split(ActiveCell.Value, ",")
Range(Cells(1, 2), Cells(UBound(X) + 1, 2)) = Application.WorksheetFunction.Transpose(X)
End Sub

Synes godt om

mile Juniormester

27. marts 2007 - 13:41 #5

Tak for hjælpen begge to. Det er rigtigt dejligt når man kan ty til en kodehaj i ny og næ. Det gør det altså lidt nemmere. Hygge.

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
problem med mailbesked Af Pestilensen i Excel	1	24/08/202611:16	24/08/202613:33
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel	14	17/08/202615:14	I går 23:56
Gemme største værdi Af Lemming@privat.dk i Excel	2	07/08/202622:13	08/08/202609:03
Forskel mellem klokkeslet start aften slut næste morgen Af krasmussen i Excel	13	24/07/202611:08	03/08/202618:42
Opdatering af celler i excel ark Af lurup i Excel	2	09/06/202619:40	10/06/202614:34

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS