Herbers Excel-Forum - das Archiv

Erste Zahl abschneiden

Bild

Betrifft: Erste Zahl abschneiden
von: Thomas
Geschrieben am: 12.11.2003 09:07:25
Hallo,
ich hab schon ein wenig gesucht, aber leider nix passendes gefunden.
Hier mein kleines Problem, in meiner Tabelle beginnen alle Daten mit
0' Das Hochkomma ist ja kein Problem, das würde alleine wegfallen,
aber wie kann ich die Null wegmachen. Leider ist nicht klar, wie viele
Zeichen nach dem Hochkomma folgen werden, sonst hätte ich schon was
passendes gefunden.

Gruß Thomas

Bild

Betrifft: AW: Erste Zahl abschneiden
von: Mac4
Geschrieben am: 12.11.2003 09:10:11
Hallo Thomas,

Klick in eine leere Zelle und kopiere diese,markiere Deine Zellen mit der 0 am Anfang, dann Inhalte einfügen Addieren.

Marc
Bild

Betrifft: AW: Erste Zahl abschneiden
von: Thomas
Geschrieben am: 12.11.2003 09:15:10
Hallo Marc,
Danke für die schnelle Antwort, aber das funktioniert leider nicht.
Die Zellen sind 'Standard' formatiert, wenn das weiterhilft...

Thomas
Bild

Betrifft: AW: Erste Zahl abschneiden
von: Thomas
Geschrieben am: 12.11.2003 09:20:18
Hier ist mal die Tabelle (wenn es funktioniert)
https://www.herber.de/bbs/user/1894.xls
Bild

Betrifft: AW: Erste Zahl abschneiden
von: Mac4
Geschrieben am: 12.11.2003 09:32:16
Hallo Thomas,

wie wärs mit =WECHSELN(A1;"0'";"")?

Marc
Bild

Betrifft: AW: Erste Zahl abschneiden
von: Thomas
Geschrieben am: 12.11.2003 09:40:02
Hallo Marc,
das funktionert jetzt, gibts auch ne Möglichkeit,
das ganze in ein Makro zu packen?

Thomas
Bild

Betrifft: AW: Erste Zahl abschneiden
von: Mac4
Geschrieben am: 12.11.2003 09:51:37
Hi,

probier es mal hiermit:



Sub test()
Dim Zelle
For Each Zelle In Range("A1:E19")
Zelle.Value = Application.WorksheetFunction.Substitute(Zelle, "0'", "")
Next
End Sub



Marc
Bild

Betrifft: Spitze
von: Thomas
Geschrieben am: 12.11.2003 10:55:52
Hallo Marc,
das Makro funktioniert, danke.
Jetzt muß ich nur den Arbeitsbereich variabel gestalten,
dass heißt, die letzte zelle ist nicht immer bei E19.

Thomas
Bild

Betrifft: AW: Erste Zahl abschneiden
von: IngoG
Geschrieben am: 12.11.2003 09:51:45
HAllo Thomas,
einfach bereich markieren,
Ctrl-H drücken (Bearbeiten/Ersetzen) und bei suchen nach 0' einsetzen und bei Ersetzen durch nichts eintragen.
anschließend Button Alle ersetzen drücken
fertig

Gruß Ingo
Bild

Betrifft: AW: Erste Zahl abschneiden
von: Thomas
Geschrieben am: 12.11.2003 11:07:19
Hallo Ingo,
das funktioniert auch, das kann ich mit dem Recorder aufnehmen und gut, danke!!!

Thomas
Bild