• 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 uitsplitsen naar nieuwe bestanden

Status
Niet open voor verdere reacties.

Alsibaru

Nieuwe gebruiker
Lid geworden
27 mei 2010
Berichten
3
Hallo,

Hoewel ik dacht al aardig onderlegd :o te zijn met Excel loop ik nu tegen een probleem aan.

Ik heb een kolom met klantnummers (sommige hebben een letter ervoor, anderen niet).
Deze kolom met 2300 cellen moet ik uitsplitsen naar aparte bestanden van elk tien klantnummers.
Komt neer op 230 files (bestanden). In dit nieuwe bestand moeten ze op een bepaalde plaats komen te staan.

Kan dit nog met Excel? :confused: Wie helpt mij?

Alvast bedankt.

Alba
 
Hoi,

Veel is mogelijk .....
Maar je bent niet echt volledig met je vraag.

- moet het bronbestand blijven bestaan en functioneren?
- volgens welk criterium worden de klantnummers per 10 'gesplitst'?
- is er sprake van een logische sortering?
- gaat het alleen om de cellen in die ene kolom of zijn er meer gerelateerde gegevens in de cellen in dezelfde rij.

Stuur een voorbeeldbestand mee.
 
HAoi,

Ja, een toelichting is op zijn plaats.
- Het bronbestand moet blijven bestaan.
- De klantnummers moeten van boven naar beneden worden gesplitst per 10 nummers (dus A1 tm A10, A11 tm A20 enz).
Deze rijtjes moeten dan elk weer in een apart excelbestand worden geplaatst. In totaal dus 230 bestanden. Dit worden dan de aparte klantdossiers (met elk 10 nrs).
- Er is 1 kolom met gegevens.

Groeten,

Alba

Hoi,

Veel is mogelijk .....
Maar je bent niet echt volledig met je vraag.

- moet het bronbestand blijven bestaan en functioneren?
- volgens welk criterium worden de klantnummers per 10 'gesplitst'?
- is er sprake van een logische sortering?
- gaat het alleen om de cellen in die ene kolom of zijn er meer gerelateerde gegevens in de cellen in dezelfde rij.

Stuur een voorbeeldbestand mee.
 

Bijlagen

oplossing nog niet in zicht

Het is nog even handmatig opgelost door elke keer 10 cellen te selcteren uit de kolom. Mmaar de volgende maand komen er weer 4000 :eek: uit te splitsen cellen op mij af...

Graag assistentie verzocht.
 
Gisteren was er een enigzins vergeliijkbare vraag. De daar gegeven tip ( gebruik de freeware "Excel Explosion" van Datapig Technology) heb ik uit nieuwsgierigheid even getest en inderdaad, dat werkt fantastisch, ook voor uitsplitsen naar nieuwe bestanden. In jouw geval zul je wel een hulpkolom moeten toevoegen die per 10 rijen een "unieke marker" toevoegt.
http://www.helpmij.nl/forum/showthread.php/556004-cellen-met-een-waarde-op-een-tabblad
 
geweldig programma zeg dat" Excel Explosion"

maar als je er niet uit komt is er kun je altijd nog een simpel macrootje schrijven.

groet sylvester
 
zo iets kan ook

het kan veel uitgebreider

kijk daarvoor naar het programma exel explode

Code:
Sub OpslagMacro()
  Dim FileNaam As String, Naam As String
  Dim Rij As Integer, EindRij As Integer, AantalKolommen As Integer, AantalRijenPerFile As Integer
  EindRij = Sheets("Sheet1").UsedRange.Rows.Count
  AantalKolommen = 1
  AantalRijenPerFile = 10
  FileNaam = "C:\voorbeeldA1\"
  
  On Error Resume Next      'anders krijg je een fout als de file al bestaat
    MkDir FileNaam
  On Error GoTo 0
  
  For Rij = 1 To EindRij Step AantalRijenPerFile
    Naam = "opslag " & Rij & " tm " & Rij + AantalRijenPerFile - 1 & ".xls"
    Sheets("Sheet1").Select
    Range(Cells(Rij, 1), Cells(Rij + AantalRijenPerFile - 1, AantalKolommen)).Select
    Selection.Copy
    Workbooks.Add
    ActiveSheet.Paste
    Selection.Columns.AutoFit
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:=FileNaam & Naam _
      , FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
      ReadOnlyRecommended:=False, CreateBackup:=False
    ActiveWindow.Close
  Next Rij
End Sub


groet sylvester
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan