Hallo,
ich bekomm es einfach nicht gebacken irgendwie dreh ich mich im Kreis.
Das Thema hatte ich im Tabelle/Abfrage schon einmal angesprochen.
https://www.access-o-mania.de/forum/index.php?topic=24764.0
Eventuell kann mir jemand einen möglichen Lösungsweg aufzeigen.
Super wäre es wenn es eine Ausbaustufe dieses Codes wäre.
With vrsar
.Edit
.Fields("YO") = Replace((Right(vrsar!yo, 2) = "ar"), "ar", "o")
...
.Update
' Debug.Print vrsar!yo
.Close
End With
Vielen Dank schon mal
Uwe
Die Logik bleibt ja immer gleich. ;D
With vrsar
If Right(!yo, 2) = "ar" Then
.Edit
!yo = Left(!yo, Len(!yo) - 2) & "o"
.Update
End If
End With
Aber wie bereits erwähnt, gehört das wenn möglich in eine Aktualisierungsabfrage.
Da läuft das dann 100x schneller.
Wie würde so eine Abfrage aussehen ?
Damit habe ich mich nie beschäftigt ^^
Zitat von: Uwe_Noob am April 18, 2020, 16:46:36
Wie würde so eine Abfrage aussehen ?
Die If Bedingung im Recordset wird in der Abfrage zur Where Bedingung.
Das Konzept ändert sich nicht.
Ich werde das heute abend noch testen und mich dann mal an einer Abfrage versuchen ;-)
Muss ich mich damit beschätigen denke ich.
Ich danke dir
PS. funktioniert nu guck ich mal ob ich das mit der Abfrage hinbekomme
Zitat von: Uwe_Noob am April 18, 2020, 18:26:17
nu guck ich mal ob ich das mit der Abfrage hinbekomme
Wenn du es nicht schaffst, dann poste deinen Versuch.
Das sollte kein Problem sein - ist doch ein einfaches Thema.