Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Getting VBA scripts from Excel worksheets
Message
From
10/04/2017 11:17:18
 
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
01637533
Message ID:
01650009
Views:
64
It's obviously been a long time. This project had gotten shelved and was finally revived. Just wanted to make sure I thanked you properly for the link. I was able to get everything I needed.

And thanks to the UT message archive so that I could come back to it when needed.

..........Rich





>It should be an .xlsm file if it has vba code.
>
>Bill Sutton
>
>
>>Thanks. I had actually seen this link and it didn't work for me. Since you recommended it, I took a closer look and found that I was opening an XLS spreadsheet the didn't have workbook.vbproject.
>>
>>I opened an XLSX file and found the property. I'll see if this code gets me what I need.
>>
>>Thanks again............Rich
>>
>>>Hey Rich
>>>
>>>I think this will help you out.
>>>
>>>http://www.rondebruin.nl/win/s9/win002.htm
>>>
>>>
>>>Bill Sutton
>>>
>>>
>>>
>>>>>>Hi All:
>>>>>>
>>>>>>We have inherited the support of a couple of dozen Excel spreadsheets. These all have a bunch of VBA methods.
>>>>>>
>>>>>>Is there some way we can open the spreadhseets and extract the method code so that we can build a big code database that can be searched
>>>>>>
>>>>>>For example ..... Which methods in which spreadsheets reference a particular drive mapping???
>>>>>> Which methods in which spreadsheets use a specific DSN
>>>>>> etc.
>>>>>>
>>>>>>How can we accumulate the VBA code to do those kinds of searches?
>>>>>>
>>>>>
>>>>>I was sure I'd written something about this, but I can't find it. Regardless, check out the Modules collection in VBA.
>>>>>
>>>>>Tamar
>>>>Thanks for the advice. If you have any pointers or links on how to use this it would help a great deal. So far I've tried
>>>>oXl = CREATEOBJECT('excel.application')
>>>>oWb = oXl.wookbooks.open(GETFILE())
>>>>? oXl.modules.count --> 0
>>>>? oXl.application.modules.count --> 0
>>>>? oWb.modules.count --> 0
>>>>? oWb.application.modules.count --> 0
>>>>
>>>>
>>>>Google hasn't been especially useful for me either.
>>>>
>>>>Anything use can provide will be useful.
>>>>
>>>>Thanks so much.........Rich
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform