Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
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
1020to1024
1020to1024
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen in anderes Blatt verschieben

Forumthread: Zeilen in anderes Blatt verschieben

Zeilen in anderes Blatt verschieben
07.11.2008 12:55:00
Paul
ich suche noch immer nach eine Lösung (VBA) für folgendes Problem:
Habe jetzt mal ein Testdatei eingestellt.
In einer Tabelle erfasse ich offene Rechnungen und verfolge deren Zahlungseingang. jetzt möchte ich, da die Tabelle immer länger wird, die vollständig bezahlten Rechnungssätze (immer eine Zeile der Tabelle) in einem separaten Sheet archivieren.
Meine Gedanke: Ein VBA verschiebt alle Zeilen des Sheet's "Rechnungen" wo die die Spalte "A größer 0" und"J =0" ist in das Sheet "Bezahlt" und fügt sie hier in die erste freie Zeile ein.
Geht dass?
Ich wüsste übrigens nicht, wie ich dass wie ein Formus-Eintrag sagt, mittels einer Makro-Aufzeichnung hinbekommen soll (Suchen der Befingungen un ersten freien Zeile)
https://www.herber.de/bbs/user/56593.xls
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen in anderes Blatt verschieben
07.11.2008 13:19:00
Rudi
Hallo,
in ein Modul:

Sub tt()
Dim i As Integer
Application.ScreenUpdating = False
With Sheets("Rechnungen")
For i = .Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
If .Cells(i, 1) > 0 And .Cells(i, 16) = 0 Then
.Rows(i).Copy Sheets("Bezahlt").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
.Rows(i).Delete
End If
Next
End With
Application.ScreenUpdating = True
End Sub


Gruß
Rudi

Anzeige
Korrektur
07.11.2008 13:21:00
Rudi
Hallo,
For i = .Cells(Rows.Count, 1).End(xlUp).Row To 4 Step -1
Gruß
Rudi
AW: Korrektur
07.11.2008 16:08:42
Paul
Hallo Rudi,
das ist ja fast traumhaft, wenn Du es jetzt noch realisieren könntes das
1. nur die Werte in das Sheet "Bezahlt" eingefügt werden und nicht die Formeln
und
2. die gleiche Zeile die in Sheet Rechnungen entfernt wird, auch im Sheet "Zahlungen" verschwindet, dann währe das Ding perfekt
Anzeige
;

Forumthreads zu verwandten Themen

VBA Zeilen ein/ausblenden + weiters Problem
oblivion

hallo, ich hab mal wieder ein kleines und ein etwas größeres Problem
erstmal zum kleinen. wie bekomme ich es mit hilfe von einem vba hin, wenn ich ein kontrollkästchen mit einem Hacken versehe, dann bestimmte Zeilen (Sagen wir mal Zeile 20 bis 30), die ich vorher versteckt hatte, nun zum vo...
10.08.2008 00:22:06
Thread-ID: 1000558
3 Beiträge
Zeilen einfärben abhängig von Zellwerten
Zellwerten

Hi Leute
Da ich nicht weiß, wie ich nach meinem Problem suchen kann, beschreibe ich es einfach mal kurz. Vielleicht kann mir ja jemand helfen.
Ich habe ein Excel-File, das xSpalten hat und xZeilen.
In einer Spalte (in meinem Fall Spalte F) stehen die verschiedenen Auftragsnummern, a...
18.08.2008 16:57:26
Thread-ID: 1002687
6 Beiträge
Leerzeilen in markieren Bereich einfügen
Ulrich

Hallo zusammen,
ich möchte gerne einen Bereich markieren und dann ein Makro starten, dass im markierten Bereich unter jeder Zeile eine Leerzeile einfügt und dann den gesamten Bereich (Zeilen+Leerzeilen) markiert.
Habe das versucht - geht nicht:
Dim bereich As Range
Set bereich...
26.08.2008 15:36:00
Thread-ID: 1004840
3 Beiträge
Zeilen nach Abfrage einfärben
Dirk

Hallo, ich möchte gerne in einer Tabelle folgendes abfragen:
Wenn in Spalte P der Wert kleiner 0 ist, dann färbe mir die
Entsprechenden Zeilen in Spalte A,B,C, ein.
Mit der bedingten Formatierung haut so etwas nicht hin.
Wer hat eine einfache Idee ?
Gruß Dirk
04.09.2008 07:51:44
Thread-ID: 1007267
5 Beiträge
Anzeige
Zeilen markieren (ohne Formeleinträge)
Selma

Hallo Leute,
ich habe versucht ab Zeile 2 bis letzte gefüllte Zelle der Spalte B (leere Formelergebnisse sollen nicht berücksichtigt werden) die Zeilen zu markieren, leider ohne Erfolg.
Rows("2:" & Range("B65536").End(xlUp).Row).Select
Was muss ich ändern?
Vielen Dank im Vor...
07.09.2008 18:35:00
Thread-ID: 1007992
5 Beiträge
2 Zeilen einfügen + Schleifenweiterlauf
Herbert

Hallo zusammen,
ich bin neu hier und sehr begeistert von diesem Forum/dieser Website - wirklich toll, dass es so etwas gibt:-)
Allerdings habe ich ein kleines VBA-Problem.....
Dim reihe As Integer
Const spalte As Integer = 5 ' Spalte Teilebezeichnung
reihe = 3 ' Tabelle...
16.09.2008 20:06:00
Thread-ID: 1010193
5 Beiträge
Zeilen löschen verhindern
steffen

Hallo Excelgemeinde,
ich scheiere gerade an dem Versuch, mein Tabellenblatt so zu sichern, dass auch nach dem "Blattschutz aufheben" ein Löschen von Zeilen nicht möglich ist. Das einfachste wäre natürlich ein Blattschutz mit Kennwort. Das will ich aber nicht.
Ich dachte da an sowas, wie...
22.09.2008 10:46:33
Thread-ID: 1011401
2 Beiträge
Anzeige
Makro zur Zeilen löschen verfeinern
Matthias

Hallo Zusammen,
ich habe ein Makro, das alle Zeilen löscht in denen kein Inhalt steht.
Allerdings würde ich das Makro gerne so anpassen, dass er eine Zeile komplett löscht, wenn in einer bestimmten Spalte die Zelle leer ist.
Das Makro soll also nicht die gesamte Zeile nach Inhalten...
22.09.2008 13:23:19
Thread-ID: 1011460
4 Beiträge
optimale Zeilenhöhe einer Zeile
Jakob

Hallo,
ich habe ein kleines Problem mit der optimalen Höhe einer Zeile und vielleicht habt Ihr eine Lösung für mein Problem.
Man kann ja unter Zellen formatieren/Textsteuerung den Haken bei Zeilenumbruch anklicken und Excel paßt die Zeilenhöhe automatisch an. Soweit so gut. Wenn ich abe...
24.09.2008 15:24:00
Thread-ID: 1012091
7 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
Anzeige
2 Tabellen verbinden ->zeilenweiser Mengenabgleich
Mike

Hallo erstmal,
als begeisterter Forumsleser habe ich schon viele Tage hier verbracht. Jetzt traue ich mich einmal hinein und hoffe auf Eure Hilfe.
Ich habe 2 laaange Tabellen. In Tabelle1 stehen (neben anderen Daten)
Teilenummer, Auftragsnummer, (Lieferwoche) und Stück und in Tabel...
16.10.2008 11:37:00
Thread-ID: 1016808
8 Beiträge
Anzahl Zeilen mit identischen Eintrag errechnen
Matthias

Hallo,
ich will die folgenden Aufgabe per Makro lösen: ich will wissen, wie viele Zeilen es unterhalb einer Ausgangszeile mit dem gleichen Inhalt gibt, bis der Inhalt der nächsten darunter liegenden Zelle wechselt.
Beispiel:
Dresdner Bank Banken
Historie
Historie
...
16.10.2008 12:50:00
Thread-ID: 1016833
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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