20er System

Forumthread: 20er System
4 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: 20er System

20er System

04.10.2006 17:39:46

Maximilian

Hi,
Ich habe das Problem, das ich Zahlen aus dem dezimal in das 20er System umwandeln muss. Ich habe bereits was eigenes Versucht bin aber hoffnungslos Gescheitert und habe nicht den Durchblick um alle winzigen Fehler zu beheben. Giebt es eine Funktion mit der ich in das 20er System umrechnen kann?
Bitte um Hilfe.
Maximilian

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: 20er System

04.10.2006 18:05:47

EtoPHG
AW: 20er System

04.10.2006 18:07:36

Holger
AW: 20er System

05.10.2006 17:38:55

EtoPHG
AW: 20er System

06.10.2006 18:23:25

Maximilian

AW: 20er System

04.10.2006 18:05:47

EtoPHG

Hallo Maximilian,
Vielleicht so:
https://www.herber.de/bbs/user/37175.xls
Gruss Hansueli

AW: 20er System

04.10.2006 18:07:36

Holger

Hallo Maximilian,
oder schreibe Dir selber die Funktion:


Function dezinzwanzig(zahl As Integer) As String
Do Until zahl = 0
rest = zahl Mod 20
Select Case rest
Case 0 To 9
rest = rest
Case 10 To 19
rest = Chr(55 + rest)
End Select
dezinzwanzig = rest & dezinzwanzig
zahl = zahl \ 20
Loop
End Function

mit Aufruf z.B.: =dezinzwanzig(A1)
Holger

AW: 20er System

05.10.2006 17:38:55

EtoPHG

Bitte um Rückmeldung

AW: 20er System

06.10.2006 18:23:25

Maximilian

Ja, danke
Ich hatte eine Nachricht geschrieben war aber warscheinlich zu blöd m,ein Passwort anzugeben.
Holgers antwort hatte mir sehr weitergeholfen. Die von EtoPGH konnte ich leider nicht verwenden.#
Maximilian