Thema Datum  Von Nutzer Rating
Antwort
Rot Eurozeichen-bug???
 28.01.2014 09:34:46 Gast48813
NotSolved

Ansicht des Beitrags:
Von:
Gast48813		 Datum:
28.01.2014 09:34:46		 Views:
803		 Rating:
     
Antwort:
  Ja
Thema:
Eurozeichen-bug???

Sub marine()

For Each zelle In ActiveSheet.UsedRange.Cells
   
    If Cells(zelle.Row, zelle.Column) <> "" Then
        teil = Split(zelle.Text)
        Cells(zelle.Row, zelle.Column) = teil(0)           
       
        Cells(zelle.Row, zelle.Column) = Cells(zelle.Row, zelle.Column) & " " & teil(1)
               
        Cells(zelle.Row, zelle.Column) = Replace(Cells(zelle.Row, zelle.Column).Text, "EUR", Chr(128)) ' Fehler hier
       
    End If
       
Next zelle

End Sub

 

Das ganze soll folgendes tun 100 EUR ->100->100 EUR->100 €.

Beim Ersetzen des €-Zeichens wird dieses aber gelöscht bzw nicht ersetzt. Mit anderen Zeichen Chr(129) oÄ funktioniert alles problemlos.

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Eurozeichen-bug???
 28.01.2014 09:34:46 Gast48813
NotSolved