Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Ausführen eines Octave Skripts aus VBA heraus

Forumthread: Ausführen eines Octave Skripts aus VBA heraus

Ausführen eines Octave Skripts aus VBA heraus
31.07.2019 13:14:02
Timm

Hallo zusammen,
Ich würde gerne ein VBA Skript schreiben welches folgendes erledigt:
Es soll verschiedene Zellinhalte, sowohl character als auch integer, als Input verwenden, um ein Skript in Octave auszuführen.
Das Octave Skript erstellt nach einigen Minuten Berechnung eine .csv Datei und soll anschließend wieder geschlossen werden.
Das Octave Skript zu öffnen funktioniert schonmal, habe eine vorgefertigte

Sub gefunden, auch wenn ich diese nicht vollständig verstehe.
Jetzt muss ich nur irgendwie die Inputparameter an Octave übergeben und das Skript ausführen.
Hier die Möglichkeit zum öffnen des Skripts:

Sub BeliebigeDateiStarten()
Dim strDateiname As String
strOrdner As String
strOrdner = "C:\Users\name\Documents\PFM\"
strDateiname = "PFM.m"
If Dir(strOrdner & strDateiname)  "" Then StarteDatei (strOrdner & strDateiname)
End Sub
Sub StarteDatei(strDateiname)
Dim myShell As Object
Set myShell = CreateObject("WScript.Shell")
myShell.Run strDateiname
Set myShell = Nothing
End Sub

Vielleicht hat ja jemand eine Idee.
Herzlichen Dank für die Unterstützung
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Ausführen eines Octave Skripts aus VBA heraus
31.07.2019 13:29:19
Timm
Hallo zusammen,
Ich würde gerne ein VBA Skript schreiben welches folgendes erledigt:
Es soll verschiedene Zellinhalte, sowohl character als auch integer, als Input verwenden, um ein Skript in Octave auszuführen.
Das Octave Skript erstellt nach einigen Minuten Berechnung eine .csv Datei und soll anschließend wieder geschlossen werden.
Das Octave Skript zu öffnen funktioniert schonmal, habe ein vorgefertigtes
Skript gefunden, auch wenn ich diese nicht vollständig verstehe.
Jetzt muss ich nur irgendwie die Inputparameter an Octave übergeben und das Skript ausführen.
Hier die Möglichkeit zum öffnen des Skripts:
Sub BeliebigeDateiStarten()
Dim strDateiname As String
strOrdner As String
strOrdner = "C:\Users\name\Documents\PFM\"
strDateiname = "PFM.m"
If Dir(strOrdner & strDateiname)  "" Then StarteDatei (strOrdner & strDateiname)
End Sub

Sub StarteDatei(strDateiname)
Dim myShell As Object
Set myShell = CreateObject("WScript.Shell")
myShell.Run strDateiname
Set myShell = Nothing
End Sub

Vielleicht hat ja jemand eine Idee.
Herzlichen Dank für die Unterstützung
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige