Я записал макрос для импорта файла с разделителями-запятыми CSV
. Это работает. Я попытался отредактировать его так, чтобы он брал файл, определенный во время выполнения, и помещал его в текущий лист в определенной пользователем ячейке.
Код выполняется до оператора with
и останавливается с ошибкой
Недопустимый вызов процедуры или аргумент.
Что не так ??
Sub Macro2()
'
' Macro2 Macro
'
Dim csvFilename As Variant
Dim csvname As String
Dim startcell As String
'
cvFilename = Application.GetOpenFilename(filefilter:="Excel files(*.csv),*.csv", Title:="Enter Source .CSV file")
startcell = ActiveCell.Address
With ActiveSheet.QueryTables.Add( _
Connection:=csvFilename, _
Destination:=Range("A300"))
.FieldNames = True