Live-Forum - Die aktuellen Beiträge
Datum
Titel
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
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
320to324
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
320to324
320to324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten aus zwei Tabellen auswerten

Daten aus zwei Tabellen auswerten
13.10.2003 11:11:51
OJ
Moin,
habe folgendes Problem: Mir liegen zwei Tabellen A und B vor.
A und B enthalten jeweils eine Spalte mit identischen Kundennummern. Je Tabelle sind den Kundennummern aber verschiedene Werte zugeordnet.
In Tabelle A kann ich anhand von 0 und 1 einen Zustand des Kunden ablesen.
Mit Tabelle B liegt mir eine bestimmte Teilmenge der in A enthaltenen Kundennummern vor.
Wie kann ich mir Tabelle A so verkürzt anzeigen lassen, dass nur die Kundennummern aus Tabelle B erscheinen?
Besten Dank!

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

Betreff
Datum
Anwender
Anzeige
AW: Daten aus zwei Tabellen auswerten
13.10.2003 21:39:26
Beni
Hallo OJ,
ich nehme mal an, dass die Kundennummern in beiden Tabellen in SpalteA sind, andernfalls musst Du sie anpassen.
Wenn eine Kundennummer in TabelleB nicht vorhanden ist, wird in TabelleA, die Zeile ausgeblendet.
Gruss Beni


Sub Tabellenlergleichen()
Lzeile = Cells(Rows.Count, 1).End(xlUp).Row '1 = SpalteA
For i = 1 To Lzeile
Wert = Cells(i, 1).Value '1 = SpalteA
With Sheets(2).Columns(1) '1 = SpalteA
Set c = .Find(Wert, LookIn:=xlValues, LookAt:=xlWhole)
If c Is Nothing Then Cells(i, 1).EntireRow.Hidden = True
End With
Next i
End Sub




Sub Zeileneinblenden()
Lzeile = Cells(Rows.Count, 1).End(xlUp).Row '1 = SpalteA
Range("A1:A" & Lzeile).EntireRow.Hidden = False
End Sub

Anzeige
AW: Daten aus zwei Tabellen auswerten
14.10.2003 12:00:00
OJ
Hi Beni,
vielen Dank erst mal.
Nur läuft das irgendwie nicht, ich bin mir aber nicht sicher, ob ich alles richtig mache: Ich hab jetzt eine Arbeitsmappe mit den fraglichen Tabellen als Blätter. Spalte A enthält jeweils die Kundennummern. Dann hab ich den Code oben kopiert und im VB Editor gespeichert. Wenn ich jetzt das Teil unter Makros aufrufe und ausführe rödelt auch gleich was los. Aber: Die Tabellen sehen immer noch gleich aus, da wird nix ausgeblendet...
Fällt Dir da vielleicht noch was zu ein? Tausend Dank!
AW: Daten aus zwei Tabellen auswerten
14.10.2003 14:45:12
Beni
Hallo OJ,
ist in beiden Tabellen die Kundennummer in SpalteA und ist die TabelleB an zweiter Stelle.
Sheets(2) bedeutet, die zweite Tabelle von links. Das benutzt man, wenn der Tabellenname nicht bekannt ist.
Gruss Beni
Anzeige
AW: Daten aus zwei Tabellen auswerten
14.10.2003 14:53:21
OJ
Hi Beni,
sehr nett, dass Du Dir die Mühe machst, weiß das zu schätzen...
Also eigentlich schaut alles so aus. Nur um sicher zu gehen:
1.) Nach Abspeichern des VB-Codes erhalte ich unter den Makros zwei neue - Tabelle vergleichen und Zellen ausblenden.
2.) Ich führe nacheinander diese Makros aus.
3.) Im Ergebnis sollte Tabelle A um einige ausgeblendete Spalten ärmer sein, richtig?
Wenn Du noch Nerven haben solltest, führe ich den Thread hier gern weiter... ;-)
AW: Daten aus zwei Tabellen auswerten
15.10.2003 08:10:38
Beni
Hallo OJ,
wie Du schreibst, "erhalte ich unter den Makros zwei neue - Tabelle" das verstehe ich nicht was Du damit meinst.
Kannst Du mir ein Beispiel reinstellen.
Gruss Beni
Anzeige
AW: Daten aus zwei Tabellen auswerten
15.10.2003 10:44:46
OJ
Moin!
Also ich meinte mit 1.) eigentlich nur, dass die Makros nach Abspeichern im VB-Editor auch wirklich vorliegen (Userbild
).
Ich bin halt VB-Newbie. Versteh ich das denn richtig, dass ich bei geöffneter xls die beiden Makros ausführe und dann mein Ergebnis bekomme (siehe 3.) im letzten posting).
Nochmals vielen Dank!
AW: Daten aus zwei Tabellen auswerten
15.10.2003 11:30:28
Beni
Hallo OJ,
ja, das ist richtig, aber wie ich in deinem Beispiel sehe, hast Du zwei Workbooks offen und Du befindest dich im Falschen, immer wenn wie im Beispiel kal_de_kunde.xls!Diese.... der Dateiname davor steht, gehört das Makro zu anderen offenen Workbooks.
Ich habe ein kleines Beispiel angehängt.
Gruss Beni

https://www.herber.de/bbs/user/1429.xls
Anzeige
AW: Daten aus zwei Tabellen auswerten
15.10.2003 11:51:18
OJ
VIELEN DANK! Nun klappt's...
Hast mir echt weitergeholfen!

308 Forumthreads zu ähnlichen Themen

Inhalt aus mehreren Tabellen einfügen
Fred

Hallo zusammen.
Ich bin seit längerem schon auf der suche nach einem Makro und kann aber ein ähnliches wie ich es bräuchte nicht. Finde.
Es geht darum, das ich wenn ich auf einen Button klicke möchte ,das das Makro mehrere Von mir benannte Ordner duch sucht nach fest vorgeschriebenen X...
21.08.2008 18:04:19
Thread-ID: 1003605
2 Beiträge
Anzeige
Aus zwei Tabellen eine Machen
SebastianSchelb

Hallo ich brauche euere Hilfe. Aleine schaffe ich es einfach nicht.
Ich habe eine zwei Tabelle mit Wörtern die zusammengefasst werden soll in eine Tabelle, in welcher aber kein Wort doppelt sein soll. Die anzahl der Wörter der 1. und 2. Tabelle vareieren von Tag zu Tag
Tabelle 1 (in der...
06.10.2008 14:52:00
Thread-ID: 1014455
5 Beiträge
mehrere Tabellenblätter in ein PDF drucken
Christian

Hallo zusammen,
nachdem ich im Forum keine Info zu meinem Thema gefunden habe:
Ich möchte mehrere Tabellenblätter einer Datei als PDF ausdrucken. Also markiere ich die Tabellenblätter und gehe wie gewohnt ins Menü "Drucken" (PDF über Acrobat 7.0 oder PDF XChange 4.0 Lite).
Leider we...
10.10.2008 09:11:00
Thread-ID: 1015503
2 Beiträge
Anzeige
3D Diagramm erstellen aus Matrix
Kay

Hallo,
Ich habe in Excel eine Matrix, die folgendermaßen aufgeteilt ist
A B C D
15 12% 10% 15% 20%
30 10% 13% 17% 19%
45 8% 12% 15% 17%
Wie bekomme ich es nun hin, dass mir auf der Größenachse alle %-Werte, auf der Rubrikenachse die Zeile...
29.10.2008 21:38:38
Thread-ID: 1020422
7 Beiträge
Optimale Spaltenbreite per makro auf anderem Blatt
Macro

Hi,
Ich möchte von einem Tabellenblatt aus per Button die "optimale Spaltenbreite" auf einem anderen Blatt einstellen.
Kann ich das machen, ohne dass mein Tabellenblatt, von dem ich aus starte, den Focus verliert, bzw, dass ich das zweite Tabellenblatt (wo die Einstellung statt finden...
10.12.2008 13:37:50
Thread-ID: 1031680
4 Beiträge
Pivot Tabelle in Array auslesen & neu erstellen
Andreas

Hallo Herber Fans,
da PivotTabellen sich nicht immer rational verhalten, ist es zuweilen notwendig, diese zu löschen und komplett neu aufzubauen, damit sie wieder fehlerlos sind und andere VBA Codes die mit ihnen arbeiten, nicht zum Absturz bringen.
Was ich nun realisierte, war ein Code...
12.02.2009 19:20:00
Thread-ID: 1050227
4 Beiträge
Diagramm als Tacho mit 3 Linien
SteffenS

Hallo Zusammen,
ich habe im Netz ein Beispiel für ein Tachodiagramm gefunden.
Dieses funktioniert auch super.
Ich benötige aber statt zwei 3 Zeiger.
Wie mache ich dies?
Hier die Datei: https://www.herber.de/bbs/user/61277.xls
Danke im Voraus.
MFG
Steffen Schmerl...
18.04.2009 14:20:13
Thread-ID: 1069491
4 Beiträge
Texte aus anderem Tabellenblatt kopieren
Stefan

Hallo zusammen,
in einer Tabelle habe ich mir im Tabellenblatt 'Umwandeln' für verschiedene Textmanipulationen Formeln eingerichtet. Die Texte, die verändert werden sollen (Artikelbezeichungen) bekomme ich in Form einer Exceltabelle und ich ziehe mir das Tabellenblatt 'Artikel' als neues Ta...
22.04.2009 23:35:00
Thread-ID: 1070529
3 Beiträge

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
2
4
1
4
6
3
3
3
2
5
1
13
5
4
6
2
2
3
3
2
2
3
6
1