2009-07-17 12 views
0

Ich habe einige VB, die OLE-Objekte automatisch in PowerPoint für mich kopiert. Der Zweck davon ist, dass meine Datenbank Abfragen ausführt und dann Formulare in Diagramme umwandeln. Beim Durchlaufen der verschiedenen Warteschlangen/Formulare bei Open/Close-Events werden die Charts einer Powerpoint-Präsentation hinzugefügt.Wie wird eine Dataset/Abfragetabelle in ein OLE-Objekt umgewandelt?

Ich habe auch parallele Abfragen, die die resultierenden Daten in Datenblattform anzeigen, und ich frage mich, ob es eine Möglichkeit gibt, das in ein OLE-Objekt (wie die Diagramme) zu verwandeln, damit ich diese Sache automatisch hinzufügen kann der Powerpoint zu0.

Die Grundidee ist, dass ich für jede relative Folie (Diagramm mit Daten) in den Notizenbereich des Powerpoints kopiere und einfügen, und ich frage mich, ob es einen besseren Weg gibt, es zu tun?

Der Grund, warum ich nach dieser "OLE Idee/Methode" frage, ist, dass das OLEobject = copy der einzige Weg ist, dieses Ding zu bekommen, um die Powerpoint Seite zu automatisieren (oder, es ist die einzige Art die ich kenne) wie es geht).

Jeder Rat wird immer geschätzt!

Antwort

1

Ich denke, man Code wie folgt verwenden:

DoCmd.OpenForm "FormName", acFormDS 

DoCmd.RunCommand acCmdSelectAllRecords 

DoCmd.RunCommand acCmdCopy 

dann als Tabelle in Powerpoint einfügen.

Eine andere Option wäre, ein Recordset-Objekt zu öffnen und eine Tabelle zu erstellen, die die Zellen ausfüllt.

Bitte beachten Sie diese MSDN link with an example

+0

danke. Ich habe diesen Code schon einmal angeschaut (ich meine den Link vorausgesetzt) ​​und ihn auf meine Datenbank angewendet. Das Problem dabei ist, dass ich gerade visual basic lerne und erst seit etwas mehr als einem Jahr den Zugang zur Arbeit nutze (ich wurde irgendwie dazu gebracht, 4 verschiedene zu verwalten). aber ich habe viel gelernt. das wäre ein großartiges Beispiel für mich, aber ich bin noch nicht gut mit PPT VBA und weiß nicht, wie ich Textfelder dort platziere, wo ich sie haben möchte. Ich habe das obige Beispiel versucht und es hat besser funktioniert! Ich kann sie in meinen Code arbeiten und ... – Justin

+0

fügen Sie einfach eine Datentabelle auf der folgenden Folie ein. Was ich brauche, ist, dass dieser Datensatz im "Notizen" -Abschnitt der relativen Diagrammfolie ist, aber das bringt mir viel näher als das Kopieren/Einfügen einzelner (es gibt 64 so ...). alles was gesagt wird ... Danke! – Justin

Verwandte Themen