• 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.

Kolom A en Kolom B tekst staan en deze wil ik onder elkaar invoegen

Status
Niet open voor verdere reacties.

Doetei

Gebruiker
Lid geworden
14 jan 2014
Berichten
10
Beste damen en heren,

Zoals de titel het al zegt, ik heb in kolom a tekst met bijv tekst abcde - 1 tot en met regel 10 alleen de - 1 loopt op naar 10.
in kolom B heb ik getal edcba - 10 aflopend tot - 1.

nu wil ik graag in kolom c of een andere kolom of blad deze cellen onder elkaar ingevoegd hebben.

dus zou er moeten stana in Kolom c of blad 1 nieuwe kolom

abcde - 1
edcba - 10
abcde - 2
abcde - 9

wat zou hier voorbeeld voor kunnen zijn.

excel sheet bijgevoegd als voorbeeld.

met vriendelijke groet,

MarijnBekijk bijlage voorbeeld 1.xlsx
 
Met een stukje code. bv

Code:
Sub VenA()
ar = Sheets(2).Cells(1).CurrentRegion
    For j = 1 To UBound(ar)
        c00 = c00 & "|" & ar(j, 1) & "|" & ar(j, 2)
    Next j
Sheets(2).[G1].Resize(UBound(Split(Mid(c00, 2), "|")) + 1) = Application.Transpose(Split(Mid(c00, 2), "|"))
End Sub
 

Bijlagen

Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan