Samenvatting
In Microsoft Excel kunt u een macro gebruiken om de gegevens samen te voegen in twee aangrenzende kolommen en om het resultaat weer te geven in de kolom rechts van de kolommen die uw gegevens bevatten. Dit artikel bevat een voorbeeld van een Microsoft Visual Basic for Applications (VBA)-macro (subprocedure) om dit te bereiken.
Meer informatie
Microsoft biedt programmeervoorbeelden alleen ter illustratie, 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 bent met de programmeertaal die wordt gedemonstreerd en met de hulpprogramma's die worden gebruikt om procedures te maken en fouten op te sporen. Ondersteuningstechnici van Microsoft kunnen u helpen de functionaliteit van een bepaalde procedure uit te leggen. Deze voorbeelden worden echter niet gewijzigd om extra functionaliteit te bieden of procedures te maken die voldoen aan uw specifieke vereisten.
Voorbeeld van VBA-macro (Visual Basic for Applications)
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 met evenveel succes worden gebruikt als u alleen tekst en getallen gebruikt (geen formules). De R1C1 die aan het einde van de eerste instructie wordt gebruikt, verwijst naar rij één, kolom één en is het formulier dat wordt gebruikt in voorbeelden in de Help.
De macro gebruiken in Microsoft Office Excel 2007
-
Open de werkmap met de gegevens.
-
Druk op Alt+F11 om de Visual Basic Editor te openen.
-
Klik in het menu Invoegen op Module om een module in te voegen. Typ de macro in het codevenster van de module.
-
Klik in het menu Bestand op Sluiten en terugkeren naar Microsoft Excel.
-
Selecteer het werkblad met de gegevens die u wilt samenvoegen.
-
Klik op de bovenste cel in de rechterkolom met gegevens die u wilt samenvoegen. Als de cellen A1:A100 en B1:B100 bijvoorbeeld gegevens bevatten, klikt u op cel B1.
-
Klik op het tabblad Ontwikkelaars . Als het tabblad Ontwikkelaars niet wordt weergegeven, voert u de volgende stappen uit:
-
Klik op de Microsoft Office-knop en klik op Opties voor Excel.
-
Klik op Populair.
-
Klik om het selectievakje Tabblad Ontwikkelaars weergeven op het lint in te schakelen.
-
Klik op OK om het dialoogvenster Opties voor Excel te sluiten.
-
-
Klik op Macro's in de groep Code .
-
Selecteer de macro ConcatColumns en klik op Uitvoeren.
De macro gebruiken in Microsoft Office Excel 2003 en in eerdere versies van Excel
-
Open de werkmap met de gegevens.
-
Druk op Alt+F11 om de Visual Basic Editor te openen.
-
Klik in het menu Invoegen op Module om een module in te voegen. Typ de macro in het codevenster van de module.
-
Klik in het menu Bestand op Sluiten en terugkeren naar Microsoft Excel.
-
Selecteer het werkblad met de gegevens die u wilt samenvoegen.
-
Klik op de bovenste cel in de rechterkolom met gegevens die u wilt samenvoegen. Als de cellen A1:A100 en B1:B100 bijvoorbeeld gegevens bevatten, klikt u op cel B1.
-
Wijs in het menu Extra de optie Macro's aan en klik vervolgens op Macro. Selecteer de macro ConcatColumns en klik op Uitvoeren.
