Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
"MSGraph.Chart.8"
18 views
Skip to first unread message
Helmut Elzer
May 29, 2012, 7:25:16 AM5/29/12
to
Hallo,
ich benutze "MSGraph.Chart.8" um mir in einem Worddokument einige Grafiken
einfügen zu lassen.
Funktioniert auch alles prächtig.
Nur eins stört mich noch, dass die Grafiken während des Einfügens kurz am
Monitor zu sehen sind.
Sobald das Objekt
----oShape =
oWDoc.Bookmarks.Item(Bookmark).Range.InlineShapes.AddOLEObject(ClassType:="MSGraph.Chart.8",
FileName:="", LinkToFile:=False, DisplayAsIcon:=False)
erzeugt wird erscheint auch die Grafik auf dem Monitor
ich kann zwar dann die Grafik ausblenden mit
----oChart.Application.Visible = False
aber das ist mir zu spät
kann hierzu jemand eine Lösung geben
Das ist mein Code in Auszügen
Word.Visible = False
Dim oShape As Word.InlineShape
Dim oChart As Graph.Chart
oShape =
oWDoc.Bookmarks.Item(Bookmark).Range.InlineShapes.AddOLEObject(ClassType:="MSGraph.Chart.8",
FileName:="", LinkToFile:=False, DisplayAsIcon:=False)
oChart = oShape.OLEFormat.Object
oChart.Application.Visible = False
.
.
.
.
oChart.Application.Update()
oChart.Application.Quit()
mit freundlichen Grüßen
Helmut
ich benutze "MSGraph.Chart.8" um mir in einem Worddokument einige Grafiken
einfügen zu lassen.
Funktioniert auch alles prächtig.
Nur eins stört mich noch, dass die Grafiken während des Einfügens kurz am
Monitor zu sehen sind.
Sobald das Objekt
----oShape =
oWDoc.Bookmarks.Item(Bookmark).Range.InlineShapes.AddOLEObject(ClassType:="MSGraph.Chart.8",
FileName:="", LinkToFile:=False, DisplayAsIcon:=False)
erzeugt wird erscheint auch die Grafik auf dem Monitor
ich kann zwar dann die Grafik ausblenden mit
----oChart.Application.Visible = False
aber das ist mir zu spät
kann hierzu jemand eine Lösung geben
Das ist mein Code in Auszügen
Word.Visible = False
Dim oShape As Word.InlineShape
Dim oChart As Graph.Chart
oShape =
oWDoc.Bookmarks.Item(Bookmark).Range.InlineShapes.AddOLEObject(ClassType:="MSGraph.Chart.8",
FileName:="", LinkToFile:=False, DisplayAsIcon:=False)
oChart = oShape.OLEFormat.Object
oChart.Application.Visible = False
.
.
.
.
oChart.Application.Update()
oChart.Application.Quit()
mit freundlichen Grüßen
Helmut
Martin KoWi
May 30, 2012, 4:02:24 AM5/30/12
to
Hast du schon versucht mit:
Application.ScreenUpdating = false
... Chart einfügen, visible = false
Application.ScreenUpdating = true
ansonsten findest du in Office/Word-Gruppen sicher besser Hilfe.
gruß, martin.
Application.ScreenUpdating = false
... Chart einfügen, visible = false
Application.ScreenUpdating = true
ansonsten findest du in Office/Word-Gruppen sicher besser Hilfe.
gruß, martin.
Helmut Elzer
May 30, 2012, 12:41:18 PM5/30/12
to
entschuldige ich habe vergessen zu sagen dass ich das ganze aus VB.net mache
mit freundlichen Grüßen
www.stm-individuell.de
"Martin KoWi" schrieb im Newsbeitrag news:jq4k6f$559$1...@dont-email.me...
mit freundlichen Grüßen
www.stm-individuell.de
"Martin KoWi" schrieb im Newsbeitrag news:jq4k6f$559$1...@dont-email.me...
Thorsten Albers
May 30, 2012, 5:46:04 PM5/30/12
to
Helmut Elzer <helmut...@stm-individuell.de> schrieb im Beitrag
<jq5ijj$522$1...@online.de>...
de.comp.lang.dotnet.vb
wenden, wie Reiner es Dir in
microsoft.public.de.german.entwickler.dotnet.vb empfohlen hat. Dort wirst
Du eher jemanden finden, der sich mit VB.NET besch�ftigt.
--
Thorsten Albers
gudea at gmx.de
<jq5ijj$522$1...@online.de>...
> entschuldige ich habe vergessen zu sagen dass ich das ganze aus VB.net
mache
Dann solltest Du Dich an die Gruppe
mache
de.comp.lang.dotnet.vb
wenden, wie Reiner es Dir in
microsoft.public.de.german.entwickler.dotnet.vb empfohlen hat. Dort wirst
Du eher jemanden finden, der sich mit VB.NET besch�ftigt.
--
Thorsten Albers
gudea at gmx.de
0 new messages