Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1512to1516
1512to1516
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

HEX Code in ASCII umwandeln

Forumthread: HEX Code in ASCII umwandeln

HEX Code in ASCII umwandeln
02.09.2016 11:57:51
Christian

Hallo zusammen,
ich habe eine große Excel Liste mit einem Auszug von einem Telegrammverkehr. Dort wird mir in einer Spalte jeweils der Telegramminhalt im Hex Format angezeigt Beispiel:
53 54 41 39 30 35 35 36 39 37 34 34 4B 30 30 30 30 30 30 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 54 45
Nun möchte ich in einer nebenliegenden Spalte mir den Hex Code als ASCII text anzeigen lassen, im Beispielfall dann: STA905569744K00000000 00TE.
Gibt es eine "einfache" Formel dafür? Ich habe nur =HEXINDEZ gefunden! Das hilft mir erstmal aber nicht...
Vielen Dank im Voraus!
mfg
Christian

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: HEX Code in ASCII umwandeln
02.09.2016 12:02:33
Rudi Maintaire
Hallo,
jeder Wert in einer Zelle?
=Zeichen(Hexindez(a1))
Gruß
Rudi
AW: HEX Code in ASCII umwandeln
02.09.2016 12:28:25
Christian
Moin,
nein, die Zeichen sind alle in einer Zelle. Mit Leerzeichen zwischen den einzelnen HEX Werten. Die Ausgabe soll dann natürlich auch in einer Zelle stattfinden
Gruß
Christian
Am einfachsten per UDF
02.09.2016 12:31:21
RPP63
Moin!
Folgende UDF in einem allgemeinen Modul:
Function HexInText$(Hexa$)
Dim arrAlt, arrNeu, cnt&
arrAlt = Split(Hexa)
For cnt = 0 To Ubound(arrAlt)
   arrAlt(cnt) = ChrW(WorksheetFunction.Hex2Dec(arrAlt(cnt)))
Next
HexInText = Join(arrAlt)
End Function

Dein Hex-String in A1,
in A2: =GLÄTTEN(HexInText(A1))
ergibt:
Anzeige
Aber Ralf, schon wieder was Spezielles, ...
02.09.2016 12:58:21
Luc:-?
…wo doch alles Benötigte schon im Archiv vorhanden ist. Allerdings liegst du damit ja auch voll im Trend ggw und wohl auch zukünftiger Xl-FktsPgmmierung (→zB vgl hier)… ;-]
=VJoin(ZEICHEN(HEXINDEZ(VSplit(A1)));"") ergibt dann das: 
STA905569744K00000000                                             00TE
…und =GLÄTTEN(VJoin(ZEICHEN(HEXINDEZ(VSplit(A1)));"")) das:
STA905569744K00000000 00TE
(letztpubliziert: VJoin-Vs1.4 [nur in hochgeladenen BspDateien], VSplit-Vs1.1)
Übrigens, vbFkt Join ohne Arg2-Angabe verwendet als DefaultWert das LeerZeichen!
Gruß, Luc :-?
Besser informiert mit …
Anzeige
Aber, luc :-?
02.09.2016 18:22:38
RPP63
… ich muss doch kein Schweizer Taschenmesser benutzen, um eine Kreuzschlitzschraube herauszudrehen.
Natürlich geht es damit, ein simpler Schraubendreher ist imo aber leichter und zweckorientierter.
Aber klar, dies ist eher eine Grundsatzdiskussion; ich finde, dass für ein konkretes Problem eine mal schnell erstellte UDF eher Sinn macht.
Bin mir aber gleichzeitig sicher, dass meine Meinung durchaus auf Widerspruch stößt.
;-)
Gruß Ralf
Anzeige
AW: Aber, luc :-?
02.09.2016 18:27:11
snb
Und Luc's Link hat nur mit Rank zu tun (von einer 'ranting' Loki -who the hell might that be ?? -) ;)
You must that correlate with the context of ...
08.09.2016 01:52:44
Luc:-?
…my remarks to Ralf, snb;
the "splitting" of xl-function RANK seems to be just an example of what is going on in the minds of MS-management…
By the way, "Loki" did it, and the work on the announced udf is nearly finished! Be good hope to find it in near future on this scene…!
Greetings, Luc :-?
Anzeige
Ja, bei mir, und wir waren uns doch schon ...
08.09.2016 01:44:17
Luc:-?
…mal einig in bezug auf „PC-Vermüllung“ und so, Ralf; ;-]
glaube doch, mich richtig zu erinnern. Aber mal abgesehen davon, die UDF-Problematik hat es durchaus verdient, ernsthaft und nicht nur schnell mal nebenbei angegangen zu wdn. Das fördert auch das Verständnis der Fktionsweise von Xl-Fktt und ihr Zusam­menwirken in Fmln (auch mit UDFs) und mit der Xl-Steuerung (vgl meine Diskussionen mit neopa!).
Kurz zum Link: MS scheint inzwischen auch auf diesen (Simpel-)Zug aufgesprungen zu sein, wenn man sich so einige als Neuerung verkaufte FktsAufsplittungen der letzten Zeit ansieht. Was soll man zB mit RANG.MITTELW anfangen? Statt 2× Rang 1 erhält man dann 2× Rang 1,5 (so eine Medaille gibt's gar nicht → halb Gold, halb Silber) und statt 3× Rang 3 3× Rang 4! Warum dann nicht auch 2× Rang 2 bzw 3× Rang 5? Absoluter Schwachsinn, aber wem's gefällt; ich hab's jedenfalls in meine UDF VRank (deshalb die späte AW!) eingebaut (neben Sinnvollerem)! Demnächst in diesem Theater…
Morrn, Luc :-?
Anzeige
AW: HEX Code in ASCII umwandeln
02.09.2016 12:03:20
Fennek
Hallo,
ungeprüft:
mit
=zeichen()
wird eine Zahl in das entsprechende Ascii - Zeichen gewandelt
vba: chr()
mfg

;

Forumthreads zu verwandten Themen

Markierte Zellen: Text in Datum umwandeln
Peter

Guten Tag
Mit nachfolgendem Code wandle ich einen Textstring in ein Datum um. Komisch ist, dass ich die Schleife zweimal hintereinander laufen lassen muss. Nach dem ersten Mal wird das Datum mit "d/m/yy" und erst das zweite Mal im gewünschten Format "dd.mm.yy" angezeigt.
Was muss ich än...
15.09.2008 11:41:00
Thread-ID: 1009737
6 Beiträge
Umwandeln in Zahlen mit VBA
Bernhard

Hallo liebe Excel-Experten,
heute brauche ich Eure Hilfe für folgendes Problem: Ich importiere Daten aus einer anderen Anwendung nach Excel und ich bekomme die Zahlen als Text formartiert. Die Zahlen sehen z.B. wie folgt aus: 4.75m, was als Zahl 4750000 entspricht. Ist es mit einem VBA-Code...
25.11.2008 13:46:12
Thread-ID: 1027705
4 Beiträge
Text in Zahlen umwandeln
u_hoernchen

Ich habe eine Spalte in Excel, in der vereinzelt Zellen sind, in denen Zahlen als Text formatiert sind. Da ich diese Zahlen für die weitere Verwendung als Werte haben muss und ich das dann relativ oft umfrickeln muss (ist leider ein Download aus einem Vorprogramm), frage ich mich, ob es ggf. ei...
26.11.2008 11:09:00
Thread-ID: 1027963
4 Beiträge
TextBox Komma in Punkt umwandeln
Heinz

Hallo Leute
Wie kann ich bitte,wenn in Textbox6 ein Komma eingegeben wird, das es automatisch auf Punkt wechselt ?
Gruß
Heinz
28.01.2009 17:42:00
Thread-ID: 1044650
3 Beiträge
TEXT in Tabelle umwandeln
Martin

Liebe Forumteilnehmer,
möchste aus einem TEXT in WORD der bestimmte wiederholte, standardisierte Abschnitte - in diesem fall Name, Vorname, Geb-Datum, eine Tabelle generieren. Geht das mit einem Makro aus Excel heraus?
Danke
Martin
02.02.2009 17:26:48
Thread-ID: 1046338
4 Beiträge
Text in Tabelle umwandeln
Martin

Hallo Formusteilnahmer,
hate vor eingen Tagen schon mal eine Anfrage diesbezüglich gestellt und versuche sie nun präziser zu formulieren.
Ich muss aus mehreren 10 Seiten Volltext Daten herausziehen und in eine Tabelle packen. Es geht dabei um Name, Vorname Geburtsdatum. Habe einen Beisp...
08.02.2009 16:55:14
Thread-ID: 1048374
3 Beiträge
Datum in Textbox in eine Zahl umwandeln
TCO99

Hallo zusammen,
ich habe folgendes Problem.
In einer Spalte einer Tabelle befinden sich Datumsangaben. Ich filtere diese Liste nach einem Datum. Dieses Datum wird vor der Filterung in eine Textbox eingegeben. Als richtiges Datum fuktioniert die Filterung aber nicht mehr. Da habe ich ei...
26.02.2009 23:31:12
Thread-ID: 1054555
15 Beiträge
Text-String in Datumszahl umwandeln
MBorn

Hallo,
weiß jemand, wie ich einen Textstring ("27.02.1999") in die
passende Datumszahl (36218) umwandeln kann?
Danke,
Born
03.03.2009 13:16:27
Thread-ID: 1055953
4 Beiträge
Text-String in Datumszahl umwandeln
MBorn

Hallo,
weiß jemand, wie ich einen Textstring ("27.02.1999") in die
passende Datumszahl (36218) umwandeln kann?
Interessanterweise funktioniert das in Excel mit Ganzzahl(Datumsstring),
aber in VBA klappt int(Datumsstring) nicht.
Danke,
Born
03.03.2009 13:18:24
Thread-ID: 1055955
2 Beiträge
löschen des ASCII codes 39 aus einer datenbank
HeinzS


Hallo zusammen,
ich bekomme seit einer Woche immer Downloads (*csv) aus einem Web basierenden Programm. Diese Daten werden von mir entweder in Excel oder Access weiterverarbeitet. Leider ergibt sich ein Problem, nämlich, daß bei jedem Textfeld am Schluß das Zeichen ' (ASCII Code 39) hi...
04.03.2009 08:04:57
Thread-ID: 1056162
4 Beiträge
Zahlen in Text umwandeln
Thomas

Liebe Excelianer
Ich fülle per Excel ein Formular aus, welches ich anschliessend auf einen Check drucke. Darauf gibt es ein Feld mit einem Total, welches unten in Textform übertragen werden muss (Betrag in Worten).
Was kann ich tun, damit diese Zahl automatisch in Buchstaben umgewandelt...
01.04.2009 23:23:30
Thread-ID: 1066161
16 Beiträge
Textformat in Zahl umwandeln
Josef

Hallo!
Ich habe in einer Spalte textformatierte Zahlen mit führenden Nullen stehen.
Wie kann ich ohne Hilfsspalte (z.B. =A2*1) die führenden Nullenden in der Spalte wegbringen, damit eine Zahlenformatierung vorhanden ist?
z.B. 00013,80 = 13,80
Danke
Josef
09.07.2009 11:34:12
Thread-ID: 1087382
6 Beiträge
Anzeige

Infobox / Tutorial

HEX Code in ASCII umwandeln

Schritt-für-Schritt-Anleitung

Um HEX-Code in ASCII in Excel umzuwandeln, kannst du eine benutzerdefinierte Funktion (UDF) verwenden. Diese Funktion ermöglicht es dir, den HEX-String aus einer Zelle zu konvertieren. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

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

    Function HexInText(Hexa$)
   Dim arrAlt, arrNeu, cnt
   arrAlt = Split(Hexa)
   For cnt = 0 To UBound(arrAlt)
       arrAlt(cnt) = ChrW(WorksheetFunction.Hex2Dec(arrAlt(cnt)))
   Next
   HexInText = Join(arrAlt)
End Function

  4. Schließe den VBA-Editor.

  5. Gehe zurück zu deiner Excel-Tabelle. Wenn dein HEX-Code in Zelle A1 steht, gib in Zelle A2 folgende Formel ein:

    =GLÄTTEN(HexInText(A1))

Jetzt wird der ASCII-Text in Zelle A2 angezeigt.

Häufige Fehler und Lösungen

  • Fehler: #NAME?
    Dieser Fehler tritt auf, wenn die Funktion nicht erkannt wird. Stelle sicher, dass du den VBA-Code korrekt eingegeben hast und die Datei als .xlsm (Makro-fähig) gespeichert ist.

  • Fehler: Ungültiges Zeichen
    Achte darauf, dass der HEX-Code in Zelle A1 korrekt formatiert ist und keine ungültigen Zeichen enthält.

Alternative Methoden

Falls du keine VBA-Funktion verwenden möchtest, kannst du auch die Formel =ZEICHEN(HEXINDEZ(A1)) verwenden. Allerdings funktioniert dies nur, wenn du die einzelnen HEX-Werte in separaten Zellen hast. Eine Kombination von Excel-Funktionen ist ebenfalls möglich, jedoch nicht so effizient wie die UDF.

Praktische Beispiele

Angenommen, du hast folgenden HEX-Code in Zelle A1:

53 54 41 39 30 35 35 36 39 37 34 34 4B 30 30 30 30 30 30 30 30 20 20 20 20

Nach Anwendung der oben genannten Schritte wird das Ergebnis in Zelle A2 wie folgt aussehen:

STA905569744K00000000

Tipps für Profis

  • Nutze die Funktion GLÄTTEN, um überflüssige Leerzeichen aus dem Ergebnis zu entfernen.
  • Experimentiere mit weiteren Excel-Funktionen wie TEXTKETTE, um den ASCII-Text weiter zu formatieren.
  • Wenn du oft mit HEX und ASCII arbeitest, speichere deine UDF in einer persönlichen Makrobibliothek, so dass du sie in jedem Projekt verwenden kannst.

FAQ: Häufige Fragen

1. Wie kann ich ASCII-Code in HEX umwandeln?
Verwende die Funktion =DEC2HEX(ASC(A1)), um den ASCII-Code in HEX umzuwandeln.

2. Funktioniert dies in allen Excel-Versionen?
Ja, die beschriebenen Methoden sollten in den meisten modernen Excel-Versionen funktionieren, solange Makros aktiviert sind.

3. Gibt es eine Möglichkeit, mehrere HEX-Codes gleichzeitig zu konvertieren?
Ja, indem du die UDF in Kombination mit anderen Excel-Funktionen und einem Array von HEX-Codes verwendest.

Beliebteste Forumthreads (12 Monate)

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