Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1140to1144
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1140to1144
1140to1144
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zahlen verschlüsseln / drehen

Zahlen verschlüsseln / drehen
Andre
Hallo,
bin neu hier im Forum, und hoffe mir kann jemand weiterhelfen.
Ich würde gerne Zahlen in einer Excel Tabelle verschlüsseln durch einfaches drehen / spiegeln
z.B: 302785 soll zu 708325 werden.
also aus 0 wird 0, 1 = 9, 2 = 8, 3 = 7, 4 = 6 ......
Bestimmt weis einer von Euch wie man das schnell umsetzen kann, hab da nämlich ne Datenbank mit über 50000 Zeilen und da wäre es fast ne Lebensaufgabe alle Zahlen per Hand abzuändern.
Gruß und hoffentlich bis bald

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zahlen verschlüsseln / drehen
24.02.2010 11:52:50
Markus
Hallo Andre,
Wie viele Stellen haben diese Zahlen, immer 6?
lg
Markus
AW: Zahlen verschlüsseln / drehen
24.02.2010 11:56:34
Markus
Hallo Andre,
versuche mal das:
=VERKETTEN(TEIL(A1;6;1);TEIL(A1;5;1);TEIL(A1;4;1);TEIL(A1;3;1);TEIL(A1;2;1);TEIL(A1;1;1))+0
In der Zelle A1 muß die Originalzahl stehen.
lg
Markus
AW: Zahlen verschlüsseln / drehen
24.02.2010 12:06:54
Andre
Hmm,
also die Zahl ist immer 7 Stellig und steht in Spalte T un der Erzeugte Wert soll dann in Spalte AF stehen.
Die Formel die Du gerade gepostet hast macht aus der Zahl 1234567 die Zahl 7654321.
Ich brauche aber eine Formel die aus 1234567 die Zahl 9876543 macht, vielleicht fällt dir dazu ja auch was ein.
Anzeige
AW: Zahlen verschlüsseln / drehen
24.02.2010 12:10:40
Markus
Hallo Andre,
Hiermit sollte es klappen:
=VERKETTEN(TEIL(A1;7;1)+2;TEIL(A1;6;1)+2;TEIL(A1;5;1)+2;TEIL(A1;4;1)+2;TEIL(A1;3;1)+2;TEIL(A1;2;1)+2; TEIL(A1;1;1)+2) +0
A1 musst du nur noch durch Tx ersetzen.
lg
Markus
AW: Zahlen verschlüsseln / drehen
24.02.2010 12:17:30
Andre
Nee, jetzt kommt da was ein ganz anderer Wert bei raus ich hab als Beispiel mal die Zahl 7090087 genommen da sollte dann ja 3010023 raus kommen, jetzt kommt da aber 910221129 raus.
lg
Andre
als UDF
24.02.2010 12:26:00
Rudi
Hallo, 
Function verschluesseln(dblZahl)
Dim arrKey, i As Integer, sTmp
arrKey = Array(0, 9, 8, 7, 6, 5, 4, 3, 2, 1)
For i = 1 To Len(dblZahl)
sTmp = Mid(dblZahl, i, 1)
If IsNumeric(sTmp) Then
verschluesseln = verschluesseln & arrKey(sTmp)
Else
verschluesseln = verschluesseln & sTmp
End If
Next
If IsNumeric(verschluesseln) Then verschluesseln = verschluesseln * 1
End Function

Gruß
Rudi
Anzeige
AW: als UDF
24.02.2010 12:42:35
Andre
Hallo Rudi,
danke für Deinen Beitrag aber davon hab ich keine Ahnung, wo soll denn das hin geschrieben werden?
Wenn man das als Formel in die Tabelle kopiert passiert nichts außer das es dann in der Zelle steht.
lg
Andre
AW: als UDF
24.02.2010 12:48:42
Rudi
Hallo,
das gehört in ein Modul.
Alt+F11
Im Projektexplorer (linkes Fenster) Rechtsklick auf deine Mappe-Einfüge-Modul und da rein kopieren.
In die Tabelle schreibst du dann einfach =verschluesseln(A1)
Gruß
Rudi
AW: als UDF
24.02.2010 12:59:16
Andre
Super das hat geklappt 1000 Dank, das hätte sonst Wochen gedauert alle 50000 Zeilen mit der Hand zu ändern.
Jetzt dauerts nur sekunden.
Supi Dupi Mega Geil :-))))
LG
Andre
Anzeige
Mit Datenkryptisierung hatte ich mich auch...
25.02.2010 05:04:17
Luc:-?
…schon befasst, André…
Üblicherweise verwendet man hierzu eine Xor-Operation. Rudis Lösung ergänzend setze ich einen Link auf diesen Thread, in dem das auch zur Sprache kam. Dort findest du auch BspDateien.
Gruß Luc :-?
Als Formel !
24.02.2010 16:28:24
Renee
Hi Andre,
weiter oben hat noch jemand nach einer Formel gefragt.
Hier wäre ein, 
{=--TEXT(SUMMENPRODUKT(RECHTS(10-TEIL(A1;ZEILE(INDIREKT("1:"&LÄNGE(A1)));1);1)
*10^(LÄNGE(A1)-ZEILE(INDIREKT("1:"&LÄNGE(A1)))));WIEDERHOLEN("0";LÄNGE(A1)))}

Achtung: Matrixformel - Die Formel ohne die {} eingeben und mit Ctrl-Shift-Enter abschliessen.
GreetZ Renée
Anzeige
AW: Als Formel vereinfacht!
24.02.2010 16:51:50
Renee
Hi nochmals,
Da ist keine (absolute) Matrixformel nötig und auch das Text und wieder Zahlen Gefrikel ist überflüssig.
Ich habe als Grundlage eine Formel von hier ohne viel Nachzudenken übernommen!
Es geht also auch einfacher: 

=SUMMENPRODUKT(RECHTS(10-TEIL(A1;ZEILE(INDIREKT("1:"&LÄNGE(A1)));1);1)
*10^(LÄNGE(A1)-ZEILE(INDIREKT("1:"&LÄNGE(A1)))))
GreetZ Renée

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige