Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
ExcelMakro aus PP ansteuern, ausführen & Diagramme aktua
zurück: Animationsgeschwindigkeiten für bestimmten Animationstyp änd weiter: Verknüpfungen/Bilder aktualisieren Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
LK
Gast


Verfasst am:
11. März 2014, 14:12
Rufname:


ExcelMakro aus PP ansteuern, ausführen & Diagramme aktua - ExcelMakro aus PP ansteuern, ausführen & Diagramme aktua

Nach oben
       Version: Office 2007

Hallo miteinander,

ich sitze jetzt schon einige Zeit an folgendem Problem:

Es gibt ein Excel Sheet mit Pivot Tabellen - aus diesen Pivottabellen werden dann Diagramme erstellt ( ziemlich viele). Per Knopfdruck und Datumseingabe werden Zeiträume für die Auswertung angegeben, sodass man immer einen bestimmen Zeitraum im Blick hat.

Diese Makros sehen so aus:

Sub Haupt_Zeitraum()

a = InputBox("Patentneuanmledungen im Zeitraum vom [Format: dd.mm.yyyy]", "Eingabe")
b = InputBox("Bis zum [Format: dd.mm.yyyy]", "Eingabe")
Worksheets("Hauptkategorien").PivotTables("Hauptkategorien").PivotFields("Veröffentlichung"). _
ClearAllFilters
Worksheets("Hauptkategorien").PivotTables("Hauptkategorien").PivotFields("Veröffentlichung"). _
PivotFilters.Add Type:=xlDateBetween, Value1:=a, Value2:= _
b
End Sub


oder halt ohne die spezielle Eingabe und nur aktuelles Jahr oder alle Jahre.

Die Diagramme sind in einer Powerpointpräsentation verknüpft. Wichtig ist also eigentlich nur die Präsentation. Wunsch ist, dass man die Präsentation öffnet und ohne das Excel sheet öffnen zu müssen hier alles machen kann. Also die Datenbank aktualisieren, die Pivotfelder filtern und dabei gleich auch immer die Diagramme mit aktualisieren (ich hoffe das Problem wurde klar).

Mein Problem ist jetzt, wie ich die Makros im Excel ansteuern kann und dass diese auch wirklich ausgeführt werden. Mein Code läuft zwar durch - aber verändern tut sich in der Excel Datei überhaupt nichts. Sad

Hier also mal mein Code und vielleicht hat ja jemand von euch eine Idee. Dieses Makro ist erst einmal nur für das Zeitraummakro geschrieben, aber wenn ich das zum Laufen bekomme sollte es auch mit den anderen klappen.

Schön wäre hierbei auch noch, wenn man im Powerpointmakro zum Daten eingeben aufgefordert wird und diese dann in das Excel Filter makro mit einfließen könnten

Sub Excel_Makro()
Dim strWorkbook As String
Dim appExcel As Object
Dim sWorkbook As Object
Dim sPfad As String
Dim sFile As String
Dim sMacro As String

sPfad = "Dateipfad"
sFile = "name.xlsm"
sMacro = "Zeitraum"
strWorkbook = sPfad & "\" & sFile

'ExcelObject erstellen
Set appExcel = CreateObject("Excel.Application")

'datei öffnen
appExcel.Workbooks.Open strWorkbook

Set sWorkbook = appExcel.Workbooks(sFile)

'Macro starten
Call appExcel.Run(sFile & "!" & sMacro)


End Sub
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Powerpoint Präsentationen: Diagramme animieren 4 Dagmar GP 199 24. Jul 2013, 10:07
Dagmar GP Diagramme animieren
Keine neuen Beiträge Powerpoint Präsentationen: Video einblenden/einfliegen lassen & anschließend abspie 1 Mikalino 391 14. März 2013, 16:00
Ute-S Video einblenden/einfliegen lassen & anschließend abspie
Keine neuen Beiträge Powerpoint Präsentationen: HILFE!! Ich kann keine Diagramme mehr erstellen und öffnen 1 Gast 23 586 27. Jan 2012, 21:17
Gast 23 HILFE!!  Ich kann keine Diagramme mehr erstellen und öffnen
Keine neuen Beiträge Powerpoint Präsentationen: Exe in Powerpoint automatisch ausführen 5 Joken74 8373 11. Dez 2011, 17:53
Ute-S Exe in Powerpoint automatisch ausführen
Keine neuen Beiträge Powerpoint Präsentationen: Diagramme in Powerpoint kopieren 1 Kerst!n 198 24. Aug 2011, 14:26
Schennielein Diagramme in Powerpoint kopieren
Keine neuen Beiträge Powerpoint Präsentationen: Diagramme in ppt 2010 modifizieren 1 jan_1982 702 08. Aug 2011, 15:18
Ute-S Diagramme in ppt  2010 modifizieren
Keine neuen Beiträge PowerPoint VBA (Makros): Addin nur mit bestimmten ppt Dateien ausführen 1 911turbo 579 22. Jun 2010, 21:51
hw Addin nur mit bestimmten ppt Dateien ausführen
Keine neuen Beiträge Powerpoint Präsentationen: Diagramme animiert vergrößert einblenden 0 Broiler 482 23. Apr 2009, 11:41
Broiler Diagramme animiert vergrößert einblenden
Keine neuen Beiträge Powerpoint Präsentationen: Diagramme die aus Excel komme können nicht bearbeitet werde 0 seppel19 2017 19. Feb 2009, 11:48
seppel19 Diagramme die aus Excel komme können nicht bearbeitet werde
Keine neuen Beiträge Powerpoint Präsentationen: Transparenz und Diagramme, Major Powerpoint Bug! 3 Gast 2902 15. Jan 2009, 19:11
Gast Transparenz und Diagramme, Major Powerpoint Bug!
Keine neuen Beiträge PowerPoint VBA (Makros): Excel-Tabelle aus Powerpoint aufrufen und ansteuern 3 Michael_85 1298 10. Jan 2009, 00:09
Miichael_85 Excel-Tabelle aus Powerpoint aufrufen und ansteuern
Keine neuen Beiträge Powerpoint Präsentationen: Animierte Diagramme unsauber beschriftet 0 whoppy60 780 10. Okt 2008, 11:21
whoppy60 Animierte Diagramme unsauber beschriftet
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: CSS Forum