macroer i Excel

Programmets navn:

Programmets navn: Excel
Spørgsmål: Goddag, jeg har et spørgsmål om macroer i Excel.

På sidst blade nr. 12/2021, der var ikke noget forklaring om macroer i Excel.

Hvordan gemmer jeg en Excel macro på PC og bruge den på andre Excel dokumenter?

Tak for hjælpen

M.V.H.

Tsion

[email protected]
Spørgsmål:

macroer i Excel.

På sidst blade nr. 12/2021, der var ikke noget forklaring om macroer i Excel.

Hvordan gemmer jeg en Excel macro på PC og bruge den på andre Excel dokumenter?

Hov, det er en dublet. Og så alligevel:

Det nemmeste er som sagt at have en Excel-fil med makroerne, og kopiere den til en anden PC. Det kan også være praktisk at oprette en skabelon med makronerne.

Jeg nævnte en mulighed for at flytte makroer mellem filer. Det kan dette stykke kode gøre:

Sub ExportAndImportModule()
Dim xStrSWSName, xSreDWSName As String
Dim xSWS, xDWS As Workbook
xStrSWSName = “old-workbook”
xSreDWSName = “new-workbook”
Dim xFilePath As String
Dim xObjFD As FileDialog
Set xObjFD = Application.FileDialog(msoFileDialogFolderPicker)
With xObjFD
.AllowMultiSelect = False
.Show
If .SelectedItems.Count > 0 Then
xFilePath = .SelectedItems.Item(1)
Else
Exit Sub
End If
End With
On Error GoTo Err1
Set xSWS = Workbooks(xStrSWSName & “.xlsm”)
Set xDWS = Workbooks(xSreDWSName & “.xlsm”)
Set xvbap = xSWS.VBProject
Set xVBC = xvbap.VBComponents
For Each Module In xSWS.VBProject.VBComponents
If Module.Type = vbext_ct_StdModule Then
Module.Export (xFilePath & “\” & Module.Name & “.bas”)
xDWS.VBProject.VBComponents.Import (xFilePath & “\” & Module.Name & “.bas”)
End If
Next Module
Exit Sub
Err1:
MsgBox “come to nothing!”
End Sub

Hej Henrik

Tak for svaret, det ser ud meget kompliceret med alle symboler, det er bare at når jeg har lavet en makro til en dokument, jeg vil bruge den samme makro på en andre dokumenter og jeg vil bare gemme den på PC’en eller på en USB nøgle. Kan man finde en video om det?

 

Tak for hjælpen

M.V.H.

Tsion (Sion)

Jeg har ikke lige mulighed for at lave en video om det, men:

Hvis du laver et tomt dokument med de nødvendige makroer, kan du kopiere det dokument til den anden PC, og så arbejde videre med det.

Bruger du det ofte, kan det betale sig at gemme projektmappen som skabelon:

https://support.microsoft.com/da-dk/office/gemme-en-projektmappe-som-en-skabelon-58c6625a-2c0b-4446-9689-ad8baec39e1e

Det gør det ganske enkelt at oprette en ny projektmappe med makroerne.