Invalid Outside Procedure (VBA)

Bonjour!

J'essaie d'appliquer une fonction dans un gros projet de type

Option Explicit
Private Declare Function ma_fonction Lib "C:/toto/mon_fichier.dll" ( variables ....)

Je veux que le string utilisé pour mon fichier d'entrée mon_fichier.dll soit la variable link suivante

Si C:/toto/mon_fichier.dll existe alors link=C:/toto/mon_fichier.dll

Sinon link=C:/tata/mon_fichier.dll

Par contre je sais pas quelle syntaxe utiliser.. J'essaie de la manière suivante :

Option Explicit
Public  link As String = "C:/tata/mon_fichier.dll"
Public link2 As String = "C:/toto/mon_fichier.dll "

If Len(Dir(link2)) > 0 Then
    link = link2
End If

Private Declare Function ma_fonction Lib link (....)

Sans succès...

Bonjour,

pour initialiser ta variable link to dois mettre le code dans une procédure. essaie en les mettant dans

workbook_open de thisworkbook.

je ne suis pas sûr que tu puisses utiliser une variable dans l'instruction Declare function.

Rechercher des sujets similaires à "invalid outside procedure vba"