Thema Datum  Von Nutzer Rating
Antwort
Rot PP Sub von außen (R) starten
20.07.2016 10:21:21 tmenke
NotSolved
20.07.2016 10:22:27 tmenke
NotSolved

Ansicht des Beitrags:
Von:
tmenke
Datum:
20.07.2016 10:21:21
Views:
1314
Rating: Antwort:
  Ja
Thema:
PP Sub von außen (R) starten
Hallo zusammen, leider bekomme ich auf stackoverflow keine Antwort auf meine Frage. Vielleicht könnt Ihr mir hier weiterhelfen. Original Post: shell(shQuote(normalizePath("C:/.../VBA_Script.vbs"))). The script VBA_Script should trigger a sub called request_bank, which should open amsgboxwith the value of the variablebank(=J. P. Morgan`). I get the error: Application.Run: Invalid request. Sub or function not defined, Code: 80048240, MS PowerPoint 2013. I just tried all the different Run.-Paths mentioned Run PowerPoint Sub from Excel. I still get the error. I wonder why the same code is working if I run the same Sub in Excel or if I add the rows: Dim PSlide Set PSlide = PPres.Slides(1).Duplicate But that's no clean solution for me. There must be a better way. VBS-Script: Option Explicit CallPMacro Sub CallPMacro() Dim PApp Dim PPres 'Dim PSlide Set PApp = CreateObject("PowerPoint.Application") Set PPres = PApp.Presentations.Open("C:\...\test.pptm", 0, True) 'Set PSlide = PPres.Slides(1).Duplicate PApp.Visible = True PApp.Run "request_bank" PApp.Quit Set PPres = Nothing Set PApp = Nothing End Sub VBA-Code from the Sub request_bank in the test.pptm: Sub request_bank() Dim bank As String bank = "J.P. Morgan" MsgBox ("bank: " & bank) End Sub Habt ihr eine Idee, wie man das reparieren könnte? Vielleicht könnte man das Problem lösen, indem man eine Verzögerung delay beim Kompilieren des Codes erzwingt.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot PP Sub von außen (R) starten
20.07.2016 10:21:21 tmenke
NotSolved
20.07.2016 10:22:27 tmenke
NotSolved