• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

cel splitsen op "."; formule gevraagd.

Status
Niet open voor verdere reacties.
M

mariannevanh

Terugkerende gebruiker
Lid geworden
14 dec 2004
Berichten
2.085
Ik heb een spreadsheet waarin ik een reeks cellen wil splitsen op de plaats waar een punt staat (zie bijlage). Als er twee punten staan, komt er een lege cel tussen.
In kolom F staat een weergave van mijn bedoeling.
Wie helpt mij met een formule hiervoor?

Vriendelijke groet,
Guido
 

Bijlagen

  • splits.xlsx
    8,6 KB · Weergaven: 40
guido,

hiervoor heeft Excel ingebouwde functionaliteit: tekst naar kolommen.

Je vindt dat op het lint in Tab 'Gegevens' ongeveer in het midden van je scherm
 
Via tekst naar kolommen - gescheiden door . - en dan copy plakken Speciaal Transponeren.
Klaar is Guido.:)
 
In mijn voorbeeld-bestand had ik slechts één kolom gevuld, maar mijn echte bestand heeft 750 kolommen. De door jullie gegeven werkwijze kan slechts één kolom tegelijk verwerken.
Is daar een oplossing voor te vinden? Ik probeerde het zelf met formules, maar kwam er nog niet echt uit.

In deze nieuwe bijlage een voorbeeld. Op Blad 2 staat mijn gewenste lay-out.

Vriendelijke groet,
Guido
 

Bijlagen

  • splits.xlsx
    8,7 KB · Weergaven: 43
Guido,

met een beetje VBA lukt dat.
Code: 
Sub Emil_S()
Dim mTmp As Variant
Dim Klm As Integer
Dim C As Range

    Klm = 1
    With Blad2
        .Cells.ClearContents
        For Each C In Blad1.Cells.SpecialCells(xlCellTypeConstants, xlTextValues)
            mTmp = Split(C, ".")
            .Cells(1, Klm).Resize(UBound(mTmp)+1) = WorksheetFunction.Transpose(mTmp)
            Klm = Klm + 1
        Next
    End With

End Sub
 
Laatst bewerkt:
Emil S zei:
Guido,

met een beetje VBA lukt dat.
Klik om te vergroten...

Omdat ik weinig kennis heb van macro's toch maar even een vraag:
Ik heb het menu macro's geopend en de code geplakt.
Wat moet ik dan doen als ik die macro in werking wil hebben? Als ik op A1 sta en de macro start, gebeurt er niets, maar ook als A1 en B1 selecteer en de macro start gebeurt er niets...

Vriendelijke groet,
Guido
 
in bijgaande bestand heb ik de macro geïnstalleerd.
met de toets combinatie [Alt] [F8] kies je de macro en uitvoeren.
 

Bijlagen

  • splits.xlsb
    21,4 KB · Weergaven: 30
Emil,
Dankjewel voor je reactie.
Blad 2 had ik slechts al voorbeeld gebruikt om mijn einddoel te laten zien. Dit blad (en ook blad3) heeft verder geen functie.
Mijn start is op blad 1 en daar moet ook de output komen.

Vriendelijke groet,
Guido
 
Guido,
dan zal je duidelijker moeten zijn over waar de input staat (rij kolom), je had het over 750 kolommen, en waar de output (rij kolom) moet komen.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan