28. januar 2016 - 12:28Der er
11 kommentarer og 1 løsning
Excel 2010/2016: Konverter tekst til kolonner sletter data
Hej,
Jeg har en masse data, som er delt med linjeskift. Teksten på hvert linjeskift vil jeg gerne have over i en ny celle i en ny kolonne. Jeg har derfor erstattet linjeskift (alt+010) med €, hvorefter jeg ville benytte funktionen "Tekst til kolonner" med afgrænset opdeling på €. Men når jeg benytter denne funktion sletter den al data, der står efter det første €-tegn og jeg ender ud med kun at have én kolonne med mangelfulde data.
Jeg kan ikke gennemskue, hvad det er jeg gør galt. Det er en funktion jeg har brugt virkelig mange gange før og jeg har aldrig oplevet dette problem tidligere.
Jeg har både forsøgt mig i Excel 2010 og 2016. Og jeg har også forsøgt at benytte komma til opdeling i stedet for €-tegn.
Dim antalRækker As Integer, ræk As Integer Dim tekst As String, tabel As Variant, x As Integer Sub opdel() Application.ScreenUpdating = False antalRækker = ActiveCell.SpecialCells(xlLastCell).Row
For ræk = 2 To antalRækker tekst = Range("B" & ræk) tabel = Split(tekst, ",")
For x = 0 To UBound(tabel) Range("C" & ræk).Offset(0, x) = tabel(x) Next x Next ræk End Sub
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.
