Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Inhalte kopieren und in andere Tabelle einfügen

Inhalte kopieren und in andere Tabelle einfügen
Ivek
Hallo Leute brauche mal wieder eure Hilfe!
Ich habe eine Datenbank die relatv groß ist und nun will ich per Klick, dass Daten aus einer Tabelle in die andere kopiert werden. Sozusagen Tabelle1 Daten kopieren und in Tabelle2 Daten einfügen.
Habe allerdings keine Idee wie ich das in VBA anstellen soll!
Danke im Voraus.
Grüße
Anzeige
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 11:48:32
Ivek
?
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 12:32:46
Nadine
Hi,
Wenn ich das nicht falsch verstehe, ist das ganz einfach zu lösen..
Sub Kopiere()
Sheets("Tabelle1").UsedRange.Copy
Sheets("Tabelle2").Paste
End Sub
Kannst ja mal eben Bescheid sagen, ob das deinen Wünschen entspricht.
Gruß Nadine
Anzeige
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 12:52:53
Ivek
Hi Nadine,
also erstmal danke für deine Hilfe aber es erscheint die Fehlermeldung "Typen unverträglich" nachdem ich dies auf meine Bedürfnisse angepasst habe.
Sheets("ET").UsedRange.Copy
Sheets(wsNew).Paste
Gruß Ivek
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 13:00:52
Nadine
Hi Ivek,
möchtest du das Blatt an einer bestimmten Stelle einfügen?
Lg Nadine
Anzeige
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 13:10:04
Ivek
Hallo,
also ich schilder Dir mal mein Vorhaben. Ich habe eine Datenbank, welche sich bisher komplett dynamisch anpasst. Das habe ich alles in VBA realisiert. Ich habe eine Tabelle "ET" (Einzelteile). In dieser Tabelle Einzelteile habe ich drei Schaltflächen. Aktualisieren, Bilder löschen und Tabelle erstellen.
Alle Einzelteile werden unter einer eindeutigen Nr. in der Tabelle "ET" verwaltet. Kommt nun ein neues Einzelteil hinzu, was es bisher noch nicht gegeben hat und ich drücke auf Tabelle erstellen, erstellt es mir eine neue Tabelle zu diesem ET mit dem jeweiligen Namen. Dies habe ich hinbekommen allerdings scheitere ich an dem Kopieren des Inhalts in die neue erstellte Tabelle.
Dh ich will per Klick eine neue Tabelle erstellen (dies funtzt bereits) und gleichzeitig die dazugehörigen Werte einlesen. Der Tabellenkopf ist in allen Tabellen gleich (Spaltenanzahl und jeweilige Splatenbezeichnung).
Danke im Voraus und ich hoffe ich konnte dir mein Problem schildern.
Grüße Ivek
Anzeige
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 13:15:23
Nadine

Sub kopiere()
Sheets("ET").UsedRange.Copy
Sheets.Add
ActiveSheet.Paste
ActiveSheet.Move Before:=Sheets(4)
ActiveSheet.Range("A1").Select
End Sub

für ActiveSheet.Move Before:=Sheets(4) müsstest du nur die Zahl aktualisieren, vor welcher Tabelle die neue Tabelle eingefügt werden soll. Oder wenn es eine bestimmte Tabelle ist, kannst du auch den Namen verwenden zb. wie in ActiveSheet.Move Before:=Sheets("Tabelle3")
Wenn du das nicht brauchst, kannst du es ja rauslöschen.
Bezüglich deines Posts um 13:10: Dann willst du nur einen bestimmten Bereich kopieren, und nicht alles?
Leider bin ich selbst Anfänger ... Ich glaube nicht, dass ich das mit einem bestimmten Bereich hinbekäme.
Lg Nadine
Anzeige
AW: Inhalte kopieren und in andere Tabelle einfügen
20.08.2012 13:19:31
Ivek
Hallo Nadine,
danke schonmal ich werde es mal ausprobieren...
Bin mittlerweile wirklich ideenlos.
Gruß
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Inhalte kopieren und in andere Tabelle einfügen


Schritt-für-Schritt-Anleitung

Um Inhalte von einer Excel-Tabelle in eine andere zu kopieren, kannst du VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne den Visual Basic-Editor: Drücke ALT + F11, um den Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf „VBAProject (DeineDatei.xlsx)“ und wähle „Einfügen“ > „Modul“.

  3. Kopiere den folgenden Code in das Modul:

    Sub Kopiere()
       Sheets("Tabelle1").UsedRange.Copy
       Sheets("Tabelle2").Paste
    End Sub
  4. Anpassen des Codes: Ändere die Namen „Tabelle1“ und „Tabelle2“ entsprechend deinen Tabellenblättern.

  5. Führe das Skript aus: Drücke F5, um das Skript auszuführen. Die Daten von Tabelle1 werden in Tabelle2 eingefügt.


Häufige Fehler und Lösungen

  • Fehlermeldung "Typen unverträglich": Diese Fehlermeldung tritt häufig auf, wenn du versuchst, einen ungültigen Datentyp zu kopieren. Stelle sicher, dass die Variablen und die Blätter korrekt benannt sind.

  • Ziel-Tabelle existiert nicht: Wenn du versuchst, Inhalte in eine nicht existente Tabelle einzufügen, wird ein Fehler angezeigt. Überprüfe, ob die Ziel-Tabelle vorhanden ist.

  • Berechtigungen: Wenn du auf eine geschützte Tabelle zugreifen möchtest, musst du die Berechtigungen anpassen.


Alternative Methoden

Es gibt mehrere Methoden, um Daten zwischen Tabellen zu kopieren:

  1. Manuelles Kopieren und Einfügen: Markiere den gewünschten Bereich in der ersten Tabelle, kopiere ihn mit STRG + C und füge ihn in die Ziel-Tabelle mit STRG + V ein.

  2. Excel-Funktionen: Du kannst auch Excel-Funktionen wie =Tabelle1!A1 verwenden, um Daten aus einer Tabelle in eine andere zu verlinken.

  3. Tabelle aus PDF kopieren: Wenn du eine Tabelle aus einem PDF-Dokument kopieren möchtest, kannst du es in Excel einfügen und dann die Daten weiterverarbeiten.


Praktische Beispiele

Hier sind einige praktische Beispiele, wie du Inhalte kopieren und in andere Tabellen einfügen kannst:

  • Komplette Tabelle kopieren:

    Sub KopiereKomplett()
       Sheets("ET").UsedRange.Copy
       Sheets.Add
       ActiveSheet.Paste
    End Sub
  • Daten an einer bestimmten Stelle einfügen:

    Sub KopiereAnBestimmteStelle()
       Sheets("ET").UsedRange.Copy
       Sheets.Add
       ActiveSheet.Move Before:=Sheets("Tabelle3") 'Vor Tabelle3 einfügen
    End Sub

Diese Beispiele zeigen, wie du deine Excel-Tabelle kopieren und einfügen kannst, sowohl mit VBA als auch manuell.


Tipps für Profis

  • Verwende bereichsspezifische Kopiermethoden: Wenn du nur einen bestimmten Bereich kopieren möchtest, kannst du Range("A1:C10").Copy anstelle von UsedRange.Copy verwenden.

  • Automatisiere den Prozess: Erstelle Schaltflächen in deinem Excel-Dokument, um den Kopiervorgang zu starten, ohne den VBA-Editor öffnen zu müssen.

  • Fehlerbehandlung einfügen: Füge On Error Resume Next in deinen VBA-Code ein, um Fehler zu ignorieren und den Prozess reibungsloser zu gestalten.


FAQ: Häufige Fragen

1. Wie kann ich eine Excel-Tabelle in eine andere einfügen?
Du kannst die Copy- und Paste-Methoden in VBA verwenden, um eine Excel-Tabelle in eine andere einzufügen.

2. Was ist die einfachste Methode, um Daten zu kopieren?
Die einfachste Methode ist, die Daten manuell zu kopieren und mit STRG + V in die Ziel-Tabelle einzufügen.

3. Gibt es eine Möglichkeit, nur bestimmte Zellen zu kopieren?
Ja, du kannst mit der Range-Funktion spezifische Zellen angeben, die du kopieren möchtest.

4. Wie kann ich Daten aus einer PDF-Tabelle kopieren?
Öffne die PDF-Datei, kopiere die Tabelle, und füge sie in Excel ein. Eventuell musst du die Formatierung anpassen.

5. Was tun, wenn die Ziel-Tabelle nicht existiert?
Stelle sicher, dass du die entsprechende Tabelle erstellt hast, bevor du versuchst, Daten einzufügen, um Fehler zu vermeiden.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige