Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Binärdatei schreiben...

Forumthread: Binärdatei schreiben...

Binärdatei schreiben...
PflegelT
Hallo ihr Excel-Profis!
Ich möchte eine Binärdatei aus den Zellen A3, B4 und C6 schreiben.
Ich möchte sie dann aber bei Bedarf auch wieder einlesen, aber wie mache ich dies?
Danke schon mal
PflegelT
Anzeige

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

Betreff
Benutzer
Anzeige
Noch offen
30.04.2004 01:29:00
PflegelT
Das wars nicht was ich wollte... Ich wollte binäre Dateien auf die Festplatte schreiben, aber trotzdem Danke!
Anzeige
AW: Binärdatei schreiben...
Kurt
Wo ist das Problem(VBA gut?)
Open "Datei.dat" For Binary As #1
schreiben mit Put, lesen mit Get
Kurt
Danke
30.04.2004 13:49:02
Torben
.
;
Anzeige

Infobox / Tutorial

Binärdatei in Excel schreiben und lesen


Schritt-für-Schritt-Anleitung

Um eine Binärdatei in Excel zu schreiben und wieder einzulesen, kannst du die Programmiersprache VBA (Visual Basic for Applications) verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

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

  2. Füge ein neues Modul hinzu: Klicke im Menü auf Einfügen > Modul.

  3. Kopiere folgenden Code in das neue Modul:

    Sub SchreibeBinärdatei()
        Dim DateiName As String
        Dim DateiNummer As Integer
        Dim Daten(1 To 3) As Variant
    
        ' Werte aus den Zellen A3, B4 und C6 lesen
        Daten(1) = Range("A3").Value
        Daten(2) = Range("B4").Value
        Daten(3) = Range("C6").Value
    
        ' Name der Binärdatei
        DateiName = "Datei.dat"
    
        ' Binärdatei schreiben
        DateiNummer = FreeFile
        Open DateiName For Binary As #DateiNummer
        Put #DateiNummer, , Daten
        Close #DateiNummer
    End Sub
    
    Sub LeseBinärdatei()
        Dim DateiName As String
        Dim DateiNummer As Integer
        Dim Daten(1 To 3) As Variant
    
        DateiName = "Datei.dat"
        DateiNummer = FreeFile
    
        ' Binärdatei lesen
        Open DateiName For Binary As #DateiNummer
        Get #DateiNummer, , Daten
        Close #DateiNummer
    
        ' Werte in die Zellen schreiben
        Range("A3").Value = Daten(1)
        Range("B4").Value = Daten(2)
        Range("C6").Value = Daten(3)
    End Sub
  4. Führe das Skript aus, um die Daten in die Binärdatei zu schreiben. Du kannst die Subroutine SchreibeBinärdatei ausführen, um die Werte zu speichern, und LeseBinärdatei, um sie wieder einzulesen.


Häufige Fehler und Lösungen

  • Fehler: "Datei nicht gefunden"
    Lösung: Stelle sicher, dass der Dateipfad korrekt ist oder dass sich die Datei im aktuellen Arbeitsverzeichnis befindet.

  • Fehler: "Typen sind nicht kompatibel"
    Lösung: Überprüfe, ob die Daten, die du in die Binärdatei schreibst, dem erwarteten Datentyp entsprechen.


Alternative Methoden

Wenn du keine VBA-Programmierung verwenden möchtest, kannst du auch folgende Methoden in Betracht ziehen:

  • CSV-Dateien: Du kannst die Daten in eine CSV-Datei exportieren und später wieder importieren. Diese Methode ist einfacher, aber nicht so flexibel wie die Verwendung einer Binärdatei.

  • Excel-Datenbank: Du könntest auch eine Excel-Datenbank verwenden, um Daten zu speichern und nach Bedarf abzurufen.


Praktische Beispiele

Hier ist ein einfaches Beispiel, um eine binärdatei zu schreiben und zu lesen, wie zuvor beschrieben. Du kannst den Code anpassen, um mehr oder weniger Daten zu speichern.

Ein Beispiel zur Nutzung:

  • Setze in Zelle A3 den Wert "Test".
  • Setze in Zelle B4 den Wert "Daten".
  • Setze in Zelle C6 den Wert "Speichern".

Nach dem Ausführen der Subroutine SchreibeBinärdatei wird eine Datei namens Datei.dat erstellt, die diese Werte speichert.


Tipps für Profis

  • Fehlerbehandlung: Implementiere eine Fehlerbehandlung in deinen VBA-Skripten, um unerwartete Probleme bei der Dateiverarbeitung zu vermeiden.

  • Flexibilität: Überlege dir, wie du den Code erweitern kannst, um mehr Zellen oder verschiedene Datentypen zu verarbeiten.


FAQ: Häufige Fragen

1. Wie kann ich die Binärdatei an einem anderen Ort speichern?
Du kannst den Pfad im DateiName-Parameter anpassen, z.B. DateiName = "C:\DeinPfad\Datei.dat".

2. Welche Excel-Version benötige ich?
Die beschriebene Methode funktioniert mit Excel-Versionen, die VBA unterstützen, wie Excel 2010 und höher.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige