Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
664to668
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
664to668
664to668
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mappe speichern + kopieren + best. Blatt leeren

Mappe speichern + kopieren + best. Blatt leeren
09.09.2005 15:11:49
Anne
Hallo,
ich würde gern per Makro - so fern das funktioniert - nacheinander eine Datei speichern (Name über Eingabefeld - ist das möglich?), diese dann kopieren und innerhalb eines bestimmten Blattes einen bestimmten Bereich leeren. Ich hab mich selbst schon daran versucht - bin aber gescheitert...
Kann mir jemand helfen?
Gruß,
Anne

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

Betreff
Datum
Anwender
Anzeige
AW: Mappe speichern + kopieren + best. Blatt leere
09.09.2005 15:18:32
Matthias
Hallo anne,

Sub Anne()
Dim fn
On Error Resume Next
fn = Application.GetSaveAsFilename("neu.xls", "Excel-Dateien (*.xls), *.xls")
If fn = False Then Exit Sub '"Abbrechen" geklickt"
'Kopie speichern
ActiveWorkbook.SaveCopyAs Filename:=fn
If Err.Number > 0 Then
Err.Clear
MsgBox "Fehler beim Speichern der Mappe!", vbCritical
Exit Sub
End If
'Bereich leeren:
ActiveWorkbook.Sheets("Tabelle1").Range("B2:C20").ClearContents
End Sub

Gruß Matthias
bin sprachlos! 1000 Dank für die schnelle Hilfe!
09.09.2005 15:25:59
Anne
***
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige