ich hab zum Beispiel eine Zeile die sieht so aus:
Artikelnummer: 3846
Aus dieser Zeile würde ich gerne alles bis auf "3846" löschen.
Kann mir das jemand helfen, dadurch würde ich ne menge Arbeit sparen.
Sub neu()
abwo = InStr(Cells(1, 1), ":")
lenge = Len(Cells(1, 1))
cb = Right(Cells(1, 1), lenge - abwo)
End Sub