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

Listen vergleichen-fehlende Werte einfügen

Forumthread: Listen vergleichen-fehlende Werte einfügen

Listen vergleichen-fehlende Werte einfügen
06.11.2007 18:15:01
anja
Hallo Profis,
ich habe eine Frage:
wie kann man zwei Listen per VBA vergleichen und
die Werte die in einer Liste nicht verfügbar sind
in diese Liste einfügen.
Die Erklärung ist in der Datei "Test.xls" deutlicher beschrieben.
https://www.herber.de/bbs/user/47468.xls
Ich freue mich über jeden Tipp.
Danke und viele Grüße
Anja

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Listen vergleichen-fehlende Werte einfügen
07.11.2007 00:27:06
Daniel
Hi
zum Beispiel mit diesem Makro:

Sub Fehlende_Zeilen_ergänzen()
Dim shNew As Worksheet
Dim shData As Worksheet
Dim Anzahl As Integer
Set shNew = Sheets("new")
Set shData = Sheets("data")
'--- Id ergänzen
With Range(shNew.Cells(5, 3), shNew.Cells(4, 2).End(xlDown).Offset(, 1))
.FormulaR1C1 = "=rC[-2]&"" ""&RC[-1]"
End With
'--- Fehlende Werte suchen
With Range(shData.Cells(3, 5), shData.Cells(2, 1).End(xlDown).Offset(, 4))
.FormulaR1C1 = "=COUNTIF(new!C3,RC[-2])"
Anzahl = WorksheetFunction.CountIf(.Cells, 0)
End With
'--- Abfrage
Select Case MsgBox(Anzahl & " logische Systemen wurden in der Liste nicht gefunden!" _
& Chr(10) & "Möchten Sie die Liste mit neuen Daten ergänzen?", vbYesNo)
Case vbYes
'--- fehlende Werte einfügen
With shData.Cells(2, 1)
.AutoFilter field:=5, Criteria1:="=0"
Range(.Offset(1, 0), .End(xlDown)).Resize(, 2).SpecialCells(xlCellTypeVisible) _
.Copy Destination:=shNew.Cells(4, 1).End(xlDown).Offset(1, 0)
.AutoFilter
End With
Case Else
End Select
'--- Spuren löschen
shData.Columns(5).Clear
shNew.Columns(3).Clear
End Sub


Gruß, Daniel

Anzeige
AW: Listen vergleichen-fehlende Werte einfügen
08.11.2007 09:50:52
anja
SUPER!
Danke!
:)

Forumthreads zu verwandten Themen

Gleiche Zeilen zählen und Werte zusammenzählen
asz

Hallo,
ich habe ein Problem: Ich habe eine Liste wie die folgende:
https://www.herber.de/bbs/user/62689.xls
Es handelt sich jeweils um mehrere Exemplare desselben Buches/Titels. In Spalte I stehen die Ausleihzahlen der einzelnen Exemplare. Ich würde nun gern in einem neuen Blatt au...
23.06.2009 16:26:09
Thread-ID: 1083867
2 Beiträge
Anzeige
Gleiche Zeilen zählen und Werte zusammenzählen
asz

Hallo,
ich habe ein Problem: Ich habe eine Liste wie die folgende:
https://www.herber.de/bbs/user/62689.xls
Es handelt sich jeweils um mehrere Exemplare desselben Buches/Titels. In Spalte I stehen die Ausleihzahlen der einzelnen Exemplare. Ich würde nun gern in einem neuen Blatt au...
23.06.2009 16:19:45
Thread-ID: 1083868
5 Beiträge
gleiche Zahlen zusammenfassen
Karl

Guten Tag!Ich finde aus meinem Problem kein Ausweg. Vielleicht kann mir jemand helfen.Wie fasse ich Zahlen, die mit der gleichen Ziffer beginnen in einer extra Tabelle zusammen.
24.04.2002 16:26:05
Thread-ID: 116008
3 Beiträge
Beschriftung Liniendiagramm gleiche Werte
Suzette

Hallo Ihr Lieben,
vor einiger Zeit hat mir folgender Code super geholfen:
Sub Beschriftung() Dim chrDiagramm As Chart Dim arrWerte1 Dim arrWerte2 Dim intPunkt As Integer Set chrDiagramm = Worksheets("Kosten").ChartObjects(1).Chart With chrDiagramm arrWerte1 = .SeriesCollection("2009").V...
28.08.2010 09:11:00
Thread-ID: 1174557
2 Beiträge
2 Tabellen vergleichen,bei unter. Werte farblich
Sven

Hallo,ich habe ein, für mich, großes Problem.
Ich habe 2 Tabellen auf unterschiedlichen WorkSheets.
Jetzt wird die erste Tabelle nach einem Primärschlüssel
mit der zweiten verglichen und falls der Primärschlüssel identisch ist, wird der ganze Datensatz ersetzt.
Jetzt meine Frage: Is...
24.05.2002 07:59:32
Thread-ID: 123294
4 Beiträge
Anzeige
Doppelte Werte zusammen addieren
Pascal

Hallo liebes Forum,
ich hab mal eine Frage. Ich hab eine Datei. Im ersten Tabellenblatt " Zeitprotokoll" befinden sich in der Spalte E Innenauftragsnummern, diese Innenauftragsnummern können auch mehrfach vorkommen.
In der Spalte K befinden sich die dazu gehörigen Zeiten. Jetzt würde...
08.06.2011 12:50:32
Thread-ID: 1217728
2 Beiträge
Werte vergleichen aus verschiedenen Tabellen
Kai

Hallo zusammen,
in Tabelle 1 habe ich unter Spalte E verschiedene Zahlen stehen. In Tabelle 2 habe ich unter Spalte B auch verschiedenen Zahlen stehen. Jetzt möchte ich wissen, welche Zahlen von Tabelle 2 Spalte B auch in Tabelle 1 Spalte E vorkommen. Am besten wäre es, wenn Excel mir bei d...
24.08.2011 08:29:33
Thread-ID: 1227344
3 Beiträge
Tabelle mit gleichen Werten farblich formatieren!
Bobby

Hallo zusammen,
habe folgendes Problem:
Möchte eine Tabelle mittels einer VBA-Prozedur zweifarbig abgrenzen(Grau/Weiss), sodass gleiche Inhalte in Spalte "A", die immer untereinander stehen über die gesamte Zeile farbig von den nächsten anderen Werten abgegrenzen. Die Anzahl der Spalten i...
05.06.2002 18:36:40
Thread-ID: 126266
4 Beiträge
In Spallte zählen und gleiche werte auto. Farbe
Steve

Hallo Forum,
Ich habe wieder eine frage.
Wie kann ich die gleichen einträge (text) in spalte "A" zählen und im nächsten blatt den text mit der summe wiedergeben (A1:A), und auch die gleichen einträge mit einer hintergrundfarbe einfärben? Die hintergrundfarbe könnte man automatisch zuwei...
02.03.2012 19:44:40
Thread-ID: 1253267
2 Beiträge
Anzeige
Gleiche Zahlen zusammenfassen in VBA
Thomas

Hallo liebe Experten!
Ich stehe mal wieder auf dem Schlauch.
Ich habe eine Liste mit Nummern zwischen 1000 und 2000. Zu jeder Nummer gehört eine Mengenangabe.
Die Liste sieht dann z.B. so aus:
A - B
1234 - 4
3241 - 6
5422 - 2
1234- 7
In spalte A die...
05.07.2012 15:38:58
Thread-ID: 1270051
7 Beiträge
Gleiche Zeilen addieren
Steffen

Hallo zusammen,
brauch etwas Hilfe:
Ich möchte innerhalb einer Tabelle jede Zeile auf doppelte Werte prüfen:
Wenn in Zeile 1 Spalten A-D = Zeile 2 Spalten A-D; dann sollen die Werte in Spalte E addiert werden und eine Linie gelöscht werden usw.
26.09.2013 14:30:10
Thread-ID: 1332310
2 Beiträge
Diagramme vergleichen und Werte zurückgeben....
Mesel

Hallo zusammen,
ich habe ine Frage zu Diagrammen, leider habe ich über google nichts gescheites gefunden oder nicht das richtige Stichwort hierzu.
Bei der angehängten Datei habe ich 2 Diagramme:
"Values" entspr. Simulations- bzw. Messwerte, die ich importiere (können unendlich viele...
14.08.2014 13:45:03
Thread-ID: 1376463
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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