Samenvoegen van gegevens kolommen in Excel VBA-macro

Artikel ID: 213477 - Bekijk de producten waarop dit artikel van toepassing is.
Automatische vertalingLET OP: Dit artikel is automatisch vertaald. Meer informatie treft u aan de onderzijde van dit artikel.
Alles uitklappen | Alles samenvouwen

Op deze pagina

Samenvatting

In Microsoft Excel kunt u een macro om de gegevens in twee samen te voegen aangrenzende kolommen en het resultaat weer gegeven in de kolom rechts van de kolommen die gegevens bevatten. Dit artikel bevat een voorbeeld van Microsoft Visual Basic for Applications (VBA)-macro (subprocedure) om dit te bereiken.
Naar boven | Geef ons feedback

Meer informatie

Microsoft biedt program meer voorbeelden ter illustratie alleen, zonder expliciete of impliciete garantie. Dit omvat, maar is niet beperkt tot, de impliciete garanties van verkoopbaarheid of geschiktheid voor een bepaald doel. In dit artikel wordt ervan uitgegaan dat u bekend met de programmeer taal worden opgespoord en met de hulp programma's die worden gebruikt bent voor het maken en waarmee fouten in procedures. Ondersteuningstechnici van Microsoft kunnen de functionaliteit van een bepaalde procedure uitgelegd. Zij zal deze voorbeelden om extra functionaliteit of samens tellen van procedures om te voldoen aan uw specifieke vereisten echter niet wijzigen.

Voorbeeld in Visual Basic for Applications (VBA)-macro

Sub ConcatColumns()

   Do While ActiveCell <> ""  'Loops until the active cell is blank.

      'The "&" must have a space on both sides or it will be
      'treated as a variable type of long integer.

      ActiveCell.Offset(0, 1).FormulaR1C1 = _
         ActiveCell.Offset(0, -1) & " " & ActiveCell.Offset(0, 0)

      ActiveCell.Offset(1, 0).Select
   Loop

End Sub
OPMERKING: De instructie ActiveCell.Offset (0, 1).FormulaR1C1 kan worden vervangen door de instructie ActiveCell.Offset (0, 1).Formule. Ze kunnen worden gebruikt met succes gelijk als u tekst en getallen alleen (geen formules). Het verwijzings type R1K1 gebruikt aan het einde van de eerste instructie verwijst naar rij 1, kolom 1 en wordt het formulier dat wordt gebruikt in de voorbeelden in de Help.

Het gebruik van de macro in Microsoft Office Excel 2007

  1. Open de werkmap die de gegevens bevat.
  2. Druk op ALT + F11 om de Visual Basic Editor gestart.
  3. Op deInvoegenmenu, klikt u opModuleeen module invoegen. Typ de macro in het code venster van de module.
  4. Op deBestandmenu, klikt u opSluiten en terugkeren naar Microsoft Excel.
  5. Selecteer het werk blad dat de gegevens bevat die u wilt samenvoegen.
  6. Klik op de bovenste cel in de rechter kolom van de gegevens die u wilt samenvoegen. Als de cellen a1: A100 en B1:B100 gegevens bevatten, bijvoorbeeld Klik in cel B1.
  7. Klik op deOntwikkelaartabblad. Als deOntwikkelaartabblad niet wordt weer gegeven, volgt u deze stappen:
    1. Klik op deMicrosoft Office-knop, en klik vervolgens opOpties voor Excel.
    2. Klik opPopulaire.
    3. Schakel deTabblad ontwikkelaars op het lint weer gevenselectie vakje.
    4. Klik opOKsluiten deOpties voor Excelhet dialoog venster.
  8. Klik opMacro'sin deCodegroep.
  9. Selecteer de macro ConcatColumns en klik vervolgens opUitvoeren.

Het gebruik van de macro in Microsoft Office Excel 2003 en in eerdere versies van Excel

  1. Open de werkmap die de gegevens bevat.
  2. Druk op ALT + F11 om de Visual Basic Editor gestart.
  3. Op deInvoegenmenu, klikt u opModuleeen module invoegen. Typ de macro in het code venster van de module.
  4. Op deBestandmenu, klikt u opSluiten en terugkeren naar Microsoft Excel.
  5. Selecteer het werk blad dat de gegevens bevat die u wilt samenvoegen.
  6. Klik op de bovenste cel in de rechter kolom van de gegevens die u wilt samenvoegen. Als de cellen a1: A100 en B1:B100 gegevens bevatten, bijvoorbeeld Klik in cel B1.
  7. Op deHulp programma'shet menuMacro's, en klik vervolgens opMacro. Selecteer de macro ConcatColumns en klik vervolgens opUitvoeren.
Naar boven | Geef ons feedback

Referenties

Voor meer informatie over Visual Basic for Applications, klikt u op het volgende artikelnummer in de Microsoft Knowledge Base:
226118
(http://support.microsoft.com/kb/226118/ )
Lijst met bronnen die beschikbaar zijn waarmee u Visual Basic for Applications programming leren
Naar boven | Geef ons feedback

Eigenschappen

Artikel ID: 213477 - Laatste beoordeling: dinsdag 20 september 2011 - Wijziging: 3.0
De informatie in dit artikel is van toepassing op:
  • Microsoft Office Excel 2007
  • Microsoft Excel 2002 Standard Edition
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 2010
  • Microsoft Office Excel 2003
Trefwoorden: 
kbexpertiseinter kbdtacode kbhowto kbprogramming kbmt KB213477 KbMtnl
Automatische vertaling
BELANGRIJK: Dit artikel is vertaald door de vertaalmachine software van Microsoft in plaats van door een professionele vertaler. Microsoft biedt u professioneel vertaalde artikelen en artikelen vertaald door de vertaalmachine, zodat u toegang heeft tot al onze knowledge base artikelen in uw eigen taal. Artikelen vertaald door de vertaalmachine zijn niet altijd perfect vertaald. Deze artikelen kunnen fouten bevatten in de vocabulaire, zinsopbouw en grammatica en kunnen lijken op hoe een anderstalige de taal spreekt en schrijft. Microsoft is niet verantwoordelijk voor onnauwkeurigheden, fouten en schade ontstaan door een incorrecte vertaling van de content of het gebruik ervan door onze klanten. Microsoft past continue de kwaliteit van de vertaalmachine software aan door deze te updaten.
De Engelstalige versie van dit artikel is de volgende:213477
(http://support.microsoft.com/kb/213477/en-us/ )
Naar boven | Geef ons feedback

Geef ons feedback

 
Naar bovenNaar boven