CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

salanti Nybegynder

23. april 2006 - 19:23 Der er 4 kommentarer og
1 løsning

Dele bogstaver i et felt ud på mange

Hej.
Jeg har 6 felter (A1 til A6) hvor jeg i hvert felt har 350 bogstaver, disse bogstaver vil jeg gerne have delt ud på 350 felter, i samme kolonne men forskellige rækker. Jeg prøvede at lave "tekst til kolonne" men jeg måtte definere hver enkelt deling idet der ikke er mellemrum eller andet karakteristika mellem mine bogstaver. Da jeg havde gjort det og trykkede udfør, så kunne den ikke idet jeg jo ikke kan have 350 rækker i et ark, så de skal altså transponeres først!
Er der nogen der har en nem måde at gøre det på. Tak

Synes godt om

bak Forsker

23. april 2006 - 19:53 #1

Transponer A1:A6 til A1:F1
Indsæt denne fiormel i A2 og træk nedaf til række 351
Træk den derefter henover kolonne B,C,D,E og F

=MIDT(A$1;RÆKKE()-1;1)

Synes godt om

Flemming Vadet - Smart Office DK Professor

23. april 2006 - 19:59 #2

Det kunne gøres således, hvor data placeres i kolonne A-F fra række 10
Den er ligeglad med antallet af karakter du har i cellerne.

Public Sub Demo()
Const lSTART_ROW As Long = 10
Const lSTART_COL As Long = 1
Dim lChar As Long
Dim rCell As Range

For Each rCell In Range("A1:A6").Cells
For lChar = 1 To Len(rCell.Value)
Cells(lSTART_ROW - 1 + lChar, lSTART_COL - 1 + rCell.Row).Value = Mid(rCell.Value, lChar, 1)
Next lChar
Next rCell
End Sub

Synes godt om

excelent Ekspert

23. april 2006 - 20:13 #3

tror han vil have dem i samme kolonne

Sub dele()

Dim a, t, i
a = [a1] & [a2] & [a3] & [a4] & [a5] & [a6]: t = Len(a)
For i = 1 To t
Range("a" & i + 8) = Mid(a, i, 1)
Next

End Sub

Synes godt om

salanti Nybegynder

23. april 2006 - 20:21 #4

Hej Bak.
Jeg gjorde som beskrevet og det virkede som det skulle. Tak for hjælpen. Læg et svar for point.
Også tak for de andre forslag.

Synes godt om

bak Forsker

24. april 2006 - 09:10 #5

ok :-)

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

Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
renteberegning Af Pil i Excel	3	24/11/202411:27	25/11/202417:42
Identificér og hent del af tekststreng Af TheLibrarian i Excel	2	22/11/202416:49	25/11/202409:27
Ændre nuller til ovenstående tekst Af boro23 i Excel	4	20/11/202410:44	20/11/202412:08
HVIS med datoer Af HHA i Excel	6	20/11/202408:31	20/11/202412:51
Numerisk liste Af AND i Excel	8	19/11/202414:05	19/11/202423:31

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