Thema Datum  Von Nutzer Rating
Antwort
09.07.2007 21:57:13 Adler
NotSolved
15.07.2007 19:10:57 Stef_113
NotSolved
Rot Aw:Aw:Dezimal in Hexa (VBA-Excel)
 15.07.2007 23:45:29 Adler
NotSolved

Ansicht des Beitrags:
Von:
Adler		 Datum:
15.07.2007 23:45:29		 Views:
996		 Rating:
     
Antwort:
  Ja
Thema:
Aw:Aw:Dezimal in Hexa (VBA-Excel)
Servus Stef,

du hast mir schon ein großes Stück weitergeholfen...Danke. Wie du sicher schon bemerkt hast, ist das eine Aufgabenstellung meines Dozenten. Und genau in dieser Aufgabenstellung steht eine "Dezimalzahl" welche wäre : "0-65536". Ich geh davon aus, dass ich diese Aufgabenstellung gelöst hab, wenn das Programm diese Zahl in eine Hexadezimalzahl umwandelt?! Unter einer Dezimalzahl versteh ich etwas anderes, aber vielleicht hab ich da auch nicht an alles gedacht, was man mit VBA machen kann. Muss ich da einen "Vorfilter" einfügen, der mir eine MsgBox öffnet, wenn da unsinnige Zahlen eingegeben werden?

Gruß Adler



Stef_113 schrieb am 15.07.2007 19:10:57:

Hi Adler,

Ich hab in der Hilfe die Hex-Funktion gefunden (falls du da nicht auch schon draufgestoßen bist).
Beschreibung für das Programm:
1. Wähle im Visual Basic Editor deine Workbook-Datei aus und Doppel-Klicke unter Microsoft Excel Objekte deine gewünschte Tabelle an, bei der beim öffnen der Dialog erscheinen soll.
2. Ein Codefenster müsste sich rechts öffnen. Oben müsstest du zwei Comboboxen mit "(Allgemein)" und "(Deklarationen)" sehen. Wähle bei der ersten "Worksheet" und bei der zweiten "Activate". Nun müsste in Code-Fenster folgene Anweisung eingefügt worden sein:
-----------------------------------------CODE-------------------------------------------
Private Sub Worksheet_Activate()

End Sub
-----------------------------------------CODE-------------------------------------------
3. Schreibe in die Zeile zwischen "Private Sub Worksheet_Activate()" und "End Sub" deine UserForm-Öfnnen-Anweisung ("DeineUserForm.Show").
4. Nun gehts an die Form. Wenn deine Eingabefelder "TextBox1" und "TextBox2", und dein Button "CommandButton1" heißt, musst du nur in die Click-Ereignis-Routine deines Buttons folgendes schreiben:
-----------------------------------------CODE-------------------------------------------
TextBox2.Value = Hex(TextBox1.Value)
-----------------------------------------CODE-------------------------------------------
Und Voilá. Bei mir klappt es zumindest

Das Diagramm könnte ich hier leider schlecht darstellen.
Ich hoffe ich konnte helfen.
Stefan

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
09.07.2007 21:57:13 Adler
NotSolved
15.07.2007 19:10:57 Stef_113
NotSolved
Rot Aw:Aw:Dezimal in Hexa (VBA-Excel)
 15.07.2007 23:45:29 Adler
NotSolved