Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.05.2025 11:04:50
Aktualisieren Button mit Piktogramm?
13.05.2025 10:24:22
Formelfehler
13.05.2025 08:10:06
Laufzeitfehler 57121 (Anwendungs- oder objektdefinierter Feh
13.05.2025 07:51:02
Exceldateien schneller öffnen / abspeichern?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
392to396
392to396
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kopierproblem in VBA

Forumthread: Kopierproblem in VBA

Kopierproblem in VBA
11.03.2004 13:58:30
Clemens Meyer
Hi,
ich habe folgendes - wahrscheinlich simples - Problem:
Ich habe drei Dateien, die ich per Macro in eine Datei kopieren möchte. Dabei soll zuerst die erste, dann die zweite und schließlich die dritte untereinander geschrieben werden. Jetzt bin ich schon soweit, dass die erste Datei bis zur letzten beschriebenen Zeile kopiert und in die neue Datei eingefügt wird. Durch welchen Befehl bekomme ich es nun hin, dass die zweite Datei "unter" die erste eingefügt wird?
Besten Dank für die Hilfe,
Clemens
Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Kategorie
Makro-Programmierung
Tags
#einfügen #letztezeile #makros
Relevante Fragen
Anzeige
Betreff
Datum
Anwender
Anzeige
AW: Kopierproblem in VBA
11.03.2004 14:09:54
Jörg
Hallo Clemens,
versuchs mal damit:
Range("A1").Select
Selection.End(xlDown).Select ' springt an die letzte beschriebene Zelle
ActiveCell.Offset(1, 0).Select 'von der aktiven Zelle eine Zeile runter, gleiche Spalte
Voraussetzung dafür, daß immer ein Wert in der Spalte A steht, ansonsten mußt Du eine andere Spalte wählen und dann bei Offset anstelle der 0 die Anzahl der Spalten angeben, die Du nach links springen möchtest (mit neg. Vorzeichen).
Ciao Jörg
Anzeige
AW: Kopierproblem in VBA
11.03.2004 14:19:51
Werner Oertli
Grüezi Clemens
x = Range("A65536").End(xlUp).Row
Cells(x + 1, 1).Select
Gruss Werner
DANKE !!!
11.03.2004 15:35:30
Clemens Meyer
Ich danke euch!!!
Gern geschehen
11.03.2004 16:17:07
Werner Oertli
Grüezi Clemens
Danke für die Rückmeldung
Gruss Werner
Anzeige
Doch noch ein Problem
11.03.2004 17:21:45
Clemens Meyer
Hi Werner,
leider funktioniert das ganze doch noch nicht so richtig. Es besteht folgendes stark vereinfacht dargestelltes Problem:
In Zeile 1 sind die Spalten A, B und C mit Inhalt gefüllt, während in Zeile 2 nur die Spalte B. Bei der Formel, die Du mir genannt hast, scheint er in diesem Fall die Zeile 1 als Endzeile anzusehen, sodass die Zeile 2 überschrieben wird. Es lässt sich allerdings nicht festlegen, ob immer der letzte Wert in Spalte B auftaucht. Auch ein Hochsetzen des "Zeilenweitersprungs" hilft nicht weiter, da es auch sein kann, das in den Zeile 3 bis 10 der Spalte B auch etwas steht.
Ich probiere schon seit einiger Zeit herum. Aber bisher ohne Erfolg. Er schneidet mir immer eine Zeile weg. Weißt du vielleicht eine Lösung???
Besten Dank abermals!!!
Clemens
Anzeige
AW: Kopierproblem in VBA
12.03.2004 07:43:46
Werner Oertli
Grüezi Clemens

Sub LETZTE_ZEILE()
x = ActiveSheet.UsedRange.Rows.Count
Cells(x + 1, 1).Select
End Sub

Dieses Makro sucht die letzte Zelle aus allen Spalten.
Gruss Werner
Allerbesten Dank!!!
12.03.2004 09:23:35
Clemens Meyer
...
Danke für die Rückmeldung
12.03.2004 10:44:35
Werner Oertli
Anzeige

Forumthreads zu verwandten Themen

Beim Kopieren eines Tabellenblattes den VBA-Code e
Alfi

Hallo Excel-Gemeinde!
ich habe eine mehrblättrige Datei, per Makro kopiere ich ein Blatt und speichere dieses unter neuem Namen ab.
Dieses Blatt soll aber nicht mehr den VBA-Code der ursprübglichen Datei enthalten, sprich ein Blatt ohne Makros.
Wer kann mir helfen?
So sieht der...
09.09.2008 09:58:00
Thread-ID: 1008333
8 Beiträge
Problem mit Drag&Drop und kopieren (VBA)
Micha

Hallo liebe Spezialisten,
ich habe mal wieder ein Problem und hoffe auf Hilfe :-)
Hier im Forum habe ich den folgenden Code zum deaktivieren von „Drag&Drop“ bekommen.
Private Sub Workbook_Activate() 'Verhindert Drag&Drop (Teil-1) Application.CellDragAndDrop = False End Sub...
17.09.2008 10:34:00
Thread-ID: 1010266
2 Beiträge
Kopieren VBA anstatt einer Formellösung
Bernhard

Hallo liebe Excel-Freunde,
wer kann mir helfen, eine Aufgabenstellung, die ich zwar mit Formeln gelöst habe mit einem VBA Makro zu lösen. Wie kopiere und paste ich Werte aus einer Tabelle1 in eine Tabelle2, abhängig davon ob ein Wert in einer bestimmten Spalte ist. Das Beispiel habe ich zum...
24.09.2008 17:28:00
Thread-ID: 1012129
9 Beiträge
VBA Zellen mit x kopieren aber nur bestimmte Zellen
balta

Hallo zusammen,
habe folgendes problem, undzwar sieht meine Tabelle so aus
__A____B______C______D_____E_______F_____G____H
1_x___alf___test1_________________1234___a____ist ein Auto
2_y________________Ulf____test2__________b____ist ein Krad
3
4
5
6_y_____________...
26.09.2008 23:48:47
Thread-ID: 1012775
6 Beiträge
Berechn.PivotField - Orientation per VBA = Fehler
Andreas

Hallo Herber Fans,
ich bin heute erstmalig mit einem Problem konfrontiert worden, welches keiner rationalen Logik zu folgen scheint. Auch im Forum habe ich dazu bisher nichts gefunden und wollte fragen, ob damit schon Erfahrung besteht, oder ich vielleicht auch einfach einen Denkfehler habe...
02.10.2008 15:17:00
Thread-ID: 1013901
3 Beiträge
VBA--Zellen finden/vergleichen/kopieren
Christian

Hallo
einen Beispieldatei ist anbei!!
Bisher konnte ich mit folgendem Code Zellinhalte "täglich" teilen und in neue Zellen kopieren.
Sheets("179").Select Range("B255").End(xlUp).Offset(1, 0).Select ActiveCell.FormulaR1C1 = "=TRIM(LEFT('tägliche Statistik'!R12C6,FIND(""/"",'täglic...
07.10.2008 10:15:00
Thread-ID: 1014634
3 Beiträge
VBA Zeilen kopieren bis...
Silvi

Hallo,
kann mir bitte mal jemand bei folgendem Makro helfen:
'Rows("2:2").Select
Selection.Copy
Range("A3").Activate
Do Until ActiveCell.Value = ""
ActiveCell.Offset(1, 0).Activate
Loop
ActiveSheet.Paste
Selection.Copy
Selection.PasteSpecial Paste:=xlValu...
13.10.2008 13:13:04
Thread-ID: 1016022
13 Beiträge
VBA Zellen prüfen, txt kopieren, einfügen in txt
Stevie

Hallo Zusammen,
da ich kaum Erfahrung im Bereich VBA habe hätte ich gerne mal folgendes Problem :)
Ich habe folgenden Code der Variablen in einer Textdatei ersetzt, eine neue Datei speichert und die File anschleißend mittels Batchrutine an einen Drucker schickt.
Hier der bisherige C...
06.11.2008 09:56:19
Thread-ID: 1022167
3 Beiträge
Anzeige
Filtern und Kopieren - VBA
Wolfgang

Hallo,
gestern konnte ich von Daniel viele gute Tipps und Hinweise erhalten, um meine Frage zu klären. Mit dem folgenden Code möchte ich erreichen, dass gefilterte Daten in "Grunddaten" in die Tabelle "Altdaten" kopiert werden und diese Datensätze dann in "Grunddaten" gelöscht werden. Das k...
09.11.2008 10:21:00
Thread-ID: 1023032
7 Beiträge
Wert bestimmt Anzahl der zu kopierenden Zeilen VBA
Maja

Hallo,
ich Suche eine Formel mit der ich folgenden Code modifizieren kann:
Sub Uebergabe() Dim i As Integer Dim k As Integer Dim iRowT As Integer Const zz = 1 flagg = False Sheets("Vorlage_Angebot_Sicht").Activate Sheets("Vorlage_Angebot_Sicht").Range("D2").Select i = 0 iRowT = 10 Do...
18.12.2008 13:24:00
Thread-ID: 1033843
5 Beiträge
Anzeige
Zahl muß nach kopieren nochmal eingeben werden
Reinhardt

Hallo.
Ich gebe über Inputbox einige Werte ein (Siehe u.a. Sub).
Danach übertrage ich diese in eine Übersicht.
Sub schritt3() Dim a, b, c, d a = "Wieviele Stunden? " b = "Anzahl Stunden" c = "0,00" d = InputBox(a, b, c, 9000, 7000) Range("D24").Value = d 'Anzahl Stunden Ra...
09.01.2009 13:21:28
Thread-ID: 1038212
2 Beiträge
Rechnen mit Pivot Inhalt
Meli

Hallo,
ich habe eine Pivottabelle, in der Kosten pro Kostenstelle und die Anzahl der Mitarbeiter pro Kostenstelle enthalten sind. Jetzt möchte ich eine extra Spalte haben, wo ich Kosten der einzelnen Kostenstellen dividiere durch die Anzahl der Mitarbeiter (quasi die durchschnittliche Koste...
28.01.2009 11:47:00
Thread-ID: 1044512
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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