type this following code in a module to show CorelDraw file path in message box:
Sub showPath()
Dim strFileProperties As String
strFileProperties = "My Active CorelDraw File Folder Location:" & vbNewLine
strFileProperties = strFileProperties & Documents(1).FilePath
strFileProperties = strFileProperties & vbNewLine
strFileProperties = strFileProperties & "My Active CorelDraw File Name: "
strFileProperties = strFileProperties & Documents(1).FileName
MsgBox strFileProperties
End Sub
< Previous Procedure In CorelDraw VBA Editor
Additional Notes you can see the other lesson by click on the following links.
Tidak ada komentar:
Posting Komentar