Connexion VBA SAS

Bonjour,

je cherche à lancer un script SAS depuis VBA, voici mon code en dessous :

Option Explicit

Sub ConnexionSAS()

    Dim MonApplication As Object
    Dim Launch As Double

    Set MonApplication = CreateObject("Shell.Application")
    Launch = MonApplication.Open("\\Frcp00ppd0371\cosanalyse\Prod\REP_Reportings\201908_REMUNERATION_VAD\01_Programme\20191104_Rémunération_VAD.egp")

    shell Launch

End Sub

Tout ce passe bien : j'arrive à ouvrir SAS mais pas à l'exécuter (problème au niveau de la ligne sheel Launch).

Merci de votre aide.

Cordialement,

vlad

Bonjour Vlad45,

Une très bonne approche sur l'interaction entre SAS et EXCEL :

http://support.sas.com/resources/papers/proceedings14/1598-2014.pdf

Merci Gérard de votre réponse.

J'ai testé une autre méthode : utiliser un fichier .bat.

Tout se passe bien lorsque je lance ce fichier manuellement mais pas lorsque je passe par VBA. Voici mon code :

Option Explicit

Sub ConnexionSAS()

    Dim MonApplication As Object
    Dim Launch As Double
    Dim Commande As String

    Commande = "\\frcp00ppd0371\COSanalyse\Prod\REP_Reportings\201908_REMUNERATION_VAD\06_Planifaction\Remuneration_VAD.bat"

    Launch = shell(Commande, vbMaximizedFocus)

End Sub

Merci à vous d'avance

Et avec cette nouvelle méthode, obtiens-tu la même chose qu'avec ta méthode précédente?

Gérard,

je pense être proche de la solution. En fait, j'arrive bien à lancer le cmd, néanmoins, il faut qu'il arrive à changer le répertoire courant et c'est ça qui bloque : pas de problème manuellement mais problématique avec mon code VBA actuel.

Merci à vous.

vlad

Changer le répertoire courant : ça, tu peux le faire dans le .bat. Non?