Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
804to808
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
804to808
804to808
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datei speichern

Datei speichern
03.10.2006 07:52:14
Stefan
Hallo,
möchte aus einer Exceldatei Daten in eine andere Datei kopieren und zugleich speichern, aber nicht mit dem Namen der Ursprungsdatei, sondern einen Wert aus einer Zelle der Ursprungsdatei, der der neuen Dateinamen sein soll.
Geht so was?
Bitte mit Makrobeispiel.
Danke für Eure Mühe
Gruß
Stefan

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

Betreff
Datum
Anwender
Anzeige
ZU wenig!
03.10.2006 07:56:45
egres
Hi Stefan
das ist zu wenig um etwas damit anfangen zu können!
VBA ist genauer Befehl von... zu...wie...usw...
Man braucht da schon nähere Angaben
AW: Datei speichern
03.10.2006 08:22:34
tina
guten morgen stefan,
evtl. hilft dir dieses makro ja weiter:


      
Sub neue_datei_anlegen()
'    hier gibst du einer variablen den namen
'    unter der die datei gespeichert werden soll
    Dim Dateiname As String
    
'    in A1 steht der name
'    unter der du die neue datei speichen möchtest
    Dateiname =[A1]
    
'    hier wird der bereich makiert,
'    der kopiert werden soll
    Range("A1:B5").Select
    
'    den bereich kopieren
    Selection.Copy
    
'    neue tabelle öffnen
    Workbooks.Add
    
'    kopierten bereich einfügeb
    ActiveSheet.Paste
    
'    hier wird die neue datei gespeichert
'    in diesem beispiel unter C:\hans.xls
'    weil in A1 hans steht.
'    den pfad kannst du ja angleichen
'    und geschlossen
    ActiveWorkbook.SaveAs Filename:="C:\" & Dateiname & ".xls"
    ActiveWindow.Close
End Sub
 


rückmeldung wäre nett
LG Tin@
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige