Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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, 6929 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?

mfg.
miniversum
Ähnliche Inhalte
Microsoft Office
gelöst Excel Diagramm - Datum wird nicht aktualisiert (10)

Frage von KMP1988 zum Thema Microsoft Office ...

Google Android
gelöst GMail: Gruppierung von Mails (2)

Frage von honeybee zum Thema Google Android ...

VB for Applications
gelöst VBA - Bereich von Excel nach Word kopieren (6)

Frage von schwazza89 zum Thema VB for Applications ...

Viren und Trojaner
gelöst Word und Excel per Mail gesperrt - Alternative? (7)

Frage von Coreknabe zum Thema Viren und Trojaner ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Windows 10
Seekrank bei Windows 10 (18)

Frage von zauberer123 zum Thema Windows 10 ...

Windows 10
Windows 10 Fall Creators Update Fehler (13)

Frage von ZeroCool23 zum Thema Windows 10 ...

Router & Routing
gelöst Getrenntes Routing bei VoIP und Daten (12)

Frage von Hobbystern zum Thema Router & Routing ...