Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1528to1532
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1528to1532
1528to1532
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeile in andere Datei einfügen

Zeile in andere Datei einfügen
02.12.2016 11:05:32
kurt
Hallo,
ich wollte wissen, ob ihr mir helfen könnt. Ich will einen Code schreiben, der folgendes macht: in der ersten Datei "Mappe1" gibt es eine Spalte mit verschiedenen Namen. In einer zweiten Datei "Mappe2" gibt es auch eine Liste mit Namen, jedoch ist die Tabelle unvollständig. Ich möchte erreichen, dass, wenn ein Button geklickt wird, der Code guckt, ob die Namen von der ersten Datei schon in der 2. Datei vorhanden sind und falls nicht, dass die ganze Zeile in welcher der Name in Datei 1 steht, in die letzte verfügbare Zeile von Datei 2 eingefügt wird. Habt ihr eine Idee, wie ich das am besten schaffen kann?
VG

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile in andere Datei einfügen
02.12.2016 12:09:39
Weber
Hallo,
anbei mein Versuch. Du musst nur noch die Namen der Tabellenblätter anpassen, außer deine Tabellenblätter heißen ebenfalls "Tabelle1" in "Mappe1" und "Mappe2".
Sub Zeilekopieren()
Dim name
Dim row
Dim lastrow
row = 1
Do Until IsEmpty(Workbooks("Mappe1").Sheets("Tabelle1").Cells(row, 1)) = True
row = row + 1
name = Workbooks("Mappe1").Sheets("Tabelle1").Cells(row, 1).Text
If Workbooks("Mappe2").Sheets("Tabelle1").Range("A2:A65536"). _
Find(What:=name, SearchOrder:=xlByColumns) Is Nothing Then
lastrow = Workbooks("Mappe1").Sheets("Tabelle1").Range("A65536"). _
End(xlUp).Offset(1, 0).row
Workbooks("Mappe1").Sheets("Tabelle1").Rows(row).Copy _
Destination:=Workbooks("Mappe2").Sheets("Tabelle1").Rows(lastrow)
End If
Loop
End Sub

mfg
Weber
Anzeige

302 Forumthreads zu ähnlichen Themen

Öffnen einer anderen Excel Datei
Alex

Folgendes Problem:
Aus einer Excel Datei öffne ich mit einem Makro eine andere.
Bei der neu geöffneten Datei werden automatisch weitere Befehle ausgeführt,
unter anderem auf ein anderes Tabellenblat zu wechseln.
Dadurch, dass die andere Datei noch offen ist sucht er in dieser Da...
24.08.2008 10:55:42
Thread-ID: 1004222
3 Beiträge
Anzeige
Laufende Nummer aus anderer Datei ziehen
mtremer

Hallo Excel-Freunde,
nun habe ich schon länger recherchiert, aber gefunden habe ich nichts :-(
Folgendes habe ich vor:
Ich befinde mich in einer Datei (Start.xls). Von dort aus möchte ich eine laufende Nummer aus einer anderen Datei (Sammlung.xls) ziehen. Diese Nummer befindet sich...
17.09.2008 11:55:00
Thread-ID: 1010315
4 Beiträge
Hyperlink soll je nach KW auf andere Datei verw.
Alex

Hallo,
gleich einmal vorweg, ich bin neu im Forum und hoffe, dass ihr mir bei meinem kleinen Hyperlink- Problem helfen könnt.
Folgende Aufgabe sollte gelöst werden.
Ich möchte einen Hyperlink einrichten, der automatisch je nach Kalenderwoche auf das entsprechende Bestellformular ve...
11.10.2008 12:37:00
Thread-ID: 1015732
3 Beiträge
Anzeige
Hyperlink auf Sheet in anderer Datei
Christoph

Hallo zusammen, mal wieder ein kleines Problem:
Ich lese aus einer Zelle den Text Karteikartenneu\A.xls#'Nachname Vorname Ort'!A4 ein.
Ziel des unten stehenden Codes ist es, im Unterverzeichnis Karteikartenneu die Datei A.xls zu öffnen und das Sheet Nachname Vorname Ort im Vordergrund z...
21.10.2008 08:04:00
Thread-ID: 1017836
6 Beiträge
Daten aus einer anderen xls Datei importieren
Michi

Hallo,
Ich suche eine VBA lösung (am besten als Macro) für folgende Aufgabe:
Es soll ein ein Report erstellt werden der wie folgt ausschauen soll (Daten (PO nummer + einzelne Summe)n kommen aus einer externen Datei):
Woche1
Datainut PO1234 500 Euro
Lager PM PO23456 800 E...
08.11.2008 13:02:47
Thread-ID: 1022899
2 Beiträge
automatische Verbindung in andere Datei?
Sascha

Hallöchen, ich nerv mal wieder...
Folgende Angelegenheit:
Ich habe verschiedenen Auflistungen in Dateien, die nach Monaten benannt sind. Pro Monat sind es 2-3 Dateien, also August 1-2008, August 2-2008, August 3-2008, September 1-2008, September 2-2008, Oktober 1-2008 ect.
In einer...
14.11.2008 12:31:29
Thread-ID: 1024532
5 Beiträge
Zeilen aus anderer datei kopieren
Dieter

Hi,
habe mal wieder ein schweres Problem:
ich möchte aus einer anderen Excel Date ein paar Zeilen kopieren. das Ganze soll folgendermassen funktionieren:
Quelldatei : "IMPORT.XLS
Tabellenblatt : "DATEN" oder "FPC"
Zieldatei : "EXPORT.XLS
Tabelnneblatt : "EINGABE"
so,...
01.12.2008 11:51:16
Thread-ID: 1029203
5 Beiträge
Kopf- & Fußzeile auf andere Dateien übertragen?
Jessi

Hallo zusammen,
habe mal wieder eine Frage:
Habe 175 Dateien, die ich mit gleicher Kopf- & Fußzeile versehe muss. Die Dateien sind alle gleich nummeriert:
001.xlsm
002.xlsm
(...)
175.xlsm
Gibt es ggf. eine geschickte Möglichkeit z.B. das erste Tabellenblatt richt...
06.12.2008 18:56:00
Thread-ID: 1030728
9 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
14
3
2
9
5
1
4
4
8
4
3
2
2
6
3
4
2
8
5
6
1
5
1
13