Bonjour,
J'ai le script ci dessous qui fonctionne en VB dans Excel mais que l'on doit injecter dans un logiciel qui lit directement des scripts en VBS.
Donc j'ai vréé un VBS et je l'ai mis dedant mais j'ai une Erreur de compilation Microsoft VB Script.
En principe, il devrai lancer un menu d'ouverture pour ouvrir un fichier CSV dans EXCEL mais rien n'y fait.
Je ne sais pas d'ou ca viens.
Quelqu'un peut il m'aider svp?
Le code:
Sub Lecture()
Dim fichier As Variant
ChDir ThisWorkbook.Path
fichier = Application.GetOpenFilename("Fichier CSV (*.csv), *.csv")
If fichier <> False Then Workbooks.Open fichier, local:=True
End Sub
Merci
Salutations