Hallo,
ich habe eine Zelle in der z. B. der Wert
Name. Andreas. |Alter . 19| ||| Straße:||| Hauptstraße |||||||||
steht. Natürlich ist es noch viel länger
Wie bekomme ich es hin, das dieses Zeichen "|" nur einmal an der stelle steht. Die Duplikate quasi entfernt werden und eins erhalten bleibt?
(18.08.2022, 15:50)Vortex schrieb: [ -> ]ich habe eine Zelle in der z. B. der Wert […] steht.
Moin!
Wie kommt er denn in die Zelle, der Wert?
Sicherlich tippt niemand so einen Blödsinn.
Folglich gehe ich von einem misslungenen Import einer Textdatei (.txt oder .csv) aus.
Heißt:
Nicht die Folgen blitzdingsen, sondern an der Ursache arbeiten!
Edit:
Ach so, die Anfrage war ja schon (ohne Antwort) als erledigt gekennzeichnet …
Gruß Ralf
Hallo,
schau mal, ob das so ausreichend ist.
Code:
Option Explicit
Sub mehrZeichenWeg()
Dim iString As Long, i As Long, j As Long, varString$, varAusgabe$
With Tabelle1
varString = .Cells(1, 1)
iString = Len(varString)
For i = iString To 1 Step -1
If Mid(varString, i, 2) = "||" Then
varAusgabe = varAusgabe
j = j + 1
Else
varAusgabe = Mid(varString, i, 1) & varAusgabe
End If
Next i
varString = varAusgabe
iString = Len(varString)
varAusgabe = ""
For i = iString To 1 Step -1
If Not Mid(varString, i, 3) = "| |" Then
varAusgabe = Mid(varString, i, 1) & varAusgabe
End If
Next i
.Cells(1, 1) = varAusgabe
End With
End Sub
Diese Prozedur bearbeitet den Eintrag in Zelle A1.
Gruß Uwe
Hallo,
so mit Formel?
PHP-Code:
=WECHSELN(WECHSELN(WECHSELN(A1;"|";"");" ";" |");"|";"";1)
Die ganze Zelle würde helfen.
Hey.
ist eine Importdatei. Da kann ich keinen Fehler suchen, ich bekomme sie extern so ausgewiesen.
Aber hab es schon lösen können :)