Frage zu Excel oder Access

Computer: Software & Programmierung Office Software
1

Hallo,

ich habe eine Frage: Ich suche eine Lösung entweder in Excel oder in Access. Besser wäre Access.

Ich habe in einer z.B. in einer Zelle stehen: Heike und Christian

Jetzt brauche ich aber nur das Wort hinter dem „und“.

Wie mache ich das. Ich könnte alles manuell ändern, aber das müßte ich dann 400 mal machen und da habe ich keine Lust zu.

Christian

2

Hallo Christian,

ich bin kein Access-Experte, daher kann man meinen folgenden Vorschlag vielleicht eleganter lösen, aber es funktioniert so (ich hab mir die Befehle halt aus der Hilfe zusammengestoppelt und ausprobiert).

Erstelle in deiner Access-Datenbank ein neues Modul und kopiere folgende Prozedur hinein:

Sub Name2()
 Dim db As Database, rs As Recordset
 Dim und As Integer, SqlStr As String
 Set db = CurrentDb
 SqlStr = "select \* from tabelle1"
 Set rs = db.OpenRecordset(SqlStr)
 rs.MoveFirst
 Do While Not rs.EOF
 With rs
 .Edit
 und = InStr(1, !namen1, " und ")
 If und \> 0 Then
 !namen2 = Mid(!namen1, und + 5)
 .Update
 End If
 End With
 rs.MoveNext
 Loop
 rs.Close
End Sub

Folgende Namen musst du an deine Gegebenheiten anpassen:

Tabelle1 = Name der Tabelle
Namen1 = Feld in der Tabelle, das die Namen mit „und“ enthält
Namen2 = Feld in der Tabelle, das nach Durchführung der Prozedur nur die Namen nach dem „und“ enthält

Ausserdem wird vorausgesetzt, dass vor und nach dem „und“ jeweils ein Leerzeichen steht.

Möge die Übung gelingen! :wink:
Roland

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

3

In Excel mit einem richtigen Formelmonster! (ich liebe es …)
Also, ich nehme als gegeben an:

Spalte A mit dem Inhalt in der unten beschriebenen Form (Name A und Name B), sowie Spalte B ohne Inhalt.

++++++ A ++++++ B +++++++ usw…

  • 1 + A und B + Formel
  • 2 + C und D + Formel
  • 3 + E und F + Formel
  • 4 + G und H + usw.
  • 5 + usw.

Die Formel (In B1) sieht dann folgendermaßen aus:

=RECHTS(A1;LÄNGE(A1)-(FINDEN(„und“;A1)+3))

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

4

Hallo Christian,

in Excel dürfte sich das mit „Text in Spalten“ im Menü Daten erledigen lassen.

Mal angenommen, Deine Einträge stehen in Spalte A:

  • Spalte A markieren
  • anschließend im Menü DATEN „TEXT IN SPALTEN“ wählen
  • „FESTE BREITE“ anklicken
  • Schaltfläche „WEITER“
  • FERTIG STELLEN
    dann sind die EInträge aus den Zellen in der Spalte A geteilt auf die Spalten A,B und C verteilt. Nun die Spalten A und B löschen. Das war es.

Viel Erfolg.

Gruß und schönes Wochenende
WALTER