suchen-ersetzen

Forumthread: suchen-ersetzen

suchen-ersetzen

15.06.2018 22:00:06

Guesa

Hallo Forum
Muss noch einmal Nerven. In anhängender Datei stehen in Spalte F und G Datum Einträge. Ich möchte erreichen, falls der Nachname im Standort geändert wird, dass aus dem jeweiligen Standortblatt die Datumseinträge in der Gesamtliste gesucht werden und der Nachname entsprechend in der Gesamtliste ersetzt wird. Oder falls das nicht gehen sollte, in der Gesamtliste die entsprechende Zeile Markiert wird damit ich händisch den Nachnamen ändern kann.
Hoffe auf Eure Hilfe und bedanke mich schon mal im Voraus
Gruß, Guesa
https://www.herber.de/bbs/user/122143.xlsx

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: suchen-ersetzen

15.06.2018 23:26:00

Barbaraa
AW: suchen-ersetzen

16.06.2018 10:18:02

Guesa
AW: suchen-ersetzen

22.06.2018 00:39:56

Barbaraa

AW: suchen-ersetzen

15.06.2018 23:26:00

Barbaraa

Kopiere in das Blatt-Modul "Düsseldorf" folgenden Code ein:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim i As Long
If Target.Column = 2 Then
With Worksheets("Gesamtliste")
For i = 4 To .Cells(.Rows.Count, 6).End(xlUp).Row
If .Cells(i, 6) = Cells(Target.Row, 6) Then
If .Cells(i, 7) = Cells(Target.Row, 7) Then
If .Cells(i, 2)  Cells(Target.Row, 2) Then
.Cells(i, 2) = Cells(Target.Row, 2)
End If
End If
End If
Next i
End With
End If
End Sub

Das Blatt-Modul "Düsseldorf" erreichst du durch Rechtsklick auf den Reiter "Düsseldorf" (ganz unten) und dann "Code anzeigen".
Kopiere dann auf selbe Weise diesen Code in das Blatt-Modul "Gladbach".
Wenn Du nun im Blatt "Düsseldorf" oder "Gladbach" einen Nachnamen änderst, wird er automatisch auch im Blatt "Gesamtliste" geändert, vorausgesetzt Geburtsdatum und Einstelldatum stimmen überein.
Die Datei selbst speicherst Du dann mit der Endung "xlsm". Danach wirst Du beim Schließen der Tabelle ohnehin gefragt.
Warum? Weil Deine Datei nun zwei Makros hat und die Endung "xlsx" keine Makros mitspeichert. Daher die Umbenennung auf "xlsm".
Ist es das, was Du wolltest?
LGB

AW: suchen-ersetzen

16.06.2018 10:18:02

Guesa

Hallo Barbara
Super, ja genau das sogar noch besser als ich es mir vorgestellt habe. Da das ganze ohne Eingaben in einer Suchmaske funktioniert.
Herzlichen Dank für Deine Mühe
Gruß, Guesa

AW: suchen-ersetzen

22.06.2018 00:39:56

Barbaraa

Bitte gerne. Und noch viel Erfolg mit Deinen Tabellen.

Forumthread: suchen-ersetzen

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread