Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellenausgabe rueckwaerts

Forumthread: Zellenausgabe rueckwaerts

Zellenausgabe rueckwaerts
12.03.2008 18:55:12
Markus
Bitte um Eure Hilfe für mein Problem das sicherlich einfach zu Losen ist.
Bei der Eingabe einer Zahl in eine Zelle benoetige ich die Zellenausgabe rueckwaerts geschrieben.
Beispiel: Eingabe: "2500" , Ausgabe: "0052"
Lösung kann direkt über Zellenformat oder auch über eine Formel in der Nachbarzelle sein.
Vielen Dank im voraus für Eure Hilfe
Markus

Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellenausgabe rueckwaerts
12.03.2008 19:19:00
ransi
Hallo
Ohne VBA kenne ich nur eine aufwändige Lösung mit Hilfszellen.
Mit einer kleinen selbstgeschriebenen Funktion geht so:
Diesen Code in ein Modul
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit


Public Function rueckwaerts(zelle) As String
rueckwaerts = StrReverse(zelle.Text)
End Function

Der Aufruf in der Tabelle geht dann so:
Tabelle1

 AB
125000052

Formeln der Tabelle
ZelleFormel
B1=rueckwaerts(A1)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
ransi

Anzeige
AW: Zellenausgabe rueckwaerts
12.03.2008 19:41:43
Markus
Hallo ransi,
vielen Dank fuer deine Antwort
ich habe keine VBA kenntnisse un auch mein problem noch nicht geloest.
Habe es mit "insert" "funktion" probiert hat aber noch nicht geklappt un auch nicht die direkte eingabe in die zelle =reverse(D20) oder =rueckwaerts(D20) funktionierte nicht.
Falls du mir noch etwas weiterhelfen kannst waere ich dir dankbar! Irgendwie bekomm ich das dann schon noch hin, muss nur mit google suchen. Den Ansattz hast du mir ja schon gegeben.
Markus

Anzeige
AW: Zellenausgabe rueckwaerts
12.03.2008 19:55:00
ransi
HAllo MArkus
Schau dir mal das an:
"Wie fügt man ein Makro oder eine benutzerdefinierte Funktion in ein Modul ein?"
http://www.online-excel.de/excel/singsel_vba.php?f=44
Da hat Beate die Vorgehensweise sehr verständlich erklärt.
ransi

Anzeige
AW: Zellenausgabe rueckwaerts
12.03.2008 19:59:35
Markus
Hier lern ich ja noch richtig was dazu mit euch!!
markus
bin jetzt off!

AW: Zellenausgabe rueckwaerts
12.03.2008 19:21:46
Volti
Hallo Markus,
hab' hier mal schnell was gebastelt. Eine Function, die Deinen Wunsch erfüllen müsste:
Function Revers(S As String) As String Dim T As String Dim X As Integer For X = Len(S) To 1 Step -1 T = T & Mid$(S, X, 1) Next Revers = T End Function


Die tust Du in ein Modul Deiner Wahl ablegen.
Aufrufen in einer Tabelle z.B. so: =Revers(A1)
viele Grüße aus Hessen
Karl-Heinz

Anzeige
AW: Zellenausgabe rueckwaerts
12.03.2008 19:22:00
Beverly
Hi Markus,
sind die Eingaben immer 4-stellig?
Tabelle1

 AB
125000052

Formeln der Tabelle
ZelleFormel
B1=RECHTS(A1;1)&TEIL(A1;3;1)&TEIL(A1;2;1)&LINKS(A1)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4


Anzeige
AW: Zellenausgabe rueckwaerts
12.03.2008 19:24:11
Hans-Joachim
Hallo Markus,
mit dieser Formel klappt das, auch wenn es nicht die eleganteste Lösung sein muß.
=TEIL(A1;5;1)&TEIL(A1;4;1)&TEIL(A1;3;1)&TEIL(A1;2;1)&TEIL(A1;1;1)
Gruß Hans

AW: Zellenausgabe rueckwaerts
12.03.2008 19:52:36
Markus
Vielen dank fuer euere Antworten!
Habe die Loesung bis Jetzt immer noch nicht gefunden.
Aber mit de beispielen von Beverly, Hans und Jens habe ich dann schon einen guten Ansatz.
Vieleicht liegts auch daran das ich meine Excels nur auf spanisch un englisch installiert sind.
Markus
Anzeige
;
Anzeige

Infobox / Tutorial

Zellenausgabe rückwärts in Excel


Schritt-für-Schritt-Anleitung

Um Text oder Zahlen in Excel rückwärts auszugeben, kannst du folgende Schritte befolgen:

  1. VBA-Funktion erstellen:

    • Öffne den Visual Basic for Applications (VBA) Editor mit ALT + F11.
    • Füge ein neues Modul hinzu: Rechtsklick auf "VBAProject (DeinWorkbookName)" > "Einfügen" > "Modul".
    • Kopiere den folgenden Code in das Modul:

      Public Function rueckwaerts(zelle As String) As String
       rueckwaerts = StrReverse(zelle)
      End Function
  2. Funktionsaufruf in Excel:

    • Gehe zurück zu deinem Excel-Blatt.
    • Gib in einer Zelle die Funktion ein, z.B.: =rueckwaerts(A1), wobei A1 die Zelle ist, die du rückwärts ausgeben möchtest.
  3. Zellenausgabe prüfen:

    • Wenn in A1 beispielsweise "2500" steht, wird in der Zelle mit der Formel "0052" angezeigt.

Häufige Fehler und Lösungen

  • Fehler: "#NAME?": Dieser Fehler tritt auf, wenn Excel die Funktion nicht erkennt. Stelle sicher, dass du die Funktion im VBA-Editor korrekt erstellt hast und dass das Modul gespeichert ist.

  • Fehler: "Funktion nicht verfügbar": Wenn du Excel ohne Makros verwendest, stelle sicher, dass du die Datei als .xlsm speicherst, um Makros zu aktivieren.

  • Tipp: Überprüfe auch die Spracheinstellungen deines Excel. In deutschen Versionen könnten Funktionsnamen abweichen.


Alternative Methoden

Falls du keine VBA-Funktion verwenden möchtest, kannst du auch folgende Formeln nutzen:

  1. Formel für 4-stellige Zahlen:

    =RECHTS(A1;1)&TEIL(A1;3;1)&TEIL(A1;2;1)&LINKS(A1;1)
  2. Text rückwärts schreiben mit Hilfszellen:

    • Du kannst auch Hilfszellen verwenden, um jeden Buchstaben nacheinander herauszulesen und dann zu kombinieren.

Praktische Beispiele

Angenommen, du hast folgende Daten in Zelle A1:

A B
2500 0052
1234 4321
ABCD DCBA

Für die Eingabe in Spalte A kannst du die oben genannten Methoden verwenden, um die Ausgaben in Spalte B zu generieren.


Tipps für Profis

  • Excel rückwärts suchen: Du kannst die Funktion FINDEN() in Kombination mit RÜCKWÄRTS() nutzen, um gezielt nach Text in umgekehrter Reihenfolge zu suchen.
  • Datum rückwärts schreiben: Wenn du beispielsweise ein Datum in umgekehrter Reihenfolge ausgeben möchtest, kannst du es als Text behandeln und die oben genannten Methoden anwenden.
  • Makros speichern: Vergiss nicht, deine Datei als Makro-fähige Datei (.xlsm) zu speichern, um die benutzerdefinierte Funktion jederzeit nutzen zu können.

FAQ: Häufige Fragen

1. Wie kann ich Text rückwärts ausgeben, ohne VBA zu verwenden?
Du kannst die Formel =RECHTS(A1;1)&TEIL(A1;3;1)&TEIL(A1;2;1)&LINKS(A1;1) verwenden, um Text rückwärts zu schreiben.

2. Funktioniert das auch für mehr als 4 Zeichen?
Ja, du kannst die Formel erweitern, indem du zusätzliche TEIL()-Funktionen hinzufügst, um mehr Zeichen rückwärts zu schreiben.

3. Kann ich mit Excel rückwärts zählen?
Ja, du kannst eine Formel erstellen, die eine Liste von Zahlen in umgekehrter Reihenfolge anzeigt. Zum Beispiel =MAX(A:A)-ROW(A1)+1, um rückwärts zu zählen.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige