У меня есть эта функция:
Function GetFullNameCSV() As String
GetFullNameCSV = Replace(ThisWorkbook.FullName, ".xlsm", ".txt")
End Function
Если код выглядит следующим образом:
Filename:= "C:\directory\filename.txt"
Я мог бы просто заменить его на это и получить тот же результат:
Filename:= GetFullNameCSV()
Проблема заключается в том, что она появляется в случае этой строки:
Connection:= "TEXT;C:\directory\filename.txt"
Мне нужно использовать конкатенацию строк, предположив что-то вроде этого:
Connection:= "\"TEXT;+GetFullNameCSV()+\""
Какой код мне нужно использовать? Спасибо.