Export nach Excel mit Überschrift, Farben usw.

[Gerald01]

Hallo,
ich habe hier einen kleinen Bericht mit Access 2002 erstellt der Daten, Überschriften usw. enthält.
Wenn ich den jetzt nach Excel exportiere sind zwar die Daten vorhanden aber das ganze Drumherum fehlt, sieht also komplett anders aus.
Wie kriege ich das hin das die Excel Tabelle genauso aussieht wie mein Bericht?

[DF6GL]

Hallo,

gar nicht.....

Warum in aller Welt willst Du einen Bericht mit demselben Aussehen nach Excel transportieren?

[Gerald01]

Weil ich hier eine Excel Vorlage bekommen habe und mein Chef gerne die Daten von Access so in Excel sehen möchte....
Gibt es eine andere Lösung?

[DF6GL]

Hallo,



Wenn der Bericht beim Ausdruck wie der Excel-Ausdruck aussieht, ist doch der Aufgabe Genüge getan..


Wahrscheinlich sind (Deinem Chef) allgemein die unterschiedlichen Einsatzgebiete von Access, Excel und Word nicht bekannt...

[Sgl]

Hallo,

naja, für die Anwendungsauswahl hat er ja seine Mitarbeiter..

Es gibt die Möglichkeit eine Excel-Vorlage zu erstellen und in diese den Bericht ausdrucken zu lassen. Dann kannst Du die Vorlage sowie den Bericht exact angleichen. Ich ahb das mal zu anderen Zwecken gemacht.

Die Programmtechnische Umsetzung müsstest Du aber hier im Form erfragen.

VG
SGL

[Gerald01]

Mein Chef ist einsichtig, hab es über Umwege geschafft es einigermaßen hin zu bekommen.
Jetzt habe ich noch das Problem das die Datei immer auf dem Desktop des aktuellen Benutzers gespeichert werden muss.

Habe folgenden Code ausprobiert, aber es passiert nichts. Wenn ich strpfad rausnehme und ihm einen Pfad vorschreibe klappt es.

Dim strpfad As Variant
 
strpfad = CreateObject("Wscript.Shell").SpecialFolders("Desktop")

MsgBox "Die Excel Datei " & Me.Text35 & " wird auf dem Desktop gespeichert    "
DoCmd.OutputTo acReport, "Gewinner", acFormatXLS, strpfad & Me.Text35 & ".xls", False
   

[daolix]

probiers mal so:
DoCmd.OutputTo acReport, "Gewinner", acFormatXLS, strpfad & "\" & Me.Text35 & ".xls", False

[Gerald01]

Hat geklappt! Danke!