Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.07.2025 16:49:43
16.07.2025 16:28:01
16.07.2025 15:14:00
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Abspeichern als txt klappt nicht

Forumthread: Abspeichern als txt klappt nicht

Abspeichern als txt klappt nicht
27.10.2003 14:12:55
Micha
Hallo habe einen Modul der mir die Tabelle kopiert und ohne VBA Code abspeichert.
Wenn jetzt auswähle ich will es als txt abspeichern dann steht nur wirres Zeug im txt File. Warum?
Es sollte so wie die excel tabelle ausschauen.
Hier der Modul:

Sub Speichern()
Application.ScreenUpdating = False
Cells.Select
Selection.Copy
Workbooks.Add
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Dateiname = Application.GetSaveAsFilename _
("Werkstoffname", "Textdateien (*.txt),*txt,Micrsoft Excel-Dateien (*.xls),*.xls")
ActiveWorkbook.SaveAs Filename:=Dateiname
ActiveWorkbook.Close savechanges:=False
Range("H5").Select
Application.ScreenUpdating = True
End Sub

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Filtype mitgeben?
27.10.2003 14:19:11
Nike
Hi,
versuchs mal so:
ActiveWorkbook.SaveAs Filename:=Dateiname, FileFormat:=xlText

Bye

Nike
AW: Filtype mitgeben?
27.10.2003 14:29:49
Micha
Danke! Klappt!
Weisst du vielleicht noch wie das txt und/oder das xls File das dann gespeichert wird automatisch an eine Email angehängt wird die sich nach dem abspeichern öffen soll?
Anzeige
AW: Filtype mitgeben?
27.10.2003 14:32:51
Nike
Hi,
das hängt wohl vom E-Mail Client ab ;-)
Im Zweifel mal im Excel-FAQ nach Outlook oder so suchen...

Bye

Nike

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige