Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
448to452
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
448to452
448to452
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Exel-Datei als asc Datei sepichern

Exel-Datei als asc Datei sepichern
07.07.2004 16:11:11
Unwissender
Hallo,
ich versuche meine Exel Datei als asc zu speichern - bekomme das aber nicht hin. Gib es da eine Lösung? Bei "speichern unter" hab ich es nicht finden können.

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Exel-Datei als asc Datei sepichern
Frank
Toller Name!
Vielleicht so!!!
----------------

Sub speichern()
Dim Zeit As Date
Dim Dateiname As String
Dim Name1 As String
Dim Name2 As String
Zeit = Time
Name1 = Left(Zeit, 2)
Name2 = Mid(Zeit, 4, 2)
Sheets("Tabelle1").Select
Dateiname = Name1 + "_" + Name2 + "_Hallo"
With Application
.ScreenUpdating = False  'Bildschirm ausschalten
ActiveSheet.Copy  'Blatt in neue Mappe kopieren
.DisplayAlerts = False  'Warnmeldungen ausschalten
ActiveWorkbook.SaveAs Filename:= _
"C:/" & Dateiname & ".asc", FileFormat:=xlText, CreateBackup:=False
ActiveWindow.Close
.DisplayAlerts = True  'Warnmeldungen ein
Range("A1").Select
.ScreenUpdating = True  'Bildschirm wieder einschalten
End With
End Sub

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige