Добрый день!
создал макрос через запись на подтягивание данных из файла csv.
Возникает ошибка на этапе ActiveWorkbook.Queries.Add Name. Ругается на имя листа. Если изменить название, данные копируются нормально.
Можно ли как то сделать так, что бы макрос копировал данные на новый лист?
создал макрос через запись на подтягивание данных из файла csv.
Возникает ошибка на этапе ActiveWorkbook.Queries.Add Name. Ругается на имя листа. Если изменить название, данные копируются нормально.
Можно ли как то сделать так, что бы макрос копировал данные на новый лист?
Код |
---|
ActiveWorkbook.Queries.Add Name:="12", Formula:= _ "let" & Chr(13) & "" & Chr(10) & " Источник = Csv.Document(File.Contents(""C:\Users\admin\Desktop\fRF12.csv""),[Delimiter="";"", Columns=139, Encoding=1251, QuoteStyle=QuoteStyle.None])," & Chr(13) & "" & Chr(10) & " #""Повышенные заголовки"" = Table.PromoteHeaders(Источник, [PromoteAllScalars=true])," & Chr(13) & "" & Chr(10) & " #""Измененный тип"" = Table.TransformColumnTypes(#""Повышенные заголовки"",{{""Отчетная дата(DATE1)" & _ """, type text}, {""ИД(ID_ZAEMSCHIKA)"", type text}, {""Фамилия(SURNAME)"", type text}, |