Run PowerPoint with the exe macro file.

Question

My development environment is Windows 8 64Bit & 10 64Bit, and Visual Studio is 2013.

The VBA file I wrote looks like this:

// source start !!!

Imports PowerPoint = Microsoft.Office.Interop.PowerPoint

Module Module1

    Sub Main(ByVal path() As String)

        Dim oApplication As PowerPoint.Application = Nothing

        Dim oPressentation As PowerPoint.Presentation = Nothing

        Try

            oApplication = New Microsoft.Office.Interop.PowerPoint.Application()

            oPressentation = oApplication.Presentations.Add

            Dim macroPath As String = path(0)

            Dim savePath As String = path(1)

            oPressentation.VBProject.VBComponents.Import(macroPath)

            oApplication.Run("ExportPowerPoint")

            oPressentation.SaveAs(savePath)

        Catch ex As Exception

        Finally

            If Not oPressentation Is Nothing Then

                oPressentation = Nothing

            End If

            If Not oApplication Is Nothing Then

                oApplication = Nothing

            End If

            GC.Collect()

            GC.WaitForPendingFinalizers()

        End Try

    End Sub

End Module

// source end !!!

When the function is executed, it executes the power point and executes the macro.

However, if the power point is executed before executing the function, the function does not work properly when the exe file is executed. The same power point just turns on and ends.

In addition, after executing the function, even if you run the power point on the desktop.