Spalte mit bestimmten Namen in Excel kopieren
Schritt-für-Schritt-Anleitung
Um in Excel eine Spalte mit bestimmten Namen zu kopieren, kannst du das folgende VBA-Makro verwenden. Dieses Beispiel sucht nach der Spalte mit dem Namen "Summe" und kopiert die gesamte Spalte in ein anderes Arbeitsblatt.
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.
-
Füge den folgenden Code in das Modul ein:
Sub Suchen_und_kopieren()
Dim Such As String
Such = "Summe"
Columns.Find(What:=Such, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).EntireColumn.Copy
Windows("Mappe2.xls").Activate
Sheets("Summe").Activate
Columns("A:A").Select
ActiveSheet.Paste
End Sub
-
Schließe den VBA-Editor.
-
Führe das Makro aus, um die Spalte zu kopieren.
Häufige Fehler und Lösungen
Alternative Methoden
Wenn du die Spalte manuell kopieren möchtest, ohne VBA zu verwenden, kannst du die folgenden Schritte ausführen:
- Suche die Spalte mit dem Namen "Summe".
- Klicke mit der rechten Maustaste auf den Spaltenkopf und wähle
Kopieren.
- Wechsle zur Zielmappe und klicke mit der rechten Maustaste auf die Zielspalte (z.B. A:A) und wähle
Einfügen.
Du kannst auch Shortcuts wie CTRL + C (kopieren) und CTRL + V (einfügen) verwenden.
Praktische Beispiele
Hier ist ein weiteres Beispiel, wie du eine Spalte mit einem anderen Namen kopieren kannst. Ändere einfach den Wert der Variable Such:
Sub Suchen_und_kopieren()
Dim Such As String
Such = "Umsatz"
Columns.Find(What:=Such, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).EntireColumn.Copy
Windows("Mappe2.xls").Activate
Sheets("Umsatz").Activate
Columns("A:A").Select
ActiveSheet.Paste
End Sub
In diesem Beispiel wird die Spalte mit dem Namen "Umsatz" kopiert. Achte darauf, dass das Zielblatt in der Zielmappe existiert.
Tipps für Profis
- Verwende die
Option Explicit-Anweisung am Anfang deines VBA-Codes, um sicherzustellen, dass alle Variablen deklariert werden.
- Du kannst die
Find-Methode auch anpassen, um nach exakten Übereinstimmungen zu suchen, indem du MatchCase:=True setzt.
- Überlege, das Zielblatt dynamisch zu bestimmen, um das Makro anpassungsfähiger zu gestalten.
FAQ: Häufige Fragen
1. Frage
Wie kann ich mehrere Spalten gleichzeitig kopieren?
Antwort: Du kannst die Union-Methode verwenden, um mehrere Spalten zu kombinieren und dann die gesamte Auswahl zu kopieren.
2. Frage
Gibt es eine Möglichkeit, das Makro zu automatisieren?
Antwort: Ja, du kannst das Makro so einstellen, dass es beim Öffnen der Datei automatisch ausgeführt wird, indem du es im Workbook_Open-Ereignis platzierst.