小编Max*_*dge的帖子

我想使用 Excel VBA 在 python 中编辑脚本文件，然后在 ArcGis 中运行。首先，我愿意接受任何更简单的方法，但到目前为止，我在使用 VBA 子程序制作多行脚本时遇到了麻烦！

& vbCrLf &在命令中不起作用Fileout.Write。当我打开脚本文件时，所有内容都在同一行。

两者都不起作用& Char(34) &。

Private Sub CommandButton4_Click()
    Dim fso As Object
    Set fso = CreateObject("Scripting.FileSystemObject")
    Dim path As String
    path = Application.ActiveWorkbook.path


    Dim Fileout As Object
    Set Fileout = fso.CreateTextFile(path & "\" & "test2.py", True, True)
    Fileout.Write "import arcpy & vbCrLf & lyr = arcpy.mapping.Layer( & Char(34) & limits & Char(34) &) & vbCrLf & lyr.visible = True & vbCrLf & arcpy.RefreshActiveView()'"
    Fileout.Close …