Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
660to664
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
660to664
660to664
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellinhalt suchen und Zeile auf anderes Sheet kopi

Zellinhalt suchen und Zeile auf anderes Sheet kopi
01.09.2005 11:53:43
denis
Hallo Ihr da draussen - ich habe meine ersten Schritte in VBA gemacht und ihr werdet Euch wohl kringeln wenn ihr mein Problem lest - aber ich komme einfach nicht weiter (VBA für DUmmies ist nicht für Dummies zu empfehlen.....)
Ich habe ein Excel Formular in diesem gibt es einen Button der ein Macro laufen lassen soll wenn man draufdrückt.
Dieses Macro soll die Spalte N nach Zellen durchsuchen die ein X oder ein x enthalten. Wenn ein X oder ein x vorhanden ist soll die gesammte Zeile kopiert werden und auf Sheet(2)in die letzte freie Zeile gespeichert werden.
Wenn alle Zeilen mit X oder x auf das neue Blatt kopiert wurden sollen auf sheet(1) alle x in der Spalte N gelöscht werden.
Die spalten mit den X bzw. x sind nicht alle untereinander sondern es befinden sich auch immer mal wider leere Zellen oder Zellen mit anderen Werten dazwischen.
Wer kann mir helfen?
Im Vorraus vielen Dank. (und sorry für Eure Bauchschmerzen - wegen dem vielen lachen)

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

Betreff
Datum
Anwender
Anzeige
AW: Zellinhalt suchen und Zeile auf anderes Sheet kopi
01.09.2005 12:20:00
Harald
Hallo Denis,
bin selbst noch meilenweit von vba-gut entfernt und kann dir Herbers Excel-CD empfehlen.
Da hab ich untenstehenden Quellcode entnommen und etwas angepasst und im Blattmodul von Tabelle1 getestet.

Sub TestCopy()
Dim wks As Worksheet
Dim iRow As Integer, iRowL As Integer, iRowT As Integer
Set wks = Worksheets(2)
iRowL = Cells(Rows.Count, 14).End(xlUp).Row
For iRow = iRowL To 1 Step -1
If InStr(Cells(iRow, 14).Value, "X") Or InStr(Cells(iRow, 14).Value, "x") Then
iRowT = wks.Cells(Rows.Count, 1).End(xlUp).Row + 1
Rows(iRow).Copy wks.Rows(iRowT)
Rows(iRow).Delete
End If
Next iRow
wks.Columns.AutoFit
Application.CutCopyMode = False
End Sub

Gruß
Harald
Anzeige
AW: Zellinhalt suchen und Zeile auf anderes Sheet kopi
01.09.2005 13:03:42
denis
hm ---- soweit nicht schlecht funktioniert - aber er soll nicht die daten auf sheet1 löschen - also habe ich
Rows(iRow).Delete
gelöscht.
aber dann kopiert er plötzlich nur moch die erste Zeile die ein x enthält.?!?
was amcht dies:
Application.CutCopyMode = True (bzww false) ?
Warum hast Du das in den Code genommen?
Trotzdem vielen vielen Dank - hat mich ein ganzen Stück weitergebracht.
AW: Zellinhalt suchen und Zeile auf anderes Sheet kopi
01.09.2005 13:26:22
Harald
Hi Denis,
hmmm, also ich hab die Zeile Rows(iRow).Delete
per Hochkomma auskommentiert und der Code läuft fehlerfrei durch.
Vielleicht kannste die Schleife mal von oben nach unten laufen lassen.
For iRow = iRowL To 1 Step -1
durch
For iRow = 1 To iRowL
ersetzen
CutCopyMode markieren und F1 drücken. Ist ganz gut erklärt ;-))
Gruß
Harald
Anzeige

305 Forumthreads zu ähnlichen Themen

Zeilen in Zellen suchen und löschen
Daniel

Hallo,
ich möchte in Excell mehrere Zelle suchen, die folgenden String in einer oder mehreren Zeilen enthalten: ----
Diese Zeilen möchte ich dann löschen. Nach diesem String sind noch weitere Zeichen vorhanden, die auch gelöscht werden sollen.
Weiß jemand wie ich am besten vorgehe?...
13.08.2008 12:52:02
Thread-ID: 1001495
9 Beiträge
Anzeige
Letzen wert in Zeile(nicht Spalte)
hary

Nabend alle miteinander
In einer bestimmten Zeile suche ich den letzten Eintrag. Bis zu diesem soll gefaerbt werden. Mit diesem Code faerbe ich den ganzen Bereich, es soll aber nur bis zum letzten Eintrag in der Zeile gefaerbt werden. Da von links nach rechts gefaerbt.
Case Is = Cells...
28.08.2008 21:25:00
Thread-ID: 1005592
5 Beiträge
Zeile mit Werten aus anderer Tabelle vergleichen
onkelbobby

Hi,
ich versuche folgendes in meine Datei einzubauen.
Tabelle 2 enthält Adressdaten und eine Infospalte. In diese Infospalte kann der Wert "S" oder der Wert "A" eingetragen werden.
In Tabelle 1 sind auch diverse Adressdaten gepflegt. Alle Adressen in Tabelle 1 sind auch in Tabelle 2...
29.08.2008 10:37:00
Thread-ID: 1005722
3 Beiträge
Anzeige
Mittelwertberechn. mit var. Spaltenlänge
Falk

Hallo,
Zur Situation
in einer Excelspalte (z.B. A) füge ich - aus einem anderen Programm - kopierte Zahlen ein. Excel schreibt die, in Spalte A, eingefügten Zahlen untereinander. In der Spalte B berechne ich dann den Mittelwert wie folgt: =SUMME(A2:A1872)/1871
Mein Problem
Weil...
15.09.2008 11:21:00
Thread-ID: 1009725
5 Beiträge
Wert innerhalb Array suchen
David

Hallo VBAler,
wenn ich ein Array in der Form
treffer_n(n)
habe, gibt es da eine schnelle und einfache Möglichkeit zu prüfen, ob ein bestimmter Wert in diesem Array vorhanden ist, oder muss ich alle Werte per Schleife einzeln prüfen lassen?
Gruß
David
19.09.2008 08:48:14
Thread-ID: 1010894
3 Beiträge
Text verbinden und den Inhalt der Zelle ausgeben
Jörg

Hallo,
ich benötige etwas Hilfe, vermutlich für euch kein Problem:
in Zelle A1 möchte ich den Spaltenbuchstaben eintragen
in Zelle A2 möchte ich eine Zeilennummer eintragen
in Zelle A3 fehlt mir nun die Formel, mit der ich A1undA2 verbinden kann UND dann den Inhalt der Zelle aus...
19.09.2008 11:42:31
Thread-ID: 1010969
6 Beiträge
Spalte mit x = Wert möglich ?
Petra

Hallo
Ich möchte gerne wenn in Spalte B3 ein x eingetragen wird, das dann in Spalte B3 der Wert aus Spalte B1 eingetragen wird.
Ich weiß das es per Formel =Wenn(B3="x";B1;0) geht, aber dann müßten wir hier Behelfsspalten einbauen was nicht gewünscht wird.
Habe es per Bedingter Forma...
23.09.2008 15:34:17
Thread-ID: 1011775
21 Beiträge
In Textfile bestimmte Zeile suchen
Pascal

In einem Textfile soll nach einer bestimmten Zeile (immer der gleiche Text) gesucht werden.
Wird dieser Text gefunden, so soll alles vom Beginn weg des Textfiles bis und mit dieser Zeile (plus zusätzlich noch die nächste Zeile) gelöscht werden.
Geht das irgendwie ?
Wenn ja, wie ?
24.09.2008 16:14:00
Thread-ID: 1012111
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
8
5
4
2
4
4
2
5
20
7
3
10
3
1
4
6
6
12
11
2
3
6
4
5
4