使用 VBA 在记事本中打开 .tbl 文件

Question

我想使用 VBA 在记事本（或记事本++）中打开一个 .tbl 文件。基本上，我有一些 .tbl 文件，我可以将它们拖放到记事本++中进行编辑，我想通过 VBA 来做同样的事情。文件打开后，我可以负责编辑。我只是找不到任何有关使用 VBA.

在记事本中打开非 txt 文件的信息

在 Excel 中打开会破坏格式，所以我想坚持使用文本编辑器。

谢谢！

Answer 1

您可以编写一个简单的 VBA 调用 Notepad++ 的模块：

Sub Button1_Click()
    Dim res As Variant
    Dim fileToOpen As String
    Dim nppPath As String

    fileToOpen = "F:\test.tbl"
    nppPath = "F:\Program Files (x86)\Notepad++\notepad++.exe"

    res = Shell(nppPath & " " & fileToOpen, vbNormalFocus)
End Sub

Answer 2

我没有足够的声誉来评论 Andrea 的代码（对我有用）。为了他人的利益，我确实想指出一件事。我在使用 Andrea 的代码时遇到错误，除非我在 .exe 之后输入 space。除了那个小观察之外，我的答案没有对 Andrea 的答案有任何补充。

Sub OpenInNotepadPP()

Dim FullFilePath       As String

FullFilePath = "C:\FilePath\FileName.txt"

Dim MyTxtFile As Variant

'Note, a single space needs to be placed after notepat++.exe "
MyTxtFile = Shell("C:\Program Files (x86)\Notepad++\notepad++.exe " & FullFilePath, vbNormalFocus)

End Sub

使用 VBA 在记事本中打开 .tbl 文件

Use VBA to open .tbl file in notepad

import

excel

vba

notepad

notepad++