Excel Frage

[NR20]

Hallo,

ich habe eine liste mit lauter langen Zahlen
Beispiel:

235898776982
235444245478
235487422658

Ich möchte jetzt gerne, dass in dieser Liste jeweils die erst 2 vorne verschwindet. Kann man da irgendwie per Formel oder einen sonstigen Trick sagen "Die erste Zahl soll immer verschwinden?"

[Vernochan]

Solange es immer die 1. Ziffer ist, suchst du folgendes:
=RIGHT(A3;LEN(A3)-1)

Auf Deutsch müsste es folgendes sein:
=RECHTS(A3;LÄNGE(A3)-1)

[NR20]

Hey danke, schonmal sehr cool

Jetzt kann ich sie also drunter ziehen, sozusagen, gibts aber auch eine Möglichkeit sie direkt zu ersetzen?

[Vernochan]

Direkt ersetzen? Also ohne weitere Spalte?
Das geht nur mit vba. Is aber auch kein Problem.

Wenn die Excel datei Offen is, drück ALT+F11.
Dann kommt ein neues Fenster. Möglicherweise hast du da schon ein Textfenster offen. Wenn nicht, musst du links unter "Project - VBA Project" einen Doppelklick auf das Worksheet machen, in dem die Daten stehen. Dann geht das Textfenster auf.
Dort kopierst du folgenden Code rein:

Code: Alles auswählen

Sub blah()
    Dim nMaxRows As Integer
    nMaxRows = Sheets("Sheet1").Range("A65536").End(xlUp).Row + 0
    Dim nRowCounter As Integer
    
    For nRowCounter = 1 To nMaxRows
        Dim sCellValue As String
        sCellValue = Sheets("Sheet1").Cells(nRowCounter, 1).Value
        Sheets("Sheet1").Cells(nRowCounter, 1).Value = Right(sCellValue, Len(sCellValue) - 1)
    Next nRowCounter
    
End Sub

Bei dem Code musst du noch ein paar Dinge ändern:
bei Sheets("Sheet1")
musst du "Sheet1" durch den Namen des Sheets ersetzen, in dem du arbeitest. Das natürlich bei allen Vorkommen

Bei Range("A65536")
musst du das A durch den Spaltennamen ersetzen, in dem die Daten stehen (z.B. C oder D)

Sheets("Sheet1").Cells(nRowCounter, 1)
Hier musst du die 1 durch den Index der Spalte ersetzen, in der deine Daten stehen.
Dabei ist A = 1; B = 2; C = 3 und so weiter. Da musst du einfach zählen


Achja.
Falls die Daten nicht in Reihe 1 anfangen, sondern erst in einer späteren (manchmal hat man ja in der 1. Reihe ne überschrift), dann änder einfach bei
For nRowCounter = 1 To nMaxRows
die 1 zu der Reihe ab, in der die Daten anfangen.


Und das sollte es schon gewesen sein.

Dann drückst du nur noch F5 und guckst dir das Ergebnis an.



Wenn du das ganze mit abspeichern willst, musst du es aber unter "Macro enabled Workbook" speichern. Sonst kannst du den Code nicht mitspeichern.

[NR20]

m'kaaaay
hab das mal gemacht und dann bei F5 drücken folgendes bekommen:

[ externes Bild ]

dort habe ich "Run" geklickt und krieg dann folgende Fehlemeldung:

[ externes Bild ]

Hm, dann kann ich aber nur unter Macro Workbook speichern? Das ist nicht optimal, oder kann man das dann noch ganz stinknormal als Excel benutzen? Könnte die IT evtl. Probleme damit kriegen, wenn die die Listen mal in ein Tool hochladen müssen?


EDIT: Zur Not, muss halt einfach jede Liste eine neue Spalte mit der obrigen Formel kriegen, auch nicht so dramatisch...

[wynk]

Auf den ersten Blick wuerde ich sagen, da fehlt die Zahl bei Range. Du hast nur A dort stehen. Es muss aber A65536 heissen.

[NR20]

Achso, würde Sinn machen

[Vernochan]

Sorry, hab mich da nich klar ausgedrückt. Sollte aber dann auch funktioniert haben.

Du kannst dann sogar einen Button in die Exceltabelle einfügen, die diese Sub Routine ausführt. Dann kannste 15x klicken und alles is leer

[NR20]

Solange es immer die 1. Ziffer ist, suchst du folgendes:
=RIGHT(A3;LEN(A3)-1)

....

Das funktionier übrigens super

Jetzt möchte ich es aber andersrum
Ich habe eine Liste mit Zahlen:

3564464987
3646468468
3464648679

und ich möchte vor alle Zahlen eine 2 davor haben. Inwiefern muss die Formel dann verändert werden?

[Devastator]

Nutze doch einfach die Verketten-Formel:

=Verketten("2";A1)

[Dante]

Oder einfach
="2"&A1

[That Guy]

nerds.

[Vernochan]

Weil man Google bedienen kann?

[Dante]

Dazu brauchst man doch kein Google

Wobei... Wenn ich daran denke, dass ich vor nem Jahr noch absolut 0 Ahnung vom bösen Excel hatte...

[Vernochan]

Ich kann das wunderbar mit vba oder c# machen, aber mit den Excel Formeln hätt ich vermutlich echt nachgeguckt (wobei ich da natürlich nach concat gesucht hätte, was sehr schnell zu ner lösung geführt hätte)