WinSCP配置SFTP连接时引用变量密码的问题求助

错误原因分析 #

• 方案1失败：WinSCP命令行无法直接识别VBA变量&str，必须在VBA中先拼接好完整的连接字符串再传递给WinSCP。
• 方案2的“Constant Expression Required”错误：VBA中Const用于定义常量，常量的值必须是固定表达式，不能用变量str动态拼接字符串。

修正后的VBA代码 #

Sub WinSCP_SFTP_Upload()
    Dim strPassword As String
    Dim cmdWinSCP As String
    
    ' 从Excel单元格A20读取密码
    strPassword = Range("A20").Value
    
    ' 拼接WinSCP命令：VBA中用两个双引号表示一个实际双引号，完成引号转义
    cmdWinSCP = "C:\Program Files (x86)\WinSCP\WinSCP.com /Command " & _
                """open sftp://walvesv:" & strPassword & "@d7lxpsasg01.logistics.cat.com/ -hostkey=""fingerprint"""" " & _
                """put """"本地文件路径"""" """"远程文件路径"""""" " & _
                """exit"""
    
    ' 执行命令，vbNormalFocus可显示命令窗口方便调试
    Shell cmdWinSCP, vbNormalFocus
End Sub

关键注意事项 #

• 替换Const为Dim：用变量存储动态拼接的命令字符串，规避常量的编译限制。
• 引号转义：WinSCP命令中的引号必须在VBA中用""转义，确保命令传递到WinSCP时格式正确。
• 路径替换：将代码中的本地文件路径和远程文件路径替换为实际路径。
• 特殊字符兼容：如果密码包含@、!等特殊字符，WinSCP会自动处理URL编码，无需手动转义。

内容的提问来源于stack exchange，提问作者Onkar