Copy macros

bhavesh78 · #1 (**permalink**) 02-09-05, 20:05

Hi,

I have a template that holds some standard macros required in all worksheets that our company uses. Is there a way to replicate/copy these macros automatically to a new file when a new file is created.

Thanks.

~BS

DavidCoutts · #2 (**permalink**) 02-11-05, 11:31

what you could do is export your module to a standard location, then just import on creation of a new workbook,

that would probably work well enough, if you want to do this programatically then you would have to program the VBE,
post back if you would like a hand with any of the above
Dave

bhavesh78 · #3 (**permalink**) 02-14-05, 13:48

Is there a way to export the whole project as I have multiple modules ans sheets.

Thanks

~BS

DavidCoutts · #4 (**permalink**) 02-15-05, 07:36

Ok then id suggest putting a folder template together and adding this module to your workbook and running this will pick up all modules from a folder

Code:

Sub addModules()
'uses microsoft visual basic for applications extensibility 5.3
Dim i As Integer
Dim mypath As String

    'get location of files
    mypath = Application.GetOpenFilename
    mypath = Mid$(mypath, 1, InStrRev(mypath, "\"))
    
    'set up an array of your code modules
    With Application.FileSearch
        .NewSearch
        .FileType = msoFileTypeAllFiles
        .LookIn = Application.GetOpenFilename
        .SearchSubFolders = True '(or false)
        If .Execute > 0 Then
            For i = 1 To .FoundFiles.Count
                'import all modules found
                Application.VBE.ActiveVBProject.VBComponents.Import (.FoundFiles(i))
            Next i
        End If
    End With
    
End Sub

Internet Services

Web Development

Digital Marketing

Consumer Tech