Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
844to848
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
844to848
844to848
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen verschieben, wenn...

Zeilen verschieben, wenn...
10.02.2007 21:39:15
Uwe
Guten Abend miteinander.
Auch nach langem Stöbern im Archiv kann ich das Problem bislang nicht lösen.
Ich benötige einen VBA-Code für:
Wenn Zelleninhalte sowohl in Spalten "C" UND "I" des Tabellenblattes "Arbeitsblatt" vorhanden sind, dann verschiebe die Zeilen nach Tabellenblatt "Container", wo sie an den vorhandenen Bestand angehängt werden.
(Der Befehl soll dann manuell über einen Button ausgelöst werden).
Danke im Voraus.
MfG
Uwe

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen verschieben, wenn...
10.02.2007 21:54:55
th.heinrich
hallo Uwe,
bin in vba nicht bewandert, aber versuche doch den Makrorecorder zu nutzen. spalte C und I mit dem Autofilter nach Nichtleeren filtern und dann den sichtbaren bereich kopieren.
wo sie an den vorhandenen Bestand angehängt werden. dafuer gibt es genug beispiele in der https://www.herber.de/ssearch.html
gruss thomas
AW: Zeilen verschieben, wenn...
11.02.2007 00:13:00
ingUR
Hallo, Uwe,
wenn die von Thomas vorgeschlagene Lösung nicht zur Aufgabenlösung ausreichen sollte, hier eine VBA-Modul-Prozedur, die die betreffenden Zeilen aus der Tabelle "Arbeitsblatt" löscht, für die Zelleninhalte in den Spalten C und I identisch sind, nachdem sie an des Ende der Einträge in auf der Tabelle "Container" angefügt wurden.
In dem Programmteil werden alle Zeilen der Tabelle "Arbeitsblatt" bis zum letzten Eintrag der Spalte A geprüft.
Option Explicit
Sub KopiereWenn_C_gleich_I()
Dim ws As Worksheet, rngR As Range, maxR As Long, r As Long
Set ws = Worksheets("Arbeitsblatt")
With ws
maxR = .Cells(.Rows.Count, 1).End(xlUp).Row
Do
r = r + 1
If Len(.Cells(r, 3).Value) > 0 And _
(.Cells(r, 3).Value = .Cells(r, 9).Value) Then
.Rows(r).Copy Sheets("Container").Range("A" & Sheets("Container").Cells(Rows.Count, 1).End(xlUp).Row + 1)
.Rows(r).Delete Shift:=xlUp
maxR = maxR - 1
r = r - 1
End If
Loop Until r > maxR
End With
Set ws = Nothing
End Sub
Ich hoffe, dass diese Prozedur als Grundgerüst genutzt werden kann. Testen solltest Du sie auf jedenfall in einer Arbeistkopie Deiner Mappe, da der Ablauf von mir nicht umfassend geprüft ist.
Gruß,
Uwe
Anzeige
AW: Zeilen verschieben, wenn...
11.02.2007 10:31:33
Uwe
Herzlichen Dank euch Beiden für eure schnelle Antwort,
es hat geklappt!
Danke und Gruß
Uwe

245 Forumthreads zu ähnlichen Themen

Zeilennummer automatisch verschieben
oblivion

Hallo, wollte mal wissen ob man die Zeilennummer automatisch erhöhen kann, wenn man eine Formel nach rechts zieht.
Ich habe daten in einer Tabelle untereinader stehen.
In einer 2. Tabelle brauche ich die gleíchen Daten aber waagerecht.
Wenn ich die Formel =Tabelle1!$A1 nach rechts z...
31.08.2008 13:22:00
Thread-ID: 1006181
12 Beiträge
Anzeige
Zeile ausschneiden und verschieben, wenn "ja"
Lucia

Hallo zusammen,
ich habe folgendes Makro:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range) Dim intRow As Integer If Target.Column 16 Then Exit Sub If IsEmpty(Target) Then Exit Sub If Target.Value = "Ja" Then With Worksheets("Rechnungenbezahlt") intRow = .Cells...
20.01.2009 09:18:00
Thread-ID: 1041724
21 Beiträge
Spalten in neues Tabellenblatt kopieren
Doreen

Ich arbeite seit langem mal wieder mit Excel und hab alles vergessen :-(
Ich habe ein Tabellenblatt in dem ich alle meine Informationen pflege. Einfach verschiedene Daten (z.B. Liefertage, Lieferdateinname, Land, etc.) in Spalten runter geschrieben, ohne Bezüge - nichts, einfach nur ne Lis...
22.07.2009 11:53:21
Thread-ID: 1090482
2 Beiträge
Anzeige
Spalten H & I in ein neues Tabellenblatt kopieren
Henning

Hallo zusammen,
wie man schon an meinem Level erkenne kann, bin ich ein Anfänger was VBA angeht.
Nun zu meinem Problem.
Ich habe ein Tabellenblatt mit dem Namen "Stammdaten" in diesem fängt
ab der 18 Zeile in den Spalten H und I folgende Tabelle an. Es folgen noch weitere Spalt...
23.11.2009 22:01:03
Thread-ID: 1119606
7 Beiträge
Zeile in anderes Tabellenblatt kopieren
Carle

Hallo zusammen!
Ich würde gerne in einem Arbeitsblatt die Kopfzeile einer Tabelle in ein anderes Tabellenblatt derselben Arbeitsmappe kopieren, und zwar in der Weise, dass bei einer Änderung der Tabellenzeile (z. B. durch Einfügen einer neuen Spalte oder Änderung des Werts einer Zelle) sich...
01.02.2010 20:51:08
Thread-ID: 1134230
3 Beiträge
wenn dann kopie in anderes Tabellenblatt
Sascha

Hallo Forum
Nun mal wieder eine schicke frage. Ich habe hier eine Wenn abfrage die fragt in der Tabelle Import 200 das Datum ab und vergleicht es mit dem Datum des Tabellenblattes von Import 202. Dann kopiert sie wenn das Datum, gleich ist die Zahl von Import 202 aus der Spalte B.
Ist e...
05.04.2010 03:04:09
Thread-ID: 1150215
5 Beiträge
zeilen automatisch verschieben
Daniel

Hallo liebe Excel gemeinde,
folgendes Problem habe ich:
Ich möchte gerne in einem tabellenblatt daten von mehreren anderen Tabellenblättern in der gleichen arbeitsmappe durch verschiedene Formeln auswerten. Das ist kein Problem.
Mein Problem ist, wenn ich in einzelnen Arbeitsblät...
18.06.2010 22:04:22
Thread-ID: 1162732
2 Beiträge
Zeilen ausblenden und verschieben wenn...
Michael

Hallo,ich habe da ein Problem das glaube ich nicht in Excel zu lösen ist. Ich habe eine Kundendienstliste mit den Zellen Name, Strasse Ort, Plz, Kundendienstgrund, ErledigtIch möchte nun eine Zeile komplett in eine andere Arbeitsmappe ("Archiv")verschieben lassen sobald im hintersten Feld "Erle...
08.05.2002 16:41:22
Thread-ID: 119609
2 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
11
10
20
1
2
6
2
4
1
1
7
2
1
3
11
4
7
3
7
2
11
4
4
2
4