Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
|
Nou pe simpatie:
Alexanndra1994 la Simpatie.ro
 | Femeie
24 ani
Bucuresti
cauta Barbat
24 - 43 ani |
|
|
Mrrrr's Forum (VIEW ONLY)ReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
TRaPModerator
Postari: 960
|
|
Sub Xport()
' make sure you enabled reference to the Microsoft Visual Basic for Applications Extensibility library
Dim objMyProj As VBProject
Dim objVBComp As VBComponent
Set objMyProj = Application.VBE.ActiveVBProject
For Each objVBComp In objMyProj.VBComponents
If objVBComp.Type = vbext_ct_StdModule Then
objVBComp.Export "D:\VBA Modules Backup\" & objVBComp.Name & ".bas"
End If
Next
End Sub
|
Source - Andy Pope
https://www.ozgrid.com/forum/index.php? ... post566706
|
|
| |
|
