Hochkomma in OpenOffice entfernen vor Datum

Question

Ich möchte aus einer langen Spalte die Hochkommata vor einer Datumsangabe
entfernen, dadurch erkennt OO den Wert nicht als Datum. Suchen und Ersetzen
funktioniert leider nicht, da OO das Zeichen nicht findet. Gibt es noch andere Wege?

Answer 1

Wir reden von CALC, vermutlich?

Ich hatte so was mal in Excel, aber auch da müsste ich lügen wie man da vorgeht - jedenfalls scheint es mir so, dass das Hochkomma nur eine optische Marke für Text (!) in Zellen ist die man irgendwie abschalten kann, es ist selbst nämlich nicht Bestandteil des Zellinhalts.

Eric March

Answer 2

Hab das mal mit Libre Office Calc probiert (unter meinem Test-Fedora)...

Suchen nach:

^.

Ersetzen durch:

&

Dabei unbedingt unter Optionen "Reguläre Ausdrücke" aktivieren. Sollte mit Open Office sicher auch funktionieren.

Das "^." (Zirkumflex+Punkt) bekommt man durch die Tastendrücke

Zirkumflex Leerzeichen Punkt

mfg, Massaraksch

Answer 3

Für Excel-Interessierte:

Eine 1 in eine leere Zelle schreiben, diese "Kopieren", dann Zielbereich markieren, "Inhalte einfügen - Multiplizieren".

Damit werden solche als Text erzwungenen Zellen in Zahlen umgewandelt.

mfg, Massaraksch

Answer 4

hi all ^^

ich weiss aber nicht ob es portierbar ist

gruss nighty

Sub SonderzeichenLoeschen()
Dim zaehler As Long
ReDim Sarray(1, Azeile) As Variant
Sarray() = Range("A1:A" & ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row)
For zaehler = 1 To UBound(Sarray())
Sarray(zaehler, 1) = Sumtext("" & Sarray(zaehler, 1))
Next zaehler
Range("A1:A" & ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row) = Sarray()
End Sub

Function Sumtext(Zellen As String) As String
Dim Zelle As String
Dim zeich1 As Integer
Dim schalter As Boolean
Dim zaehler3 As Integer
ReDim zaehler2(Len(Zellen)) As String
zaehler3 = 1
For zeich1 = 1 To Len(Zellen)
If Mid(Zellen, zeich1, 1) Like "[0-9,.A-Za-z]" = True Then
Sumtext = Sumtext & zaehler2(zaehler3) & Mid(Zellen, zeich1, 1)
schalter = True
End If
If schalter = True And Mid(Zellen, zeich1, 1) Like "[0-9,.A-Za-z]" = False Then
zaehler3 = zaehler3 + 1
schalter = False
End If
Next zeich1
End Function

Answer 5

Hallo Donni1975,

in Excel funktioniert auch Folgendes:

Datumsspalte markieren > Menü Daten > Text in Spalten > Fertig stellen

Gruß
Rainer

Answer 6

Hinweis:
Meinen Tipp aus Antwort 3 natürlich NUR auf die betreffenden Zellen mit den Apostrophen anwenden!
(denn er entfernt einfach jeweils das erste Zeichen)

mfg, Massaraksch

Answer 7

hi :-)

ach,meine 1 antwort wurde gelöscht ^^

anrede und gruss bleibt trotzdem als grundlegendes element der kommunikation ,trotz löschen,so ein pech aber auch

wie sagte mal ein bekannter philosoph,nicht die dummheit ist es die stört,eher die zur schaustellung

gruss nighty