Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 26 След.
Интеграция данных с сайта интернета в Excel
 
Добрый день!

Можно, опишите что у вас не получается.  
Макрос VBA, для создания новых запросов из ИНСТАГРАММА
 
Цитата
johny009 написал:
каждый день добавлять новые запросы, общее количество запросов превышает 1500.
Что-то мне подсказывает, что за такое кол-во запросов вы словите банан на ИГ. Если без пауз.
Но вы попробуйте :)
Макрос VBA, для создания новых запросов из ИНСТАГРАММА
 
Цитата
johny009 написал:
необходимо добавлять запросы из инстаграмма.
Что за запросы?
GET запрос возвращает 403
 
Цитата
Makintosh написал:
В чем может быть проблема?
Проблем, связанных с GET/POST запросами могут быть тысяча и одна тележка.
Все что нужно для понимания проблемы - сам сайт и способы работы с ним(авторизация, аутентификация, токены, куки, etc)

Ошибка 403 говорит о том, что сервис отказывается вас авторизовывать.
Макрос EXCEL Получение данных с сайта, запись в word файл, копирование файлов, запись в таблиц
 
Бюджет?
Что за сайт?

От сайта может сильно зависеть, вольетесь ли вы в обозначенный бюджет.
Получение по API посредством Power Query (BI)
 
Решение вопроса можно ускорить, если вы:

1. Опишете подробности по обоим сайтам, приложив информацию по API(предварительно закрасив логины/ключи)
2. Покажете, что должно быть на выходе в результате
3. Укажете предполагаемый бюджет
Получение по API посредством Power Query (BI)
 
Цитата
runeft написал:
какие есть рабочие варианты
Например - VBA.
Точно могу сказать, глянув сам сайт(который другой)
Объёдинение запросов с разных серверов, Объёдинение запросов с разных серверов
 
Речь идет о таблицах в excel книгах или в SQL БД?
Давайте более развернутое описание проблемы, желательно с файлом примером.
Получение по API посредством Power Query (BI)
 
Обязательно Power BI?
Русские символы в Visual Basic заменены символом вопроса
 
Проблема с кодировкой, попробуйте сей способ - тык
VBA: корректная выборка типа double по ADO из листа excel.
 
Цитата
doober написал:
Эх Олег, Олег.
Действительно, чего это я. Заработался видимо.
А я все смотрю на DecimalSeparator, который выдает запятую)).
По итогу получается, проще всего сделать замену разделителя на системный перед выборкой. Что-то вроде
Код
Columns(1).Replace What:=",", Replacement:="."
Спасибо, Сергей!
Копирование+Вставка карточек с 2Gis (макрос двух данных операций)
 
Что за карточки? Откуда? Пример хоть будет?
VBA: корректная выборка типа double по ADO из листа excel.
 
Здравствуйте, коллеги!

Столкнулся со следующей ситуацией:
делаю выборку select'ом по листу книги и вставляю результат в другой лист, функционал простой:
Код
    Dim SQLConn As Object, Recordset As Object
    Dim i As Integer
    Set SQLConn = CreateObject("ADODB.Connection")
    SQLConn.CursorLocation = 3
    SQLConn.Open "Provider=Microsoft.Ace.OLEDB.12.0; Extended Properties=""Excel 12.0; HDR=Yes;""; Data Source=" & ActiveWorkbook.FullName
    Set Recordset = SQLConn.Execute("SELECT [TypeNum], [TypeStr] FROM [db$]")
    ReDim arr(Recordset.RecordCount - 1, Recordset.Fields.Count - 1)
    i = 0
    Do While Not Recordset.EOF
        arr(i, 0) = Recordset.Fields("TypeNum")
        arr(i, 1) = Recordset.Fields("TypeStr")
        i = i + 1
        Recordset.MoveNext
    Loop
    ThisWorkbook.Sheets("result").Cells(1, 1).Resize(Recordset.RecordCount, Recordset.Fields.Count) = arr
Если в столбце TypeNum тип числовой, то дробные числа при перечислении выводятся как Null.
Если тип столбца текстовый (как в TypeStr), то все ок.

Можно конечно использовать граблю в виде преобразования столбца в текстовый формат, но я хочу понять сей опус.
Куда смотреть?

Ну и по канону, файл с данными во вложении.
Макрос для получения информации с сайта, получения с сайта перечня товаров и цен
 
Vitallic, если вам не к спеху и ваш вопрос не решится в течении пары дней, то пишите в ЛС или на почту(в профиле).
Массовое скачивание XLS файлов с сервиса dadata
 
Добрый.

Вам нужны:
цикл по ячейкам
функция типа WinHttpRequest с методом GET
функция сохранения данных из переменной в файл

Все это есть на форуме, пробуйте. Что-то не получится - пишите, с приведением кода в теме.
Открытие личной книги макросов (PERSONAL) при не закрытом процессе
 
Цитата
Dyomp написал:
Есть программа (на С++, к исходному коду нет доступа), формирует отчет в excel, сохраняет и закрывает excel
Добрый.
А процесс остается висеть, если закрыть программу?
Требуется макрос для приведение таблицы в нужный вид
 
Давайте посмотрим, контакты в профиле
В работе
Файл отправлен, жду оценки и обмена
Обменялись. С ТСом было приятно работать.
Изменено: Oleg Boyaroff - 25 Фев 2020 21:50:38
Бесконечное создание строк VBA. Как остановить?
 
В модуль листа "Опросник".
При условии, что в книге ничего не будет менять в плане заливки и кол-ва строк.
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    Application.ScreenUpdating = 0
    Application.EnableEvents = 0
    Select Case Target.Text
        Case Is = "Первичный рынок"
            If Cells(17, 1).Interior.Color = 5296274 Then
                Rows("14:16").Delete Shift:=xlUp
                Application.CutCopyMode = False
            End If
            Range(Cells(11, 1), Cells(13, 5)).ClearContents
            Cells(11, 1) = "Если подобрал квартиру на ПЕРВИЧНОМ рынке"
            Cells(12, 1) = "ЖК / Застройщик"
            Cells(13, 1) = "ДДУ/ПДКП/ДКП"
            
        Case Is = "Вторичный рынок"
            If Cells(17, 1).Interior.Color = 5296274 Then
                Rows("14:16").Delete Shift:=xlUp
                Application.CutCopyMode = False
            End If
            Range(Cells(11, 1), Cells(13, 5)).ClearContents
            Cells(11, 1) = "Если подобрал квартиру на ВТОРИЧНОМ рынке"
            Cells(12, 1) = "Кто является продавцом: физ/юр. лицо?"
            Cells(13, 1) = "Что из себя представляет дом?"
        
        Case Is = "Рефинансирование"
            If Cells(14, 1).Interior.Color = 5296274 Then
                For i = 1 To 3
                    Rows(14).Insert Shift:=xlDown
                    With Range(Cells(14, 2), Cells(14, 5))
                        .Merge
                        .Borders(xlEdgeLeft).LineStyle = xlContinuous
                    End With
                Next
                Range(Cells(11, 1), Cells(16, 5)).ClearContents
                Cells(11, 1) = "Если это РЕФИНАНСИРОВАНИЕ:"
                Cells(12, 1) = "Залоговый дисконт"
                Cells(13, 1) = "Был ли использован материнский капитал?"
                Cells(14, 1) = "Сделано ли 6 платежей?"
                Cells(15, 1) = "Были ли просрочки за последние 6 месяцев?"
                Cells(16, 1) = "В каком банке ипотека"
            End If
    End Select
    Application.EnableEvents = 1
    Application.ScreenUpdating = 1
End Sub
Путиводитель в Excel, работа с папками и файлами., Нужно завершить проэкт
 
Добрый день!

1. Чтобы понимать объем работ, нужен доступ к VBA проекту. Он под паролем.
2. Какие именно файлы распечатывать? У вас там спектр расширений файлов. Если, скажем, нужно печатать excel книгу, то это получается открывать ее и печатать.
А если это будет .pdf, .sql, .dwg?
3. Каков бюджет под эту задачу?
Шаблон строительной сметы, Есть шаблон сметы в эксель, его нужно улучшить
 
olega-san1, если не договоритесь со skais675,  и никто не возьмется, то смогу посмотреть через пару-тройку дней.
Шаблон строительной сметы, Есть шаблон сметы в эксель, его нужно улучшить
 
Цитата
olega-san1 написал:
Сейчас занят собиранием и структурированием (по категориям) прайсов поставщиков для каталога на сайте.
А не проще будет использовать базу данных, ведь у вас уже есть сайт. Таким образом вы избавитесь от лишних нагрузок на книгу. Информация к размышлению, не претендую.
Получение данных через JSON API в Excel, Как организовать получение данных по API из системы "Мой склад" в Excel
 
Изучить документацию по API https://dev.moysklad.ru/doc/api/remap/1.1/
Обратить внимание на использование аутентификации, без которой не имеет смысла работать.
Выбрать из документации ту часть запроса, который будет соответствовать вашим требованиям.
Воспользоваться POST\GET запросами из вышеперечисленных данных.
Как сделать POST\GET запросы - ищите функции на форуме, тем предостаточно. Одна из них.
Связать таблицу и аккаунт бинанса по api
 
Все_просто, я просто уточнил информацию. Пишите ТСу в личку
Связать таблицу и аккаунт бинанса по api
 
Бюджет?
Скопировать данные со страницы explorer
 
Методом XMLHTTP и Splits
Код
    Encoded = WorksheetFunction.EncodeURL("Россия, Еврейская Аобл, Ленинский р-н, ст Ленинск, ул Красноармейская,д.52")
    With CreateObject("Microsoft.XMLHTTP")
        .Open "GET", "https://indexphone.ru/?search=" & Encoded, "False"
        .SetRequestHeader "Content-Type", "text/html; charset=utf-8"
        .Send
        If .StatusText = "OK" Then
            Response = .ResponseText
            result = Split(Split(Response, "post-search-list-postalcode"">")(1), "</")(0)
            Cells(1, 1) = result
        End If
    End With
CREATEOBJECT("EXCEL.APPLICATION") на компьютере без EXCEL
 
Wiss, проверьте после установки этого SDK, будет ли формировать файл без установленного office.
Программа после экспорта пытается открыть эти файлы?
Нужно разработать скрип для MS Outlook. Есть кто возьмётся?, ЛС
 
oceanpack, добрый день!
Скиньте пожалуйста ТЗ на почту(в профиле), посмотрим.
Выпадающий список - исключить определенные элементы из именованного диапазона
 
Цитата
Sceptic написал:
"Включить новые элементы в фильтр"
Спасибо большое, я вообще как-то про этот параметр забыл. То что нужно.
Выпадающий список - исключить определенные элементы из именованного диапазона
 
Sceptic, спасибо за развернутый ответ, так и предполагал.

Цитата
БМВ написал:
почему срау в сводной не убрать то что лишнее
дело в том, что таблица А периодически пополняется данными и если обновить сводную, ничего не изменится, и чтобы в списке появлись новые данные, необходимо залезать в фильтр и там их выбирать.
Ладно, шаверму можно убрать руками, а что делать с "пусто/blank"? Меня этот вопрос больше всего волнует.

В VBA это конечно можно, хотелось бы стандартными способами.

p.s. что-то у меня ваша формула вызывает ошибку при вставке.
Выпадающий список - исключить определенные элементы из именованного диапазона
 
Jack Famous, благодарю, но мне хотелось бы обойтись без доп. таблиц, напрямую из именованного диапазона, если это возможно.
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 26 След.
Наверх