Zusammenfassung
In Microsoft Excel können Sie ein Makro verwenden, um die Daten in zwei angrenzenden Spalten zu verketten und das Ergebnis in der Spalte rechts neben den Spalten anzuzeigen, die Ihre Daten enthalten. Dieser Artikel enthält ein Beispiel für ein VBA-Makro (Microsoft Visual Basic for Applications) (Sub-Prozedur), um dies zu erreichen.
Weitere Informationen
Microsoft stellt Programmierbeispiele nur zur Veranschaulichung bereit, ohne ausdrückliche oder implizite Garantie. Dies umfasst, ist aber nicht beschränkt auf die impliziten Gewährleistungen der Handelsüblichkeit oder Eignung für einen bestimmten Zweck. In diesem Artikel wird davon ausgegangen, dass Sie mit der Programmiersprache, die veranschaulicht wird, und mit den Tools vertraut sind, die zum Erstellen und Debuggen von Prozeduren verwendet werden. Microsoft-Supporttechniker können ihnen helfen, die Funktionalität eines bestimmten Verfahrens zu erläutern. Diese Beispiele werden jedoch nicht geändert, um zusätzliche Funktionen bereitzustellen oder Prozeduren zu erstellen, die Ihren spezifischen Anforderungen entsprechen.
VBA-Makro (Beispiel für 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
HINWEIS: Die Anweisung ActiveCell.Offset(0, 1). FormulaR1C1 kann durch die Anweisung ActiveCell.Offset(0, 1) ersetzt werden. Formel. Sie können mit gleichem Erfolg verwendet werden, wenn Sie nur Text und Zahlen (keine Formeln) verwenden. Die am Ende der ersten Anweisung verwendete R1C1 bezieht sich auf Zeile 1, Spalte 1 und ist das Formular, das in Beispielen in der Hilfe verwendet wird.
Verwenden des Makros in Microsoft Office Excel 2007
-
Öffnen Sie die Arbeitsmappe, die die Daten enthält.
-
Drücken Sie ALT + F11, um den Visual Basic-Editor zu starten.
-
Klicken Sie im Menü Einfügen auf Modul , um ein Modul einzufügen. Geben Sie das Makro im Codefenster des Moduls ein.
-
Klicken Sie im Menü Datei auf Schließen und zurück zu Microsoft Excel.
-
Wählen Sie das Arbeitsblatt aus, das die Daten enthält, die Sie verketten möchten.
-
Klicken Sie auf die obere Zelle in der rechten Spalte der Daten, die Sie verketten möchten. Wenn die Zellen A1:A100 und B1:B100 z. B. Daten enthalten, klicken Sie auf Zelle B1.
-
Klicken Sie auf die Registerkarte Entwicklertools . Wenn die Registerkarte Entwicklertools nicht angezeigt wird, führen Sie die folgenden Schritte aus:
-
Klicken Sie auf die Microsoft Office-Schaltfläche und anschließend auf Excel-Optionen.
-
Klicken Sie auf Beliebt.
-
Aktivieren Sie das Kontrollkästchen Registerkarte Entwickler im Menüband anzeigen .
-
Klicken Sie auf OK , um das Dialogfeld Excel-Optionen zu schließen.
-
-
Klicken Sie in der Gruppe Code auf Makros.
-
Wählen Sie das Makro ConcatColumns aus, und klicken Sie dann auf Ausführen.
Verwenden des Makros in Microsoft Office Excel 2003 und früheren Excel-Versionen
-
Öffnen Sie die Arbeitsmappe, die die Daten enthält.
-
Drücken Sie ALT + F11, um den Visual Basic-Editor zu starten.
-
Klicken Sie im Menü Einfügen auf Modul , um ein Modul einzufügen. Geben Sie das Makro im Codefenster des Moduls ein.
-
Klicken Sie im Menü Datei auf Schließen und zurück zu Microsoft Excel.
-
Wählen Sie das Arbeitsblatt aus, das die Daten enthält, die Sie verketten möchten.
-
Klicken Sie auf die obere Zelle in der rechten Spalte der Daten, die Sie verketten möchten. Wenn die Zellen A1:A100 und B1:B100 z. B. Daten enthalten, klicken Sie auf Zelle B1.
-
Zeigen Sie im Menü Extras auf Makros, und klicken Sie dann auf Makro. Wählen Sie das Makro ConcatColumns aus, und klicken Sie dann auf Ausführen.
