Exportation de modules VBA vers des fichiers texte, Excel VBA

Outre l’importation de fichiers texte dans des modules, il existe également une fonction d’exportation de modules dans Excel, avec laquelle vous pouvez enregistrer votre programmation dans des fichiers texte.

Sub EnregistrerModuleVersFichierTexte()
Dim VBComp As Object
Const ExporterFichier = "c:\Monfichier.txt"
On Error Resume Next
Set VBComp = _
ThisWorkbook.VBProject.VBComponents("Module1")
With VBComp
.Export ExporterFichier
End With
End Sub

Utilisez la méthode Export pour enregistrer un composant en tant que fichier texte. Si vous souhaitez transférer un module complet dans un nouveau classeur, exportez-le d’abord dans un fichier texte, insérez un nouveau classeur et exécutez la fonction d’importation. Le tout pourrait alors ressembler à ceci :

Sub CopierModuleNouveauDossier()
Dim s_Fichier As String
With ActiveWorkbook
s_Fichier = .Path & "\Module.txt"
.VBProject.VBComponents("Module1").Export s_Fichier
End With
Workbooks.Add
ActiveWorkbook.VBProject.VBComponents.Import s_Fichier
End Sub

 

 

S’abonner
Notifier de
0 Commentaires
le plus ancien
le plus récent le plus populaire
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x