Hexzahl in Dezimalzahl mit/ in VBA?

Forumthread: Hexzahl in Dezimalzahl mit/ in VBA?

13.09.2006 09:45:24

Kasimir

Hallo Leute,
mal eine Frage zur Umwandlung von Hexzahlen in Dezimalzahlen. Kann man das auch in VBA umrechnen lassen? Als Beispiel ich habe eine Hexzahl 02658AEF und möchte diese in VBA in eine Dezimalzahl (hier die Zahl 40209135) umrechnen lassen. Bekommt man das hin? Wenn ja, wie.
Danke und Gruß,
Kasimir

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

&H02658AEF

13.09.2006 09:51:50

AndrRo
Noch nicht ganz die Lösung

13.09.2006 10:46:40

Kasimir
AW: Noch nicht ganz die Lösung

13.09.2006 13:22:53

AndrRo
AW: Noch nicht ganz die Lösung

13.09.2006 13:52:44

Kasimir

&H02658AEF

13.09.2006 09:51:50

AndrRo

Hallo Kasimir,
von Dez in Hex:
=hex(Zahl)
von Hex in Dez:
einfach &H vor die HEXZahl
z. Bsp: Print &Hzahl
gruss
Andreas

Noch nicht ganz die Lösung

13.09.2006 10:46:40

Kasimir

Hallo ANdreas,
danke Dir für Deine Antwort. Bringt mich schon ein Stück weiter, aber leider nocht nicht ganz ans Ziel. Wie mache ich dass denn mit dem "&H", wenn sich die Hexzahl in einer Variablen befindet. Wie bekomme ich aus z.B. der Variablen "Nummer1", die den Hexwert "02658AEF" hat, den Dezimalwert "40209135".
Kannst Du mir da nochmal unter die Arme greifen?
Gruß,
Kasimir

AW: Noch nicht ganz die Lösung

13.09.2006 13:22:53

AndrRo

Hallo Kasimir,
versuche mal:
cdec("&H" & Nummer1)
Als Lösung bekommst du die Dezimalzahl von Nummer1
gruss
Amdreas

AW: Noch nicht ganz die Lösung

13.09.2006 13:52:44

Kasimir

Hallo Andreas,
danke Dir, genau so dachte ich mir das.
Schönen Tag noch,
Kasimir

Infobox / Tutorial

Schritt-für-Schritt-Anleitung

Um eine Hexzahl in eine Dezimalzahl in VBA umzuwandeln, kannst du die folgende Schritt-für-Schritt-Anleitung befolgen:

Öffne den VBA-Editor:
- Drücke ALT + F11, um den VBA-Editor in Excel zu öffnen.
Erstelle ein neues Modul:
- Klicke im Projekt-Explorer mit der rechten Maustaste auf einen Eintrag und wähle Einfügen > Modul.

Schreibe den Code:

Füge den folgenden VBA-Code in das Modul ein:

Sub HexToDecimal()
   Dim Nummer1 As String
   Dim Dezimalwert As Long

   Nummer1 = "02658AEF" ' Deine Hexzahl als String
   Dezimalwert = CLng("&H" & Nummer1) ' Umrechnung von Hex in Dezimal

   Debug.Print Dezimalwert ' Gibt den Dezimalwert im Direktfenster aus
End Sub

Führe das Makro aus:
- Klicke auf Run oder drücke F5, um das Makro auszuführen. Der Dezimalwert wird im Direktfenster angezeigt.

Häufige Fehler und Lösungen

Fehler: Typkonflikt
Wenn du die Variable Nummer1 nicht als String definierst, kann ein Typkonflikt auftreten. Stelle sicher, dass die Variable als String deklariert ist.
Fehler: Ungültige Hexzahl
Wenn die Hexzahl nicht korrekt formatiert ist (z.B. nicht mit &H versehen), führt dies zu einem Fehler bei der Umrechnung. Achte darauf, immer &H vor die Hexzahl zu setzen.

Alternative Methoden

Es gibt auch alternative Methoden, um Hexzahlen in Dezimalzahlen umzuwandeln, wie zum Beispiel:

Verwendung von Excel-Formeln: Du kannst die Excel-Funktion HEXINDEZ verwenden, um eine Hexzahl in eine Dezimalzahl umzuwandeln. Zum Beispiel:
```
=HEXINDEZ("02658AEF")
```
Einfache String-Konkatenation: Wenn du eine Hexzahl in einer Variablen hast, kannst du die Umwandlung auch so durchführen:
```
Dezimalwert = CLng("&H" & Nummer1)
```

Praktische Beispiele

Hier sind einige praktische Beispiele, um die Umwandlung von Hex zu Dezimal zu veranschaulichen:

Umwandlung von &H1A:

Dim Wert As Long
Wert = CLng("&H1A") ' Ergebnis: 26

Umwandlung von &HFF:

Dim Wert As Long
Wert = CLng("&HFF") ' Ergebnis: 255

Umwandlung von &H02658AEF:

Dim Wert As Long
Wert = CLng("&H02658AEF") ' Ergebnis: 40209135

Tipps für Profis

Benutze Fehlerbehandlung: Implementiere eine Fehlerbehandlung, um sicherzustellen, dass ungültige Hexzahlen korrekt behandelt werden. Du kannst den On Error GoTo-Befehl verwenden.
Nutze die CLng-Funktion: Die Verwendung von CLng stellt sicher, dass die Umwandlung in einen Long-Datentyp erfolgt, was für größere Zahlen wichtig ist.
VBA-Dokumentation: Schau dir die offizielle VBA-Dokumentation an, um mehr über die Funktion CLng und andere nützliche Funktionen zu erfahren.

FAQ: Häufige Fragen

1. Wie kann ich eine Dezimalzahl in eine Hexzahl umwandeln?
Du kannst die Funktion Hex verwenden, um eine Dezimalzahl in eine Hexzahl umzuwandeln. Beispiel:

Dim Hexwert As String
Hexwert = Hex(40209135) ' Ergebnis: "2658AEF"

2. Funktioniert dies in allen Excel-Versionen?
Ja, die Umwandlung von Hex zu Dezimal und umgekehrt funktioniert in allen gängigen Excel-Versionen, die VBA unterstützen.

Beliebteste Forumthreads (12 Monate)

Hexzahl in Dezimalzahl mit/ in VBA?

Forumthread: Hexzahl in Dezimalzahl mit/ in VBA?

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Hexzahl in Dezimalzahl umrechnen mit VBA

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread