Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2024 19:53:16
Spaltenbreite automatisch über Zellinhalt einstellen
14.05.2024 19:26:13
neue Monatsdaten mit Pivot-Tabelle auswerten
14.05.2024 17:36:21
Überprüfung des Datenformates der Zwischenablage
14.05.2024 15:50:45
Megensum pro Lieferant aufgrund Datum An- und Auslieferung
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1540to1544
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
1540to1544
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zeilen vergleichen

Zeilen vergleichen
23.02.2017 11:39:41
Navdeep
Liebe VBA Excel Profis,
mein Anliegen diesmal wäre folgender:
Ich muss zwei Sheets miteinander vergleichen:
das Problem ist die Nummern sind nicht ident:
in einem Sheet steht z.B: 436648845482 und in dem anderen: 6648845482
Das geht dann 3000 mal. Nur 3000 mal möchte ich diese 43 nicht manuel entfernen.
Gibt es da vielleicht eine Lösung und wie man die miteinander vergleich kann(Sverweis?) ?
Ich bin für jede Hilfe sehr sehr dankbar :)
LG Navi

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen vergleichen
23.02.2017 11:51:46
UweD
Hallo
so?
Sub Telefon()
    Dim Ze As Integer, SP As Integer, LR As Integer, i As Integer
    SP = 1 'Spalte A 
    Ze = 2 ' wegen Überschrift 
    With Sheets("Tabelle1")
        LR = .Cells(.Rows.Count, SP).End(xlUp).Row 'letzte Zeile der Spalte 
        For i = Ze To LR
            If Left(.Cells(i, SP), 2) = "43" Then
                .Cells(i, SP) = Mid(.Cells(i, SP), 3)
            End If
        Next
    End With
End Sub

LG UweD
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige