Astuces Excel
  1. Astuces Excel
  3. Utilisation de Python pour lire VBA à partir d'une feuille de calcul Excel
Intereting Posts
Transposer un cadre de données tout en préservant les informations de class / type de données Erreur d'exécution Erreur 13 type incompatibilité Excel Remplissez le drop down menu du site Web USPS en utilisant VBA EXCEL Gestion de la compatibilité des macros VBA dans une seule instance Excel Excel: comment utiliser cette formule MAX (IF (ISNUMBER (SEARCH (T $ 2, C2)), Z $ 2) … comme tableau? Obtenez la hauteur de la ligne où les cellules ont un set WrapText L'information apparaît dans une boîte de message, comment puis-je exporter les informations de la boîte de message vers MS Word? Distinguer entre 'Null' et '0' en prenant la sum d'une gamme de colonnes J'ai une list de stock dans excel Envelopper le text de la cellule de table dans Excel exporté dans BIRT Gamme de copy Excel VBA dans datatables filtrées et annexée à la fin du tableau sur une autre feuille de calcul Inclure le script PowerShell dans Excel Excel csv (ms-dos) file séparé par des virgules La meilleure façon de traiter les lists d'adresses e-mail Nom de la feuille dynamic et copy des données

Utilisation de Python pour lire VBA à partir d'une feuille de calcul Excel

J'aimerais écrire un programme VBA diff dans (de preference) Python. Existe-t-il une bibliothèque Python qui me permettra de lire le VBA contenu dans une feuille de calcul Excel?

Voici un rapide et sale boilerplate pour vous aider à démarrer. Il utilise l'object Excel COM (une solution Windows uniquement): 

from win32com.client import Dispatch wbpath = 'C:\\example.xlsm' xl = Dispatch("Excel.Application") xl.Visible = 1 wb = xl.Workbooks.Open(wbpath) vbcode = wb.VBProject.VBComponents(1).CodeModule print vbcode.Lines(1, vbcode.CountOfLines)

Ceci imprime la macro stupide que j'ai enregistrée pour cet exemple: 

 Sub silly_macro() ' ' silly_macro Macro ' ' Range("B2").Select End Sub ' Sub silly_macro() ' ' silly_macro Macro ' ' Range("B2").Select End Sub ' Sub silly_macro() ' ' silly_macro Macro ' ' Range("B2").Select End Sub ' Sub silly_macro() ' ' silly_macro Macro ' ' Range("B2").Select End Sub

Notez que Lines et VBComponents utilisent l'indexing basée sur 1. VBComponents prend également en charge l'indexing par nom de module. Notez également que Excel nécessite des barres obliques dans les paths d'access.

Pour plonger plus profondément, voir Pearson's Programming The VBA Editor . (L'exemple ci-dessus était partagé de ce que j'ai écrémé de là.)

J'ai créé une application qui s'appelle VbaDiff. Si vous lui fournissez deux files Excel, il va comparer le code VBA dans chacun d'eux. Vous pouvez également l'exécuter à partir de la command line ou utiliser la version fournie avec une API si vous souhaitez l'intégrer à vos propres programmes.

Vous pouvez en savoir plus sur http://www.technicana.com/vbadiff-information.html

Chris