Office: Innerhalb eine Spalte Teilinhalte Suchen und Ersetzen

hier die Info aus der SQL-Ansicht:

UPDATE T_DATEN_NEU SET T_DATEN_NEU.[Key] = ErsetzenXmal([Key]," ",""), T_DATEN_NEU.Teilnehmer = ErsetzenXmal([Teilnehmer]," "," ");

hier die Info aus Visal Basic:

Option Compare Database

Public Function ErsetzenXmal(S$, Fund$, Ersatz$) As String
Dim SNeu$, SAlt$
SNeu$ = S$
Do
SAlt$ = SNeu$
SNeu$ = Replace(SAlt$, Fund$, Ersatz$)
Loop While SNeu$ <> SAlt$
ErsetzenXmal = SNeu$
End Function


Es bleibt aber seltsam, da die Abfrage schon funktionierte......

 

es folge die Info aus der SQL-Ansicht:

UPDATE T_DATEN_NEU SET T_DATEN_NEU.[Key] = ErsetzenXmal([Key]," ",""), T_DATEN_NEU.Teilnehmer = ErsetzenXmal([Teilnehmer]," "," ");

und nun noch die Info aus der Visual Basic-Ansicht:

Option Compare Database

Public Function ErsetzenXmal(S$, Fund$, Ersatz$) As String
Dim SNeu$, SAlt$
SNeu$ = S$
Do
SAlt$ = SNeu$
SNeu$ = Replace(SAlt$, Fund$, Ersatz$)
Loop While SNeu$ <> SAlt$
ErsetzenXmal = SNeu$
End Function



Es bleibt aber seltsam, da die Abfrage schon funktionierte.....

 

Hallo wikro,

wenn Deine Tabelle 'T_DATEN_NEU' heißt, wobei die beiden Felder 'Key' und 'Teilnehmer' dieser Tabelle Textfelder oder Memofelder sind, aus denen:
1) im Falle des Feldes 'Key':
Ich kann leider nicht genau erkennen, was der 2.Parameter der Funktion 'ErsetzenXmal()' ist, ob das ein 1faches Leerzeichen oder ein doppeltes Leerzeichen ist: auf alle Fälle wird nach dieser Zeichenkette solange gesucht (und durch eine leere Zeichenkette "" ersetzt), bis keine solche Stelle mehr in 'Key' gefunden wird.
2) im Falle des Feldes 'Teilnehmer':
Auch hier kann ich leider nicht genau erkennen, was der 2. und 3. Parameter der Funktion 'ErsetzenXmal()' ist; aber ich nehme an, dass dort zuerst ein doppeltes Leerzeichen steht und dann ein 1faches Leerzeichen: auf alle Fälle wird nach der Zeichenkette (die im 2.Parameter steht) solange gesucht (und durch die Zeichenkette, die im 3. Parameter steht, ersetzt), bis keine solche Stelle mehr in 'Teilnehmer' gefunden wird.

(Anmerkung: Das Problem ist, weshalb ich die Leerzeichenanzahl nicht genau erkennen kann, dass beim Uploaden in diesem Forum mehrfache Leerzeichen durch 1 Leerzeichen ersetzt werden. Damit die Leerzeichen erhalten bleiben, müsste man jedes Leerzeichen durch ein 'hartes' Leerzeichen ersetzen, indem man bei gedrückter Alt-Taste die Zifferntasten 0160 auf der Zehnertastatur drückt).

Meine Frage zum Schluss: Hast Du wirklich Access2000 und nicht doch vielmehr Access2007? Denn Access2007 kann man, was die Datenbank betrifft, mit 3 Dateiformaten verwenden: Access2000-Format, Access2002-2003-Format und Access2007-Format.
Öffnet man unter Access2007 eine mdb-Datei, die im Access2000-Format gespeichert ist, erscheint in der Kopfzeile des Anwendungsfensters zB. 'Beispiel : Datenbank (Access 2000-Dateiformat) - Microsoft Access'

 

Hallo,

du hast richtig vermutet, dass im Feld Key sämtliche Leerzeichen entfernt werden und im Feld Teilnehmer nur einzelnene Leerzeichen übrig bleiben sollen.

Des weiteren arbeite ich auf jeden Fall mit Access 2000, werden aber wahrscheinlich bald auf 2007 umstellen.

Gibt es Dinge die ich bei der Umstellung berücksichtigen sollte ?

 

Hallo wikro,

gegenüber Access2000 bzw. Access2003 gibt es in Access2007 eine ganze Reihe von Neuheiten, zB.
- Multifunktionsleiste (Ribbon) statt des Menüsystems
- Navigationsleiste statt des Datenbankfensters
- Layoutansicht bei Formularen und Berichten (zusätzlich)
- Memofelder mit gewisser RTF/HTML-Formatierungsmöglichkeit
- Eingebettete Access-Makros
- Speichervariablen
- Neues Datenbankformat *.accdb (neben *.mdb-Format für Access2000 und Access2002-2003)
- Vertrauensstellungscenter

Was den letzten Punkt betrifft, gibt es vertrauenswürdige Herausgeber und Speicherorte:
d.h. man kann zB. Verzeichnisse angeben für *.mdb bzw. *.accdb-Dateien (Datenbankdateien), bei deren Aufruf Access nicht mehr nachfragt, ob darin enthaltene Makros bzw. VBA-Code vertrauenswürdig genug sind, um sie/ihn zu aktivieren.

Was den vorletzten Punkt betrifft: Verwendet man *.accdb, gibt es zB. nur mehr ein Datenbankkennwort (keine *.mdw-Möglichkeit mehr), ferner zB. keine externen Datenzugriffsseiten.

Was die beiden ersten Punkte betrifft, bedarf es einer gewissen Eingewöhnungszeit - seitdem finde ich den Ribbon ein ganz passables Werkzeug (es geht da wirklich nur um eine gewisse Umgewöhnung; die habe auch ich als 58-jähriger Knacker noch problemlos geschafft).

Gewisse ärgerliche Kinderkrankheiten sind durch die Servicepacks SP1 und SP2 in der Zwischenzeit ausgeräumt - daher diese unbedingt installieren (SP2).

 

Hallo Exl121150,

ich habe mit ACCESS per ODBC auf unsere Datenbank. Damit mache ich mir meine kleinen Abfragen um mir bei bedarf schnell eine Übersicht zu verschaffen wenn es brennt....

Das geht dan nicht mehr ? --> "......, ferner zB. keine externen Datenzugriffsseiten"

 

Hallo wikro,

externe Datenzugriffsseiten haben nichts mit ODBC zu tun (möglicherweise gab es die in Access2000 noch gar nicht).
Es gibt natürlich in Access2007 jede Menge an Importmöglichkeiten von anderen Datenquellen und auch Verknüpfungen zu diesen (Access, Excel, SharePoint, Textdatei, XML-Datei, ODBC-Datenbank, HTML-Dokument, Outlook-Ordner, dBase-Datei, Paradox-Datei, Lotus123-Datei).

 

Hallo Exl121150,

vielen Dank für deine Hilfe!

Bis zum nächstes Mal !

 

Hallo,
ich stehe vor dem Problem, dass sich der Begriff, nach dem ich suche und der, den ich einfügen will, nicht immer dieselben sind. Sie befinden sich in zwei getrennten Feldern einer gesonderten Such-Tabelle. Mir gelingt es einfach nicht, statt der hier immer in Anführungszeichen gesetzten Werte (z.B. "ABC" und "XYZ") die Namen und die Felder der "Such-Tabelle" zu verwenden.
Für einen Vorschlag wäre ich sehr dankbar.

 

Hallo,
Deine Problembeschreibung ist etwas abstrakt. Es gibt einige Möglichkeiten Tabelleninhalte automatisch zu bearbeiten.
"Suchen/Ersetzen", eine Aktualisierungsabfrage, VBA-Routine mit oder ohne SQL,......
Was Du einsetzt hängt von deinen Accesskenntnissen ab. Am besten lädst Du mal eine abgespeckte Version deiner Datenbank mit anonymen Daten hoch und beschreibst Dein Ansinnen nochmal genauer anhand des Beispiels.

Nebenbei bemerkt ist es nicht besonders zielführend einen Uraltthread wieder aufzumachen. Besser erstellst Du eine ganz neues Thema. In 2009 beziehen sich die angegeben Antworten ja auch auf Uraltversionen von Access (2003 oder 2007). Da hat sich ja auch bis zu aktuelleren Versionen einiges getan.

 

Lieber Andreas,
trotzdem vielen Dank für die Rückmeldung.

Ich habe in einer Tabelle ein Feld "Markierungen", in dem durch ein ";" getrennt Schlagwörter zu Fotos enthalten sind (Anlage 1). Durch eine Abfrage habe ich Datensätze ermittelt, in ein bestimmtes Schlagwort enthalten ist. Auf dem Abfrageergebnis beruht eine Tabelle (Anlage 2), in der ich festlege, was mit den gefundenen Sätzen passieren soll. Also ändern, ergänzen oder löschen. Bei Änderungen und Ergänzungen wird ein neuer Begriff eingegeben, bei Löschungen bleibt diese Feld leer.

Durch die neue Abfrage will ich nun z.B. aus der Kette von Begriffen im Feld Markierungen (Beispiel: " Gerrit-Engelke-Schule;10 c;1961(?);Beispiel;Oder Sonstwas;" den Begriff "1961(?)" durch den Begriff "1961" ersetzen. Das klappt, wenn ich die Tabelle mit Suchen und Ersetzen bearbeite auch tadellos. Ich möchte das aber durch eine Aktualisierungsabfrage lösen. Und da habe ich nun meine Problem. Wenn ich das mit z.B. "
Ersetzen([Markierungen];"Klassenfoto";"KLASSENFOTO")" machen würde, dann ginge das auch. Aber ich möchte das etwas komfortabler haben. Dazu müsste ich "Klassenfoto" und "KLASSENFOTO" nicht im Klartext eingeben, sondern ich möchte dabei auf die Herkunft dieser beiden Begriffe in der eingangs erwähnten ersten Abfrage/Tabelle Bezug nehmen.

Mein Versuch mit
Ersetzen([Markierungen];"[ÄndMak-Alle-Sätze]";"[NeuerBegriff]");"" ";" ") ist fehlgeschlagen und ich weiß nicht, was ich ändern muß.

Er wäre schön, wenn ich einen Tipp von Dir bekommen könnte.

ALesLesko

 

Wie entstehen diese mit ";" verketteten Sätze? Sieht nach csv-Export aus Excel o.ä. aus. Das hat mit Datenbank nicht wirklich was zu tun. Da würde ich erstmal mal zusehen, dass die in eine Tabelle mit getrennten Feldern übertragen werden. Also die Importfunktion mit Trennzeichen Semikolon nutzen. Die Felder ließen sich dann mit Namen versehen und direkt in Abfragen ansprechen. Die Suchbegrifftabelle finde ich ungünstig. Stattdessen würde ich ein Formular bauen, welches über entsprechende Filterfunktionen die zu ändernde Tabelle filtert. Dadurch entsteht ein Recordset, welches man dann beliebig über VBA durchlesen und modifizieren kann. Kennst Du dich mit VBA aus?
Über Aktualisierungs, bzw. Löschabfragen bricht man sich da die Ohren.

 

Hallo, Andreas,

vielen Dank für Deine Rückmeldung. Bei mir hat das Ganze einmal damit angefangen, dass ich eine Exel-Tabelle gefunden habe, mit der man die Eigenschaften von Dateien aus dem Windows Explorer auslesen kann. Darunter auch die "Markierungen", die bei Windows ja mit einem Semikolon getrennt sind. So what? Ich habe mein Problem jetzt dadurch gelöst, dass ich auf meinem Access-Formular die Suchen/Ersetzen-Funktion öffne und die Änderungen vornehme. Da muss ich zwar auch immer auf das Semikolon achten, aber es funktioniert!

Noch einen schönen Sonntag
ALesLesko