Live-Forum - Die aktuellen Beiträge
Datum
Titel
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
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1424to1428
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
1424to1428
1424to1428
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeiler per VBA in zweites Tabellenbl. verschieben

Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 07:21:33
Oliver
Hallo zusammen,
ich habe eine Datei mit zwei Tabellenblättern.
Zum einen das Tabellenblatt "Paletten" und zum anderen das BLatt "Archiv".
In Zeile 3 beginnen die Überschrifen...
Filiale / Name / Straße / PLZ / Ort / Colli usw.
Nun will ich gerne das wenn ich im z.B Bereich A4:E20 Werte stehen habe, diese per Button in das Blatt "Archiv" ebenfalls ab Zeile 4 verschoben werden und im Blatt "Paletten" entfernt / gelöscht werden.
Wenn ich nun wieder neue Werte in das Blatt "Paletten" eintrage, sollen diese dann ebenfalls per Klick auf den Button wieder ins Archiv geschoben werden, aber direkt unter den letzten Satz / Zeile des Archivs. Also immer angehangen werden.
Leider bin ich bei Google auf dieverse Lösungen gestoßen die nicht das gemacht haben was sie sollten.
Ich hoffe hier kann mir einer helfen.
mfg

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 08:21:16
hary
Moin
Sind Fragen offen.
Koennen leere Zeilen im Bereich sein?
In welcher Spalte(Paletten) kann man den letzten Eintrag herleiten?
gruss hary

AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 09:42:04
Oliver
Hi Hary,
NEiN leere Zeilen sollten dort nicht vorkommen, ich denke es macht aber Sinn dieses mit einzubauen, weil andere damit Arbeiten werden und dann weiß man ja nie.
Leere Zellen werden vorkommen.
Was meinst du herleiten?
Welche die letzte Spalte ist, in der ein Wert steht?
Oh, dass weiß ich jetzt gar nicht so genau.
Das kann man doch aber noch anpassen, oder?

AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 10:43:54
hary
Moin
Um etwas anzuhaengen braucht es eine Spalte wo in den Zellen immer etwas steht. Dann kann man sagen Bsp.: in SpalteA steht immer etwas und da nimm die letzte belegte Zelle + 1 und haenge dran.
Mit UsedRange geht es auch, kann aber in die Hose gehen.
Lad mal eine bsp.-Mappe hoch.
gruss hary

Anzeige
AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 12:50:54
Oliver
Hallo Hary,
nen bisschen hab ich und ein Freund (Java Entwickler) hinbekommen.
Wir haben es schon mal soweit hinbekommen, dass nur die Werte übertragen werden.
Jedoch haben wir noch das Problem, das wenn wir am Schluss die Zeilen löschen, die SVERWEISE logischer Weise ebenfalls weg sind. Die SVERWEISE in den Spalten B:E sollten vorhanden bleiben oder wieder eingefügt werden.
Auch sollte die Dropdown Box in Spalte G nicht mitkopiert und gelöscht werden.

AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 13:14:55
hary
Moin
Probier mal so. 
Dim letzte As Long
Dim a As Long
Dim wksQ As Worksheet
Dim wksZ As Worksheet
Set wksQ = Worksheets("Paletten")
Set wksZ = Worksheets("Archiv")
For a = 4 To wksQ.Cells(Rows.Count, 1).End(xlUp).Row
If Application.CountBlank(wksQ.Cells(a, 1).Resize(1, 7))

gruss hary

AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 13:55:18
Oliver
Hallo Hary,
soweit so gut.
Jedoch sind leider die SVERWEISE ab der Zeile in der man Werte, im Blatt "Paletten" ebenfalls weg.
Diese sollen schon drin bleiben, ohne das man diese immer wieder reinkopieren muss.
Das gleiche sollte dann auch für das Dropdown gelten.

Anzeige
AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 15:12:10
hary
Moin
Dann so. 
Dim letzte As Long
Dim a As Long
Dim wksQ As Worksheet
Dim wksZ As Worksheet
Set wksQ = Worksheets("Paletten")
Set wksZ = Worksheets("Archiv")
For a = 4 To wksQ.Cells(Rows.Count, 1).End(xlUp).Row
If Application.CountBlank(wksQ.Cells(a, 1).Resize(1, 7))

gruss hary

AW: Zeiler per VBA in zweites Tabellenbl. verschieben
25.05.2015 22:14:48
Oliver
Hallo Hary,
hat geklappt, danke.
Ich habe aber das vorherige genommen und einfach die Formeln wieder mit reinkopiert, falls einer diese löscht.
Vielen Dank für die super Hilfe.

Sub Archiv()
Dim letzte As Long
Dim a As Long
Dim wksQ As Worksheet
Dim wksZ As Worksheet
Set wksQ = Worksheets("Paletten")
Set wksZ = Worksheets("Archiv")
For a = 4 To wksQ.Cells(Rows.Count, 1).End(xlUp).Row
If Application.CountBlank(wksQ.Cells(a, 1).Resize(1, 9))

Anzeige

301 Forumthreads zu ähnlichen Themen

Eingabemaske für Tabelle via VBA ?
kiwi279

Hi Ihr,
habe eine größere Adressdatenbank als Excel-Datei.
Der Inhalt sind normale Adressen, zu denen in jeder Spalte separat bestimmte Informationen (Nachname, Vorname, Email, Geburtstag, Beruf etc.) abgelegt sind.
Da die Datensätze immer wieder ergänzt und aktualisiert werden, ist...
13.08.2008 21:10:00
Thread-ID: 1001661
17 Beiträge
Anzeige
Steuerelement Listbox1 in tabelle wird in VBA n
Mike

Hallo
Ich habe in einer Tabelle aus der Symbolleiste Steuerelemente ein Listenfeld in eine Tabelle eingefügt. Der Objektname lautet "Listbox1".
Über ein Makro will ich nun diese Listbox füllen.
Listbox1.additem "Text"
wenn ich das Makro ausführen wird die Listbox1 jedoc nicht ge...
28.11.2008 11:59:00
Thread-ID: 1028645
3 Beiträge
Änderungen in Tabellen via VBA vornehmen
Wolfgang

Hallo,
in einer Mappe befinden sich 3 Tabellenblätter; Gesamt, Grunddaten und Altdaten - In Gesamt werden unterschiedlich viele Daten, die aber alle immer das Format zu Tabelle Grund- und Altdaten haben, eingespielt. Im beiliegenden Code, wenn ich ihn richtig interpretiere, werden Veränderu...
06.12.2008 15:50:24
Thread-ID: 1030699
7 Beiträge
Anzeige
VBA Script in andere Tabellen
Jörg

Hallo,
mich würde mal interessieren, ob es möglich ist, das Script einer Tabelle öffentlich für andere Tabellen zu machen. Derzeit ist es so, wenn ich das Makro in anderen Tabellen anwende, öffnet sich erst die Tabelle in der das Makro drin steht. Kann man das umgehen?
Für Eure Hilfe vi...
14.01.2009 11:42:23
Thread-ID: 1039546
16 Beiträge
VBA-Code in einem String erzeugen und dann ausführ
Dirk

Hallo!
Gibt es eine Möglichkeit, VBA-Code auszuführen, der in einer String-Variablen vorliegt, die zuvor dynamisch erzeugt wurde? Sprich: Ich möchte VBA-Code dynamisch erzeugen und anschließend ausführen. Geht das irgendwie?
Ich hoffe, das ist so verständlich.
Vielen Dank,
Dirk<...
20.01.2009 20:08:36
Thread-ID: 1041981
4 Beiträge
VBA Code mit VBA in Tabelle kopieren - Fehler?!
Andreas

Hallo Herber Fans,
ich habe mir heute aus der Recherche eine Möglichkeit rausgesucht, einen Code über VBA in ein anderes VBA Worksheet zu kopieren. Das dies in VBA überhaupt geht ist ja schon genial. Es soll ein Code in das VBA Worksheet des activeworkbooks kopiert werden.
Der Code dafü...
11.02.2009 15:56:00
Thread-ID: 1049657
3 Beiträge
Auslesen_Tabellenblattname_eintragen-siehe VBA
Fabio

Hallo zusammen,
mit dem Makro unten aus dem Forum lese ich diverse Exceldateien in einem Verzeichzis aus. Soweit ich das gesehen habe, liest das Makro immer das "erste" Tabellen-Blatt aus.
Aktuell habe ich folgendens:
- Ein Verzeichnis mit 10 Excel-Dateien
- Die Exeldatein haben...
06.04.2009 11:13:51
Thread-ID: 1067062
4 Beiträge
Strings vergleichen in 2 verschiedenen Tabellen
Mario

Hallo zusammen,
ich versuch mal mein Problem zu beschreiben:
Tabelle 1 ist ein Schichtplan, der die Namen der MA, eingeteilt in verschiedene Gänge, mit dem Zusatz "Gang" enthält, z.B. Mayer Hans 12.
Tabelle 2 ist ein Anwesenheitsplan, der die Namen incl. Personalnummer hat, z.B. May...
26.07.2009 14:32:41
Thread-ID: 1091022
8 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
16
7
2
6
8
15
3
2
3
7
6
1
2
4
1
9
2
4
3
3
4
1
2
2
6