Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 12:38:40
Formeländerung durch Wechsel von Excel 2021 auf 2019
24.04.2024 12:31:18
Excel - Sverweis mit Wenn-Abfrage kombinieren
24.04.2024 12:16:26
Name von aktuellem VBA-Modul ausgeben
24.04.2024 12:07:15
Werte einer Liste vergleichen und markieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
812to816
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
812to816
812to816
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Bytes des Tabelleninhaltes errechnen

Bytes des Tabelleninhaltes errechnen
31.10.2006 23:32:17
Jürgen
Hallo Leute,
ich möchte den Tabelleninhalt als txt abspeichern. Der Tabelleninhalt besteht aus allem einschließlich Lehrzeichen, was die Tastatur hergibt.
Vor dem Speichern möcht ich jedoch feststellen, welche Größe in Bytes die gespeicherte txt danach haben wird.
Hat da jemand etwas in der Schublade?
Gruß
Jürgen

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bytes des Tabelleninhaltes errechnen
31.10.2006 23:48:36
MichaV
Hallo,
1 Zeichen = 1 Byte. 

Sub bla()
Dim strText As String
Dim strInhalt As String
strText = Join(Array("Ich", "bin", "ein", "Text"), vbCrLf)
Open "test.dat" For Binary As #1
Put #1, , strText
Close #1
Open "test.dat" For Binary As #1
MsgBox "Die Größe der Datei ist " & LOF(1) & " Bytes." & vbCrLf & _
"Das entspricht genau der Länge des Textes, denn der hat " & Len(strText) & " Zeichen." & vbCrLf & _
"(Zeilenumbruch- Steuerzeichen nicht vergessen mitzuzählen!)"
Close #1
End Sub

Gruß- Micha
PS: Rückmeldung wäre nett.
Anzeige
AW: Bytes des Tabelleninhaltes errechnen
01.11.2006 00:04:08
Jürgen
Hallo Micha,
danke für die schnelle Antwort.
Wenn ich das richtig verstanden habe, fragst Du die Bytes in der txt ab.
Ich aber möchte vorher schon inder xls-Tabelle, die ich erst noch als txt abspeichern will, feststellen, wieviel Bytes sie dann später in der txt haben wird.
Oder habe ich dein Listing falsch verstanden?
Gruss
Jürgen
AW: Bytes des Tabelleninhaltes errechnen
01.11.2006 00:14:59
MichaV
Hallo,
;o) ich sag mal, nicht ganz zu ende gedacht.
Schreibe das, was Du (später) in eine Textdatei schreiben willst, in eine String- Variable. Neue Zeilen beginnst Du mit vbCrLf (denn das sind auch 2 Zeichen/Bytes, die mitzählen). Hier kannst Du ganz schön die Join- Funktion nutzen.
Die Länge der Variable ist die Größe der (zu erstellenden) Textdatei in Bytes.
Mit der Put- Anweisung schreibst Du die Variable dann ganz fix in eine Datei, wenn Du sie vorher als Binary öffnest.
Gruß- Micha
PS: Rückmeldung wäre nett.
Anzeige
AW: Bytes des Tabelleninhaltes errechnen
01.11.2006 00:54:03
Jürgen
Hallo Micha,
naja, wie man "Len" einsetzt, war mir ja schon bekannt. Das sich die Bytes aber auch in dem Bereich bewegen, habe ich nicht geglaubt.
Bei Len = 65000 (einschließlich vbCrLf) ist die Datei später aber doch noch etwa 50 Bytes größer. Da kommt sicherlich noch einiges in der txt Dateiverwaltung dazu.
Mal sehen ob man das noch näher an den realen Wert heranbringen kann.
Danke für deine Mühe
und Grüße aus Nds
Jürgen
AW: Bytes des Tabelleninhaltes errechnen
01.11.2006 23:13:31
MichaV
Hallo,
kann es ein, daß Du Deine Zeichen falsch zählst? Ein Zeichen ist ein Byte, 65000 Zeichen sind 65000 Byte:

Sub bla65000()
Dim strText As String
Dim strInhalt As String
strText = String(65000, "@")
Open "test.dat" For Binary As #1
Put #1, , strText
Close #1
Open "test.dat" For Binary As #1
MsgBox "Die Größe der Datei ist " & LOF(1) & " Bytes." & vbCrLf & _
"Das entspricht genau der Länge des Textes, denn der hat " & Len(strText) & " Zeichen." & vbCrLf & _
"(Zeilenumbruch- Steuerzeichen nicht vergessen mitzuzählen!)"
Close #1
End Sub

Userbild
Falls Du den Unterschied zwischen "Dateigröße" und "Größe auf dem Datenträger" meinst, dann duck mal hier: https://www.google.de/search?hl=de&q=gr%C3%B6%C3%9Fe+auf+datentr%C3%A4ger&btnG=Google-Suche&meta=
Gruß- Micha
PS: Rückmeldung wäre nett.
Anzeige
AW: Bytes des Tabelleninhaltes errechnen
01.11.2006 23:37:50
Jürgen
Hallo Micha,
danke, dass Du dich der Frage noch einmal angenommen hast.
## "kann es ein, daß Du Deine Zeichen falsch zählst? Ein Zeichen ist ein Byte, 65000 Zeichen sind 65000 Byte"
Ja, das ist möglich.
Ich werde mich also wohl mal etwas mit dem von dir angegebenen Link beschäftigen müssen.
Wie gesagt, kam es mir darauf an, ob eine Datei, die nach dem Einladen nicht geändert und wieder gespeichert wurde, danach noch die gleiche Größe hat.
Danke nochmals für deinen Hinweis.
Gruß
Jürgen
AW: Bytes des Tabelleninhaltes errechnen
02.11.2006 02:11:53
Jürgen
Hallo Micha,
alles gelesen, geprüft, getestet und somit auch erleigt.
Funktioniert alles mit den richtigen Ergebnissen.
Danke nocheinmal
Gruß
Jürgen
Anzeige

303 Forumthreads zu ähnlichen Themen

Pivot berechnetes Feld
Peter

Hallöchen zusammen,
entweder stelle ich mich zu dämlich an, oder ich kapiere die Pivot wirklich nicht.
Habe eine Tabelle, aus der ich mir die Daten ziehe.
In die Datenfelder der Pivot kommt die gesamte Anzahl von Datensätzen.
In die Spaltenfelder die Differenzierung eines bestim...
15.08.2008 10:34:52
Thread-ID: 1002088
4 Beiträge
Anzeige
Daten sortiert aus anderem Tabellenblatt auslesen
Robert

Hallo,
bräuchte eure Hilfe bitte.
Aus einem Tabellenblatt ("FEHLZEITEN") sollen Daten ausgelesen und in einem anderen Tabellenblatt ("EINSATZPLANUNG") ab Zeile 100 eingefügt und bei Änderungen in "FEHLZEITEN" aktualisiert werden.
Habe da mal eine Beispieldatei zur besseren Veransch...
28.08.2008 11:32:00
Thread-ID: 1005356
3 Beiträge
Datenbereich dynamisch in Pivot-Tabelle einbinden
Markus

Hallo allerseits,
ich habe folgendes Problem. Für die Erstellung einer Pivot-Tabelle muß ich den Datenbereich manuell selektieren. Da sich aber mein Datenbereich ständig ändert, würde ich das ganze automatisiert selektieren lassen. Wie krieg' ich das in dem folgenden Makro unter ?:
Rang...
02.09.2008 14:20:30
Thread-ID: 1006792
4 Beiträge
Anzeige
Berechnung in dynamischer Tabelle
Gerhard

Hallo zusammen,
Ich möchte in meiner dynamischen Tabelle in der Spalte G die Differenz von dem letzten Eintrag der SpalteD zum letzten Eintrag der Spalte F eintragen.
Beispiel:
Der Inhalt meiner Tabelle endet momentan bei D100
dann sollte via Makro die Differenz in Spalte G100 z...
15.09.2008 08:39:00
Thread-ID: 1009658
9 Beiträge
Daten aus Pivot-Tabelle kopieren
Thomas

Guten Abend ,
wie kann ich per Schaltfläche einen Datenbereich aus einer Pivottabelle kopieren und in einem anderen Tabellenblatt einfügen?
Gruß
Thomas
03.10.2008 21:10:24
Thread-ID: 1014090
2 Beiträge
Pivot-Tabelle SVERWEIS-Formel
Susi

Hallo liebe Excel-Freunde,
ich habe ein Problem mit einer Pivot-Tabelle. In einer bestehenden Pivot-Tabelle kann man ja selbst ein berechnetes Feld einfügen. Solange es nur "einfache" Formeln sind, stellt dies auch kein Problem da. Nun möchte ich aber eine SVERWEIS-Formel, die sich auf Date...
07.10.2008 12:40:03
Thread-ID: 1014686
2 Beiträge
Seitenfeld mit Datum in Pivottabelle
Peter

Hallo zusammen,
ich habe folgendes problem mit einer Pivottabelle:
in den Ursprungsdaten stehen u.a. Datumsangaben. Diese sollen in der Pivottabelle im Seitenfeld verwendet werden. Allerdings möchte ich nicht, dass jeder Datumswert dort angezeigt wird sondern eine Zusammenfassung der Mo...
08.10.2008 11:17:51
Thread-ID: 1014965
4 Beiträge
Daten aus einer anderen Mappe auslesen
Uwe

Hallo zusammen, habe mir einen funktionierenden Einsatzplan für 24 MA und 3 Schichten zusammengebastelt welcher die Monate inkl. Feiertage und Wochenenden dynamisch generiert.
Nun möchte ich wenn ich im zum Beispiel den Einsatzplan für die Mitarbeiter für Februar abrechne, das Excel sich...
14.10.2008 22:12:36
Thread-ID: 1016451
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
1
2
3
5
8
1
1
3
4
3
4
2
1
5
3
4
2
3
12
8
2
1
3
3