Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
960to964
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
960to964
960to964
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 Spalten vergleichen per VBA

2 Spalten vergleichen per VBA
25.03.2008 13:11:51
Nina
Hallo!
Ich hoffe, jemand kann mir bei folgendem Problem helfen. Meine Tabelle hat folgende Spalten:
  • PERNR NAME ZEIT1 ZEIT2
  • 12345 Schmidt 0,5 0,0
  • 12345 Schmidt 0,0 4,0
    mit ca. 50 Zeilen. Ich möchte zunächst mit einem Makro die Spalten "NAME" und "ZEIT1" vergleichen. Immer wenn in Spalte "NAME" der Begriff Schmidt auftaucht und in Spalte "ZEIT1" ein Wert größer 0 steht, soll dieser Wert aus Spalte "Zeit1" in Spalte "Zeit2" übertragen werden.
    Ich habe schon die SVERWEIS-Funktion benutzt, diese erweist sich aber als ineffizient, weil ich eine zusätzliche Spalte für die Ausgabe benötige.
    Im Voraus vielen Dank!
    Nina

    • 4
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: 2 Spalten vergleichen per VBA
    25.03.2008 13:25:26
    Tino
    Hallo,
    meinst du so?
    
Sub Test()
Dim a As Integer
Dim Name As String
Name = "Schmidt"
Do
With Cells(2 + a, 2)
If .Offset(0, 1) > 0 And Cells(2 + a, 2) = Name Then
.Offset(0, 2) = .Offset(0, 1)
End If
a = a + 1
End With
Loop While Cells(2 + a, 2) > ""
End Sub


    Gruß
    Tino

    AW: 2 Spalten vergleichen per VBA
    25.03.2008 13:50:00
    Nina
    Das funktioniert nicht, was natürlich auch an meiner Unfähigkeit liegen kann.
    Ich meine einen Code in der Art:
    if Spalte A = "12345" and if Spalte B = "Schmidt" and if Wert Spalte C > 0 Then schreibe Wert aus Spalte C in D.
    Bitte entschuldige die zugegebenermaßen grausame Umschreibung
    Ich habe das Ganze noch mal als Datei angefügt:
    https://www.herber.de/bbs/user/50991.xls

    Anzeige
    AW: 2 Spalten vergleichen per VBA
    25.03.2008 14:00:24
    Tino
    Hallo,
    demnach müsste es damit gehen.
    
Sub Test()
Dim a As Integer
Dim Name As String, PERNR As String
Name = "Schmidt"
PERNR = "12345"
Do
With Cells(2 + a, 2)
If .Offset(0, 1) > 0 And _
.Offset(0, 0) = Name And _
.Offset(0, -1) = PERNR Then
.Offset(0, 2) = .Offset(0, 1)
End If
a = a + 1
End With
Loop While Cells(2 + a, 2) > ""
End Sub


    Gruß
    Tino

    AW: 2 Spalten vergleichen per VBA
    25.03.2008 14:04:30
    Nina
    VIELEN, VIELEN DANK! Funktioniert.

    301 Forumthreads zu ähnlichen Themen

    Zwei Werte Vergleichen....
    chrissey

    Hallo Leut,
    hätte ne easy Frage:
    Habe in Zelle A1 einen Wert, sagen wir mal "HANS", stehen und möchte nun eine Mtrix nach diesen Wert absuchen
    sagen wir mal die Zellen
    B10 bis B100 (gefüllt mit Namen: PETER; DIETER; ...... ; HANS; usw.)
    wie mach ich des? Vergleich gibt mir...
    10.10.2008 15:09:52
    Thread-ID: 1015606
    3 Beiträge
    Anzeige
    2 Zellen, gleicher Inhalt, egal welche ausgefüllt
    Peter

    Hallo zusammen,
    folgende Frage: ich habe eine Datei mit mehreren Tabellenblättern. Dabei kommen teilweise die gleichen Daten auf verschiedenen Tabellenblättern vor.
    Ich möchte die Daten nur einmal eingeben. Nun habe ich es so gelöst, dass man die Daten in die Zelle eingeben muss, die ma...
    20.11.2008 11:19:31
    Thread-ID: 1026347
    3 Beiträge
    Doppelte über zwei Spalten - vergleichen
    Wolfgang

    Hallo,
    in einer Mappe befinden sich zwei Tabellenblätter. Gibt es eine Chance, beide Tabellenblätter abzugleichen, ob Datensätze doppelt vorkommen? - Schwierigkeit dabei mag aber sein, dass für die Suche sowohl die Spalte D, als auch Spalte E zu Grunde zu legen wären. Nur also, wenn die Dat...
    09.01.2009 17:26:12
    Thread-ID: 1038283
    5 Beiträge
    Anzeige
    zum 2 ten werte vergleichen
    juergen

    Hallo
    Habe immer noch das Problem:
    mit https://www.herber.de/forum/messages/1056145.html
    konnte Ich das Problem doch nicht lösen.
    Also mein Prob. besteht darin das ich in einer Zeile ( Bspl. A1-J7 dürfen nur Unterschiedliche Werte haben damit die Tabelle weiter rechnet sonst...
    05.03.2009 11:43:14
    Thread-ID: 1056745
    9 Beiträge
    Spalten vergleichen und Nummern ausgeben ?
    Günther

    Hallo zusammen,
    kann mir bitte jemand hierbei helfen:
    in Spalte E geb ich Nummern ein, diese sollen mit denen aus Spalte AA verglichen werden.
    Bei Übereinstimmung soll die Nummer aus AB in L ausgegeben werden.
    E---- L--- AA-- AB
    15-- 2--- 10-- 1
    30-- 5--- 15-- 2
    1...
    12.03.2009 15:49:14
    Thread-ID: 1059522
    5 Beiträge
    Werte aus 2 Spalten vergleichen??
    stefan

    Hallo,
    ich habe in 2 Spalten Werte. Wie kann ich prüfen, ob die werte in der einen spalte enthalten sind. WEnn sie enthalten sind, soll in einer 3.spalte ein text ausgegeben werden.
    wie mach ich das am besten?
    danke euch?
    13.03.2009 16:57:19
    Thread-ID: 1059944
    4 Beiträge
    Daten vergleichen und übernehmen/zusammenführen
    pemoe

    Hallo,
    ich habe folgendes, für Excel-Profis sicher leicht zu lösendes Problem. Es geht um eine Auswertung von Laboruntersuchungen, in Datei 1 steht in Spalte A jeweils die Anzahl und in Spalte B die Bezeichnung für die Untersuchungen. In Datei 2 steht zusätzlich für jede Untersuchungsbezeic...
    14.05.2009 14:37:02
    Thread-ID: 1075170
    5 Beiträge
    Zwei Werte vergleichen
    Lutz

    Grüße Euch,
    ich habe eine Liefertabelle mit - gob gesagt - drei interessanten Spalten:
    In der ersten Spalte steht eine Materialnummer, in der zweiten das Datum der letzten Lieferung und in der dritten Spalte das Landeskürzel des Bestellers.
    Matno LiefDat Kürzel
    1234 1...
    14.09.2009 12:34:19
    Thread-ID: 1102587
    6 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
    2
    4
    2
    4
    3
    8
    4
    3
    4
    5
    10
    4
    12
    4
    11
    6
    1
    3
    5
    2
    3
    1
    5
    3
    4