Tabelle von unbenutzten Tab-Zeichen aufgeblasen

Forumthread: Tabelle von unbenutzten Tab-Zeichen aufgeblasen

01.04.2008 22:14:08

unbenutzten

Hallo und Hilfe,
ich habe in einem Tabellenblatt meine Datenwerte, die ich als Ausgangsmaterial für meine
Berechnungen brauche, gespeichert. Es sind zwar nicht so viele, aber die Tabelle wurde
dadurch - unüblicherweise - extremst aufgeblasen. Das Blatt enthält ein paar Tausend
Daten und keine einzige Formel.
Als erstes probierte ich Kopieren-Werte einfügen. Gleiche Größe.
Eine Überprüfung des Blattes durch einen Export als Textfile hat ergeben, daß zwischen den
Werten hundert-tausende Tab-Zeichen sind. Suchen-Entfernen in Word führt dazu daß Word
regelmäßig einfriert. Jetzt nervts langsam.
Kann man eine Tabelle in Excel - wie auch immer - von überflüssigem Kram befreien? Durch ein
VBA-Script oder irgend eine kluge Aktion?
Bin für jeden Tipp dankbar,
Born

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tabelle von unbenutzten Tab-Zeichen aufgeblasen

01.04.2008 23:13:00

unbenutzten
AW: Tabelle von unbenutzten Tab-Zeichen aufgeblase

02.04.2008 01:50:55

unbenutzten

AW: Tabelle von unbenutzten Tab-Zeichen aufgeblasen

01.04.2008 23:13:00

unbenutzten

Hallo,
ich weis nicht genau was für Zeichen für dich unnötig sind.
Schau dir mal die Hilfe unter Zeichensatz (0 - 127) und Zeichensatz (128 255) an.
Dieses Makro löscht alle Zeichen von 1 bis 32 in allen Tabellenblättern.
Funktioniert unter Office 2003, unter 2007 kann ich es nicht testen.


Sub LöscheZeichen()
Dim a As Byte, b As Byte
Application.ScreenUpdating = False
For a = 1 To 32 Zeichen 1 bis 32 löschen
For b = 1 To ThisWorkbook.Sheets.Count
Sheets(b).Cells.Replace What:=Chr(a), Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next b
Next a
Application.ScreenUpdating = True
End Sub

Gruß
Tino

AW: Tabelle von unbenutzten Tab-Zeichen aufgeblase

02.04.2008 01:50:55

unbenutzten

Hey Tino,
danke. Werde ich gleich morgen ausprobieren.
Unnötig sind die Zeichen, die die Tabelle aufblasen und Speicher kosten, ohne eine Funktion zu
haben. Ich hab gerade mühsam einige Dutzen tausend Tab-Zeichen über Word aus meiner
Datentabelle rausgelöscht. Das müßte doch auch mit irgendeinem Tool gehen. Dachte ich mir.
Born

Beliebteste Forumthreads (12 Monate)

Tabelle von unbenutzten Tab-Zeichen aufgeblasen

Forumthread: Tabelle von unbenutzten Tab-Zeichen aufgeblasen

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread