Hi, ich möchte eine Arbeitsmappe als eine Datei speichern, deren Name ich in einer Zelle hinterlegt habe.
Habe hierfür ein Makro aufgezeichnet - hier ist leider der Dateiname fest hinterlegt.
dim args4(1) as new com.sun.star.beans.PropertyValue
args4(0).Name = "URL"
args4(0).Value = "file:///C:/_temp2/Fahrtenbuch_2001_jb.ods"
args4(1).Name = "FilterName"
args4(1).Value = "calc8"
dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args4())
Wie schaffe ich es, statt "file:///... eine Zellreferenz einzubauen?
Danke für die Hilfe Lupo
Speicherung einer Arbeitsmappe
Moderator: Moderatoren
-
- **
- Beiträge: 32
- Registriert: Mi, 05.12.2012 17:21
Re: Speicherung einer Arbeitsmappe
beispielhaft:
wenn Du nur den systemspezifischen Pfad (C:\_temp2\Fahrtenbuch_2001_jb.ods) in die Zelle schreiben willst, dann:
Gruß
Stephan
Code: Alles auswählen
args4(0).Value = ThisComponent.Sheets().getByIndex(0).getCellRangeByName("A1").FormulaLocal
Code: Alles auswählen
args4(0).Value = ConvertToUrl(ThisComponent.Sheets().getByIndex(0).getCellRangeByName("A1").FormulaLocal)
Gruß
Stephan
-
- **
- Beiträge: 32
- Registriert: Mi, 05.12.2012 17:21
Re: Speicherung einer Arbeitsmappe
Danke Stefan, probiere ich jetzt noch aus und berichte dann.
Hi Stephan, habe den ganzen Abend herumgedocktert und dann festgestellt:
1. So wie Du es geschrieben hast FUNKTIONIERT es – AAAAAAber meine Definition war nicht korrekt - sorry
2. In der besagten Zelle "A1" steht kein Textinhalt sondern eine zusammengesetzte Funktion, z.B. "=links(B1;8)&text(Jahr(C3);2)&".ods"
Und so geht es leider nicht
Irgendwie muß ich dem Makro beibringen, das es den Zelleninhalt als Text interpretiert.
Vielleicht hast Du ja die Lösung
Hi Stephan, habe den ganzen Abend herumgedocktert und dann festgestellt:
1. So wie Du es geschrieben hast FUNKTIONIERT es – AAAAAAber meine Definition war nicht korrekt - sorry
2. In der besagten Zelle "A1" steht kein Textinhalt sondern eine zusammengesetzte Funktion, z.B. "=links(B1;8)&text(Jahr(C3);2)&".ods"
Und so geht es leider nicht
Irgendwie muß ich dem Makro beibringen, das es den Zelleninhalt als Text interpretiert.
Vielleicht hast Du ja die Lösung
Re: Speicherung einer Arbeitsmappe
z.B.:
Gruß
Stephan
Code: Alles auswählen
args4(0).Value = ConvertToUrl(ThisComponent.Sheets().getByIndex(0).getCellRangeByName("A1").String)
Gruß
Stephan
-
- **
- Beiträge: 32
- Registriert: Mi, 05.12.2012 17:21
Re: Speicherung einer Arbeitsmappe
Whouw, danke - und das schon vor 6:ooh - also kurz nach Mitternacht
Wie nicht anders zu erwarten funktioniert das so, wie Du es geschrieben hast!
Mehr brauche ich nicht: jetzt kann ich mit eigenen Parametern Dateien unter einem selbstdefinierten Namen (Url) speichern.
Wie nicht anders zu erwarten funktioniert das so, wie Du es geschrieben hast!
Mehr brauche ich nicht: jetzt kann ich mit eigenen Parametern Dateien unter einem selbstdefinierten Namen (Url) speichern.