Supportnet / Forum / Datenbanken

Hallo, ich habe folgende Frage: ich habe einen Makro erstellt, der derezit einen Bericht nach WOrd exportiert und im *.rtf format unter einem Laufwerk abspeichert. Nun möchte ich gerne folgendes: die user, die auf den Bericht zugreifen und exportieren sollen jeweils eine kopie der *.rtf auf ihrem Desktop abgespeichert bekommen. Allerdings scheint mir das Problem, dass jeder User eben einen anderen Pfad zum Desktop hat. Darum dachte ich mir: probier doch mal: C:\Documents and Settings\All Users\Desktop\name.rtf Da bricht der Makro aber ab. Hat da jemánd von euch ne lösung? Vielleicht mit einer Abfrage, wo er speichern soll!? Danke im voraus!

Hilft dir dieser Code-Schnipsel weiter?

Dim Profil, UserDesk As String
Profil = Environ("USERPROFILE")
UserDesk = Profil & "\Desktop\"
MsgBox "Pfad zum Desktop des Users: " & Chr(10) & UserDesk
End Sub

Tut natürlich erstmal nichts außer Zeigen des Prinzips...

Arno

Danke, werde es testen und rumspielen und melde mich dann nochmal!

Hallo!

Wie hast du den Bericht nach Word exportiert. Ich schaffe es (trotz umfangreicher Websuche) nicht vernünftig meinen Bericht der OLE-Objekte (Worddateien mit Bildern) nach Word zu exportieren.

Danke und Gruß
Michael

Füge mal ein Befehlsfeld ein. Der Assistent bietet eine Speicherung des Berichts in eine Word-Datei an.

Der Code, der dabei generiert wird, sieht so aus:
Dim stDocName As String

stDocName = "repÜbersicht"
DoCmd.OutputTo acReport, stDocName

Wenn Du den Cursor auf OutputTo setzt und die F1-Taste betätigst kommst Du in die entsprechende Access-Hilfe und kannst nachsehen, was Du da sonst noch vorgeben kannst.
Gruß
Teddy

• Problem mit Makro in WORD 2003
• speicherort von Desktop ändern