Bonjour,

je voudrais écrire dans un fichier texte et je voudrais utiliser ce code pour tester (je n'en suis pas l'auteur) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Sub ecrire_dans_fichier()
    Dim GestionFichier As New Scripting.FileSystemObject
    Dim FichierTexte As Scripting.TextStream
    Set FichierTexte = GestionFichier.OpenTextFile("C:\test\test.txt", ForAppending)
        FichierTexte.WriteLine ("test")
    FichierTexte.Close
    Set GestionFichier = Nothing
End Sub
Or, j'ai un message d'erreur : "Erreur de compilation : Type défini par l'utilisateur non défini"
En faisant de nombreuses recherches sur le net, j'ai vu qu'il pourrait s'agit de Microsoft Scripting Runtime non coché.

Or, le souci est que quand je vais sur Options/Préférences, ce dernier est grisé et je ne peux donc rien activer !
Pour info, je suis sous windows 10 et Excel 2016.

Comment faire pour activer Microsoft Scripting Runtime ?
Merci d'avance,