Formel: Excel Suchen und Ersetzen Alle Punkte vor angegebenen Zeichen

307
Rosemary

Ich habe eine Spalte mit Forschungsdaten, die ich bereinigen wollte.

Da Benutzer die Anweisungen nicht befolgt haben, gibt es unnötige Punkte in den Sätzen. Ich muss alle Punkte entfernen, die vor einem Leerzeichen und einem Kleinbuchstaben stehen. Zum Beispiel:

This will help. to do that task. I'm sure. to complete it.

Ich möchte alle '.' Entfernen. vor dem 'bis'. Ich muss es mit verschiedenen anderen Sätzen mit unterschiedlichem Inhalt tun.

Wie geht das mit einer Formel? Jede Hilfe wird sehr geschätzt.

0

2 Antworten auf die Frage

0
Solar Mike

Sie könnten ein einfaches Suchen und Ersetzen nach einem “. “Dh ein Punkt mit einem Leerzeichen auf jeder Seite und nur durch ein Leerzeichen ersetzen. Möglicherweise sollten Sie zuerst doppelte Leerzeichen finden und ersetzen ...

Edit: nach Info im Kommentar hinzugefügt: Dann könnte man nach ". T" suchen und durch "t" ersetzen, das die meisten davon erfassen soll ...

Vielen Dank, aber es tut mir leid, dass ich ein zusätzliches Feld hinzugefügt habe. Ich konnte die echten Daten nicht hier eingeben, also musste ich es erst noch einholen. Rosemary vor 6 Jahren 0
Ich habe unterschiedliche Sätze, nicht alle haben ein ".t". Es ist in jedem Satz anders. Irgendwelche Ideen? Rosemary vor 6 Jahren 0
0
Lee Mac

Hier ist ein Ansatz, der VBA verwendet:

  • Öffnen Sie die Visual Basic-IDE mit Alt+F11
  • Fügen Sie mit Alt+ ein neues öffentliches Modul ein I.M

  • Fügen Sie den folgenden Code in das Modul ein:

    Function StripPeriods(strArg As String) As String Dim intPos As Integer Dim intCha As Integer intPos = InStr(1, strArg, ". ") If intPos > 0 And intPos + 2 < Len(strArg) Then intCha = Asc(Mid(strArg, intPos + 2, 1)) If intCha > 96 And intCha < 123 Then StripPeriods = Left(strArg, intPos - 1) & StripPeriods(Mid(strArg, intPos + 1)) Else StripPeriods = Left(strArg, intPos) & StripPeriods(Mid(strArg, intPos + 1)) End If Else StripPeriods = strArg End If End Function

  • Rufen Sie in einer neuen Spalte oder einem neuen Arbeitsblatt die obige Funktion in einer Formel auf, die auf die Zielzellen verweist, z.

    =StripPeriods(A1)

  • Auswählen und Kopieren der Ergebnisse der Formel ( Ctrl+ C)

  • Einfügen der Ergebnisse als Werte über den ursprünglichen Zellen ( Ctrl+ Alt+ V)

Verwandte Probleme