Supportnet / Forum / Skripte(PHP,ASP,Perl...)

Hallo! Ich möchte ein Excel-Workbook über ein Makro abspeichern. Der Dateiname und der Pfad soll dabei aus einer anderen Datei übernommen werden. Was muss ich dabei unter ??? eintragen? ActiveWorkbook.SaveAs Filename:= _ "???", FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _ CreateBackup:=False

Hallo

Ersetze "???" mit
Workbooks("Mappe3").Sheets("Tabelle1").Range("A2")
Die Werte innerhalb der Anführungszeichen, also Mappe3, Tabelle1 und A2 mußt Du an Deine Gegebenheiten anpassen.

Gruß

hi all :)

ein beispiel :)

gruss nighty

Option Explicit
Sub makro01()
ActiveWorkbook.SaveAs Filename:=ExecuteExcel4Macro _
("´C:\DeinPfad\" & "[DeineDatei]DeineTabelle" & "´!" & Range("DeineZelle") _
.Address(, , xlR1C1)), FileFormat:=xlNormal, Password:="", _
WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

hi all :)

oder beispiel fuer getrennte zellen von dateiname wie pfad

gruss nighty

A1 = DateiName
A2 = Pfad
C:\temp\ = ort der auszulesenden datei
mappe1 = DateiName
Tabelle1 = das auszulesende sheet

Sub makro01()
ActiveWorkbook.SaveAs Filename:=ExecuteExcel4Macro("´C:\temp\" & "[mappe1]Tabelle1" & "´!" & Range("A2").Address(, , xlR1C1)) & _
ExecuteExcel4Macro("´C:\temp\" & "[mappe1]Tabelle1" & "´!" & Range("A1").Address(, , xlR1C1)), FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub

• Excel: Möglichkeit nach bestmmten Kriterien zu suchen?
• Exel tabelle importieren
• exel datei importieren
• Datei mit VBA öffnen