Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 12:38:40
Formeländerung durch Wechsel von Excel 2021 auf 2019
24.04.2024 12:31:18
Excel - Sverweis mit Wenn-Abfrage kombinieren
24.04.2024 12:16:26
Name von aktuellem VBA-Modul ausgeben
24.04.2024 12:07:15
Werte einer Liste vergleichen und markieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1300to1304
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
1300to1304
1300to1304
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

bestimmte Zeilen aus Tabellen zusammenführen

bestimmte Zeilen aus Tabellen zusammenführen
08.03.2013 08:55:55
Stefan
Hallo, ich habe eine Datei mit 12 Tabellen (bezeichnet 01,02,03... 12). In jeder Tabelle finden sich die monatlichen Datensätze zu Aufträgen. Dort findet sich in der Spalte P jweils das Kürzel für das Lieferland eines Auftrages. Ich benötige nun in Tabelle 13 alle Auftragszeilen (komplett), die in P das Kürzel "UK" haben, angefangen in Tabelle "01".
Wie kann ich das denn am besten umsetzen?
Danke vorweg für die Hilfe und Grüße
Stefan

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: bestimmte Zeilen aus Tabellen zusammenführen
08.03.2013 09:26:36
Daniel
Hi
mit folgendem Code im Modul des Zusammenfassungsblattes 
Private Sub Worksheet_Activate()
Dim i As Long
Me.UsedRange.Offset(1, 0).Clear 'alles löschen außer Überschrift
Application.ScreenUpdating = False
For i = 1 To 4
With Sheets(Format(i, "00")).Columns(16)
.Replace "UK", True
If WorksheetFunction.CountIf(.Cells, True) > 0 Then
With .SpecialCells(xlCellTypeConstants, 4)
.Value = "UK"
.EntireRow.Copy Me.Cells(Me.Rows.Count, 1).End(xlUp).Offset(1, 0)
End With
End If
End With
Next
End Sub

folgende Bedingungen müssen erfüllt sein:
- das UK muss als fester Wert in Spalte P stehen, keine Formel
- die Spalte A sollte keine Leerzellen enthalten, über sie wird beim Einfügen die nächste freie Zeile ermittelt
- in der Ersten Zeile des Zusammenfassungsblattes solltest du die Überschriften eintragen.
Gruß Daniel

Anzeige
AW: bestimmte Zeilen aus Tabellen zusammenführen
08.03.2013 09:27:46
Daniel
und in der For-Schleife musst du aus der 4 eine 12 machen, war nur zu Faul, um 12 Tabellenblätter zum Testen zu erstellen.
gruß Daniel

AW: bestimmte Zeilen aus Tabellen zusammenführen
08.03.2013 09:50:01
Stefan
Hi Daniel, erst einmal Danke an dieser Stelle. Steh aber grad auf dem Schlauch. Bisher kopierte ich diese Scrips immer in ein leeres Makro. Sobald ich aber speichere, findet sich dieses nicht mehr im Drop Down. Erst wenn ich das Private vor Sub raus nehme, dann sehe ich das Makro, aber es tut dann nicht. Motzt wegen des Me. aus Zeile drei rum.
Was mache ich denn falsch?
Grüße

AW: bestimmte Zeilen aus Tabellen zusammenführen
08.03.2013 09:54:34
Daniel
Hi
normalerweise sollte dieser Code automatisch ausgeführt werden, wenn du auf das entsprechende Blatt wechselest (natürlich nur, wenn du den Code mit unveränderter Kopfzeile ins Modul des Tabellenblatts kopiert hast und nicht in ein allgemeines Modul)
in der Auswahlliste der Makros werden nur Makros angezeigt, die in einem allgemeinen Modul stehen, Public sind und keine Parameter enthalten.
das liegt daran, daß Private-Makros nur durch das entsprechende Event oder von einem Makro im gleichen Modul aufgerufen werden können (das ist die bedeutung von Private).
Markos mit Parametern erscheinen ebenso nicht, weil du ja auf diese Weise keine Parameter übergeben kannst.
Gruß Daniel

Anzeige
AW: bestimmte Zeilen aus Tabellen zusammenführen
08.03.2013 10:06:24
Stefan
Hmm, dann mal ganz doof gefragt... wo trage ich das denn dann ein? " ins Modul des Tabellenblatts kopiert hast"
Also, wo finde ich das Modul?
Grüße und Dnake!

wo finde ich das Modul?
08.03.2013 10:11:48
Rudi
Hallo,
im Projektexplorer Doppelklick auf die Tabelle.
Gruß
Rudi

AW: wo finde ich das Modul?
08.03.2013 10:34:18
Daniel
oder direkt aus der Exceltabelle, wenn du mit der Rechten Maustaste auf den Tabellenblattreiter klickst und dann "Code anzeigen" auswählst.
Gruß Daniel

AW: wo finde ich das Modul?
08.03.2013 11:02:42
Stefan
Gecheckt. Daaanke!

300 Forumthreads zu ähnlichen Themen

Nur bestimmten Zellbereich kopieren u. exportieren
Bernd

Hallo Freaks,
ich habe diesen Code für das Exportieren bestimmter Tabellenblätter aus dem Forum-Archiv.
Wer wäre bitte so nett und würde den Code dahingehend anpassen, dass nur die Zellen A1:P36 des Sheets "Export" kopiert werden?
Wenn es nicht zu unverschämt ist, wäre ich an nachs...
17.03.2009 16:11:25
Thread-ID: 1061150
2 Beiträge
Anzeige
Formel komplett aus anderem Blatt übernehmen
martin

Hallo.
In verschiedenen Arbeitsbättern befinden sich exakt die selben Rechnungen, jeweils mit unterschiedlichen Werten.
In einem Master-Blatt möchte ich gerne die Zeilen und Spaltenbeschriftungen, sowie die zu verwenden formeln definieren.
Könnt Ihr mir Tipps geben, wo ich dazu was...
18.06.2009 14:56:18
Thread-ID: 1082618
2 Beiträge
Zeilen in anderes Arbeitsblatt kopieren
Alex

Hallo @ all
ich habe folgendes Problem:
Tabelle 1 enthält eine Vielzahl von Daten. Diese will ich nun filtern und die jeweilige Zeile, die in N "TGA" enthält in Tabelle 2 kopieren.
Ich weiß, dass das Ganze mit wenn(summe... funktioniert, aber vermute, man muss hier feste Zahlen ange...
06.07.2009 11:29:58
Thread-ID: 1086570
7 Beiträge
Anzeige
Kopieren in andere Tabelle
liese

Hallo Forumfreunde!
Bitte um Hilfe zu folgendem Problem:
Bei Doppelklick im Bereich H10:H15 in Tabelle1 (z.B. H7) soll der Zellinhalt nach Tabelle2
in Zelle D5 kopiert werden und der Inhalt zwei Zellen neben dem Doppelklick (J7)
ebenfalls nach Tabelle2 in K10 kopiert werden.
...
19.08.2009 13:20:01
Thread-ID: 1097094
10 Beiträge
Combobox soll nur bestimmte Zeilen zeigen
Jörg-HH

Guten Abend zusammen
habe in einem Thread mit Franz neulich viel über Listboxen gelernt und wollte das nun auf ein ähnliches Problem mit einer Combobox übertragen - aber da hapert es noch etwas ;-)) Ich hab versucht, einiges von dem Code, den Franz mir gesendet hat, zu verwenden
In dies...
23.09.2009 20:23:50
Thread-ID: 1105056
30 Beiträge
Nur bis zu einem Bestimmten Zeichen kopieren
Excellent

Hallo,
ich habe z.B. in einer Zelle in Excel diesen Dateipfad stehen: C:\Ordner1\UnterordnerXY\Ordner0815
Nun möchte ich, wenn ich auf einen Button drücke nur noch folgendes in der Zelle stehen haben:
C:\Ordner1\UnterordnerXY\
Es könnte auch sein, dass der Pfad lediglich so auss...
24.09.2009 11:29:13
Thread-ID: 1105207
8 Beiträge
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
variables kopieren in ein anderes Tabellenblatt | Herbers Excel-Forum
Space
Hallo Community
Ich suche einen VBA Code um folgendes Problem mittels Button zu lösen:
ich würde gerne aus einem Tabellenblatt "Tabelle1" von Zeile 14 bis Spalte Q bis zum letzen vorhandenen Eintrag alles koperen und das ganze in das Tabellenblatt "Tabelle2" einfügen. In "Tabelle2" soll es...
15.01.2010 12:12:20
Thread-ID: 1130211
5 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
1
4
1
6
1
9
29
7
6
4
2
7
2
6
8
9
4
3
5
8
2
2
1
2
4