如何在VBA中打开文件并使其成为默认文件

Question

我试图让每次在记事本中打开“python.py”...我已经得到了代码，但是如何将它作为默认值...如果用户想要打开python，那么下一次在记事本中的文件，它应该一直在记事本中使用VBA打开，并且只在代码完成后...请找到下面的代码在记事本中打开一个python文件..

Shell "notepad C:\Users\stackoverflow\Desktop\python.py", vbNormalFocus

Answer 1

您可以尝试将VBA宏附加到执行此操作的按钮。但我不确定这是否是你所要求的。

Sub LetterChecklist()    

Dim strPath As String
Dim strProgram As String

    strPath = "\\aw\data\Letters\2099_Correspondence\Incoming Letters\.pdf"
    strProgram = "C:\Program Files (x86)\Adobe\Acrobat 11.0\Acrobat\Acrobat.exe"

    Call Shell("""" & strProgram & """ """ & strPath & """", vbNormalFocus)


End Sub