Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Gruppierung von Diagramm aus Excel nach Word holen.

Frage Entwicklung VB for Applications

Mitglied: miniversum

miniversum (Level 3) - Jetzt verbinden

26.09.2007 um 10:52 Uhr, 6810 Aufrufe

Wir kann ich eine Gruppierung von Excel nach word kopieren ohne die Exceldatei neu zu öffnen.

Hallo
Ich arbeite mit Office 2003 unter Windows xp pro.
Ich hole in Word per VBA Diagramme aus mehreren Exceldateien.
Die Diagramme sind zum Teil reine Diagramme und zum Teil Gruppierungen mit jeweils einem Textfeld.

Die Diagramme und Gruppierungen hole ich auf diese Weise:

01.
    Set xlWkb = GetObject(PfadmitDatei) 
02.
    xlSaveState = xlWkb.Saved 
03.
    xlWkb.Parent.Visible = True 
04.
    xlWkb.Parent.Windows(1).Visible = True 
05.
    xlWkb.Parent.WindowState = wdWindowStateMinimize 
06.
    xlWkb.Activate 
07.
     
08.
    'Diagramm holen 
09.
    xlWkb.Sheets(Blatt).Activate 
10.
On Error GoTo IsGroup 
11.
    'wenn Diagramm dann kopiere hier 
12.
    xlWkb.Sheets(Blatt).ChartObjects(Dianame).Activate 
13.
    xlWkb.ActiveChart.ChartArea.Copy 
14.
GoTo PasteIt 
15.
IsGroup: 
16.
    'wenn Gruppierung dann kopiere hier 
17.
    xlWkb.Sheets(Blatt).Shapes(Dianame).Copy 
18.
     
19.
PasteIt: 
20.
    'Einfügen 
21.
    Selection.PasteSpecial Link:=False, DataType:=wdPasteEnhancedMetafile, Placement:=wdInLine 
22.
    xlWkb.Saved = xlSaveState
So funktioniert das auch alles mit einem kleinen Schönheitsfehler. Will ich ein reines Diagramm holen geht es ohne Probleme. Will ich allerdings eine Gruppierung holen wird in der Programmzeile inder die Gruppierung kopiert werden soll, also diese:
xlWkb.Sheets(Blatt).Shapes(Dianame).Copy
Die Exceldatei geschlossen und nochmal neu geöffnet. Dies ist sehr nervend, weil die Exceldateien zum Teil 40MB und größer sind wodurch das ganze wesentlich mehr zeit in anspruch nimmt bei Grupierungen als bei reinen Diagrammen.
Kann ich diese Programmzeile durch eine andere, bessere ersetzen die diesen Effekt des schliessens und wieder neu öffnens nicht hat?

Mit freundlichen Grüßen.
miniversum
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
Microsoft Office
gelöst Excel Pdf Datei als Icon Symbol in Word einfügen per Drag and drop? (4)

Frage von Geforce zum Thema Microsoft Office ...

Microsoft Office
Excel ein automatisches Inhaltsverzeichnis wie in Word? (3)

Frage von Server4Alle zum Thema Microsoft Office ...

Microsoft Office
Word Dokument (vorausgefüllte Formulare) aus Excel Tabelle generieren (1)

Frage von Server4Alle zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Ipv4 mieten (22)

Frage von homermg zum Thema Router & Routing ...

Windows Server
DHCP Server switchen (20)

Frage von M.Marz zum Thema Windows Server ...

Exchange Server
gelöst Exchange 2010 Berechtigungen wiederherstellen (20)

Frage von semperf1delis zum Thema Exchange Server ...

Hardware
gelöst Negative Erfahrungen LAN-Karten (19)

Frage von MegaGiga zum Thema Hardware ...