Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
964to968
964to968
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bestimmte Zeilen markieren

Forumthread: Bestimmte Zeilen markieren

Bestimmte Zeilen markieren
02.04.2008 17:40:18
Maikl
Hallo zusammen,
ich möchte aus einer Excel Tabelle mit ca 30.000 Zeilen die jeweils 15. markieren
um sie in eine andere Tabelle zu kopieren.
Manuell ist das kaum machbar.
Mit Makros kenne ich mich leider nicht wirklich aus.
Kann mir jemand helfen?
Danke schon jetzt
Michael

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bestimmte Zeilen markieren
02.04.2008 18:04:00
Sven
Hi,
ich vermute, du willst die per Makro kopieren?
Falls ja, ist markieren dazu nicht nötig.
Beispielmappe wäre hilfreich wegen der Struktur.
mfg Sven

AW: Jede 15. Zeile kopieren
02.04.2008 18:10:00
Erich
Hallo Michael,
probier es mal mit diesem Makro (gehört in ein normales Modul): 

Option Explicit
Sub Kopie15()
Dim lngZ As Long, rngK As Range
Set rngK = Rows(15)
For lngZ = 2 To Cells(Rows.Count, 1).End(xlUp).Row \ 15
Set rngK = Union(rngK, Rows(15 * lngZ))
Next lngZ
Worksheets.Add
rngK.Copy Cells(1, 1)
End Sub

Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Jede 15. Zeile kopieren
02.04.2008 19:31:00
Michael
Leider hab ich noch nie mit Makros gearbeitet.
Ich habe es aber eingetragen bekommen.
Beim ausführen bekomme ich die Meldung
"Fehler beim Kompilieren"
"End Sub erwartet"
Was immer das auch heissen mag.
Ich hab das ganze eins zu eins kopiert
Michael

AW: Jede 15. Zeile kopieren
02.04.2008 21:11:00
Erich
Hallo Michael,
die Fehlermeldung sagt mir, dass die letzte Zeile 

End Sub

wohl fehlt.
Versuch mal, das unter die letzte Zeile des Makros zu schreiben.
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Jede 15. Zeile kopieren
02.04.2008 21:23:04
Michael
end sub steht dort.
excel markert bei der fehlermeldung
sub liste () gelb an mit einem gelben Pfeil davor.
Wenn das was zu bedeuten hat.

AW: Jede 15. Zeile kopieren
02.04.2008 21:28:59
Michael
end sub steht dort.
excel markert bei der fehlermeldung
sub liste () gelb an mit einem gelben Pfeil davor.
Wenn das was zu bedeuten hat.

Anzeige
AW: Jede 15. Zeile kopieren
02.04.2008 21:48:59
Erich
Hallo Michael,
hast du "Kopie15" durch "liste" ersetzt? Oder wo steht sonst das Wort "liste"?
Vergleich doch noch mal Zeile für Zeile den Inhalt deinen Moduls mit dem Code, den ich gepostet habe.
Hier eine Mappe zum Vergleich: https://www.herber.de/bbs/user/51218.xls
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Jede 15. Zeile kopieren
03.04.2008 06:34:00
Michael
Hallo Erich,
jetzt hat es geklappt.
Was muss ich ändern wenn ich nicht kopieren sondern ausschneiden möchte?
Vielen Dank
Michael

AW: Jede 15. Zeile kopieren
03.04.2008 07:56:13
Erich
Hallo Michael,
schän, dass es jetzt läuft! Woran lag es denn?
Zum Ausschneiden schreibst du unter
rngK.Copy Cells(1, 1)
in eine neue Zeile
rngK.Delete
(über dem "End sub")
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Anzeige
AW: Jede 15. Zeile kopieren
03.04.2008 08:41:42
Michael
Hallo Erich,
es hat super geklappt. Vielen Dank.
Du hat mir eine Menge arbeit erspart.
Mein Nachtgebet ist Dir sicher.
Gruß
Michael

Forumthreads zu verwandten Themen

makro markierung von Zeilen nach oben und unten
Zeilen

Hallo liebe Excel-Gemeinde,
ich weiss dass es schon viele Beiträge zum Thema "Löschen von Zeilen nach einer Bedingung" gibt, aber ich habe nach langer Suche keine Lösung bzw. Ansatzpunkt gefunden.
Problembeschreibung:
Ich brauche ein Makro, dass in der Spalte 2 nach 2 verschiedenen...
12.09.2008 08:37:02
Thread-ID: 1009273
3 Beiträge
Bestimmte Anzahl an Zeilen per VBA Ausblenden
Sascha

einen schönen guten tag allen...
wie kann man definierte Zeilen per VBA ausblenden?
ich habe eine Tabelle die folgend ausschaut:
Grün
1
2
3
4
5
6
Rot
1
2
3
4
5
6
Jetzt trage ich in zwei Zellen die Anzahl von Grün und Rot ein, z...
30.12.2010 12:33:34
Thread-ID: 1193330
6 Beiträge
Anzeige
markierte Zeilen anzeigen
Antje

Hallo Profi's,ich bräuchte mal eine kleine Hilfestellung!
Wie kann ich mir nur die in einer bestimmten Schriftfarbe markierten Zeilen anzeigen lassen?Danke1Gruß
Antje
14.05.2002 14:49:24
Thread-ID: 120771
4 Beiträge
Anzahl markierte Zeilen
Uppe

Hallo,
ich möchte per VBA auslesen, wieviele Zeilen markiert sind.
Mit Selection.Rows.Count kann ich nur die Anzahl Zeilen auslesen, wenn die Zeilen zusammenhängend sind.
Wie kann ich die Anzahl markierter Zeilen feststellen, wenn ich z.B. Zeile 1, 3 und 7 markiere?
Danke und Gr...
14.07.2011 11:31:23
Thread-ID: 1222100
3 Beiträge
Aus Excel unbestimmte anzahl an Zeilen in Word
Detege

Liebes Community,
mit hilfe des Forums habe ich es geschafft durch Textmarken mittels VBA zeilen aus Excel in Word einzufügen. Ich schaffe es jedoch nicht es nach meinen bedürfnissen anzupassen.
Mein Code sieht zur Zeit so aus :
Sub Copywordtoexcel() Dim strData As String Dim obj...
11.02.2012 12:17:43
Thread-ID: 1249866
2 Beiträge
Bestimmte Anzahl von Zeilen in Spalten
Zeilen

Hallo Zusammen,
ich steht vor einen mehr oder minder großen Problem und hoffe inständig, dass mir ein freundliches Mitglied dieses Forums weiterhelfen kann. Folgendes Problem:
Ich habe eine Liste, bei der immer 5 Zeilen zusammengehören und deshalb eigentlich in Spalten stehen sollten. E...
24.06.2013 18:06:57
Thread-ID: 1319409
4 Beiträge
VBA Summenformel bis zu bestimmter Zeile
Giesarazu

Hallo Leute,
ich möchte per VBA eine Summenformel in der letzten Zeile der Spalte B einfügen, was ich auch hin bekomme. Das einzige Problem ist, dass diese Formel alle Werte der vor ihr stehenden Zeilen addieren soll BIS zu der Zeile mit dem Namen "Summe Primärkosten" (der in Spalte A steht...
10.12.2013 10:40:02
Thread-ID: 1341975
5 Beiträge
bestimmte Anzahl an Zeilen kopieren und einfügen
Hans

Hallo zusammen,
habe ein Excel-Sheet mit ca. 1.800 Zeilen und 32 Spalten.
Nun möchte ich, dass ein Makro die Daten aus Zeile H6:H37 kopiert und in G38:G69 einfügt. Anschließend soll Zeile I6:I37 kopiert werden und in Zeile G70:G81 kopiert werden, usw. bis zur letzten Spalte.
Kann mi...
17.09.2014 10:35:19
Thread-ID: 1382027
2 Beiträge
Zeilen per Makro nach unten kopieren
Felix

Meine Ausgangstabelle ist der Bereich von A bis D. Ich möchte eine Tabelle rechts davon in G bis J erstellen, die dieselben Zeilen enthält. Zusätzlich sollen aber die Zeilen aus der Tabelle links entsprechend der Anzahl in Spalte D kopiert werden.
In der Spalte Copy gebe ich also an, wie o...
08.04.2015 21:24:43
Thread-ID: 1419764
8 Beiträge
Bestimmte Anzahl an Zeilen und Spalten einblenden
Esther

Hallo zusammen,
ich bin neu hier! Habe schon oft Hilfe in diesem Forum gesucht, jetzt shreib ich mal selber was ;)
Und zwar:
Auf Tabellenblatt A gibt es in E40 ein Dropdown mit Ziffern von 0 - 16.
In den Spalten K40 bis Z40 sind weitere Dropdownfelder enthalten (Daten werden aus...
10.08.2015 16:31:13
Thread-ID: 1441510
2 Beiträge
variable Anzahl an Zeilen markieren
Stefan

Hallo zusammen,wer kann mir bei folgendem Problem helfen:
Ich lasse die Daten einer Tabelle nach einer Spalte "G" absteigend sortieren und den Rechner mit einem Makro in die Zelle der Spalte G springen, in der zum ersten Mal der Wert 0 eingetragen ist. Danach möchte ich alle Zeilen, die daru...
05.08.2002 16:28:26
Thread-ID: 144988
2 Beiträge
Anzeige
Bestimmte Zeilen für Berechnung auswählen
Markus

Hallo Miteinander
Gerne wende ich mich mit meinem Anliegen an dieses Forum. Die Tabelle seht ihr hier: https://www.herber.de/bbs/user/100765.xlsx
Ich kopiere jeweils monatlich Daten in das Tabellenblatt "Rohdaten Monat". Spalte A+B resp C+D gehören als Zeitkombination zusammen (Datum u...
14.10.2015 08:43:10
Thread-ID: 1452188
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige