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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 117 След.
Надстройка XLibraryDisplay
 
А разблокировать файл не забыли после скачивания?

Смотрите причины №№ 1,3,5 в этом списке:
https://excelvba.ru/faq/addin_toolbar
Запрос файлов cookie при загрузке веб-страницы
 
Просто отключите вывод этих уведомлений в настройках Internet Explorer
(как именно - загуглите по тексту уведомления)

Например, так можно решить проблему:


Вообще, проблема весьма редкая (если бы такое случалось чаще, чем на 1 из 100 компов, я бы об этом знал)
Видимо, у вас нестандартные настройки Internet Explorer (например, отключен приём этих Cookies)
Изменено: Игорь - 25 дек 2020 15:38:57
Win XP - тест возможности создания временного файла в папке Пользователя средствами VBA
 
Цитата
Environ; прочитал, будто она не всегда работает
всегда. проверено лично на десятках тысяч компов
это системная папка, с чего ей не работать-то

Цитата
не помешает список "всех возможных SpecialFolders"
так гуглится же за минуту
вот, например
http://scriptcoding.ru/2013/06/27/wscript-shell-specialfolders/

Цитата
тест возможности создания временного файла в папке Пользователя
можно и не тестировать, - всё будет работать
Написание макроса для создания QR кода в ексель, Написание макроса
 
Есть готовое решение (позволяющее формировать квитанции сразу с QR кодами, без лишних макросов)
https://excelvba.ru/programmes/FillDocuments/manuals/barcodes_and_images
стоит 1600 руб
Экспорт/импорт модулей при открытии книги
 
Цитата
Неудобство заключается в том, что мне постоянно приходится править в код в нескольких файлах
ну так и сделайте ОДИН файл с макросами - надстройку

Цитата
как реализовать импорт макроса (в которых хранятся функции) пользователю при открытии экселевской таблицы и удаление этого макроса при закрытии
плохая идея
не в том направлении думаете
Получить с веб-страницы текст, который заключен между двумя тегами
 
Цитата
Универсальность этого макроса в том, что он подойдет к любому сайту, только URL меняй
ага... если бы всё было так просто
новое имя класса добавилось - ничего не найдено
к тегу добавился id или любой другой атрибут - формулу переписываем
любой лишний пробел в теге span - ничего не найдено

надо искать СОДЕРЖИМОЕ конкретного тега (найдя тег по id или классу), а не брать содержимое между 2 кусками текста

Цитата
что-то подобное, бесплатное и без надобности что-то дорабатывать?
оставьте любые 2 из этих трёх пожеланий, - и тогда найдёте)
При загрузке программы, Ексель уходит в ошибку., Прекращена работа программы Microsoft Excel
 
нет, не правильно
(не везде надо LongPtr писать вместо Long)

пример правильного написания:
Код
#If VBA7 Then
    Private Declare PtrSafe Function SetWindowPos _
        Lib "user32" (ByVal hwnd As LongPtr, ByVal hWndInsertAfter As LongPtr, _
        ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
#Else
    Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
        ByVal X As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
#End If


думаю, там ещё в вызовах функций есть ошибки
короче, исправлять много и долго
При загрузке программы, Ексель уходит в ошибку., Прекращена работа программы Microsoft Excel
 
Цитата
почему редактор VBA меняет код  .value
не обращайте на это внимания
возможно, где-то в вашем коде объявлена переменная value (с маленькой буквы)

Цитата
Ексель уходит в ошибку
одна из WinAPI функций объявлена неверно
или ей передаются недопустимые параметры при вызове
Автоматизация ведения Журнала смен спецодежды и подсчета нарушений, Автоматизация ведения Журнала смен спецодежды и подсчета нарушений
 
Задача звучит примерно так: «надо проложить дорогу для автомобилей, а потом переделать её, чтобы по ней могли плавать лодки»
Calc и Excel - мягко говоря, немного разные в плане макросов..
Создание документов Word на основании таблицы Excel. Как уйти от многократного открытия шаблона?
 
Не думаю, что в Word есть метод клонирования открытого документа
(который дал бы некоторое увеличение производительности)

У вас проблема в коде в том, что вы внутри цикла каждый раз запускаете и закрываете приложение Word
А этого делать не надо. Запустили Word ДО ЦИКЛА, сделали в нём всё что надо, и закрыли приложение уже ПОСЛЕ ЦИКЛА
Думаю, это раза в два ускорит макрос.
Своё выпадающее меню при нажатии ПКМ по фигуре
 
У фигур вроде 2 разных контекстных меню есть (но не уверен, последний раз лет 5 назад  этим сталкивался, не помню)
Вот здесь есть макрос, который позволяет увидеть, какое контекстное меню отображается:
https://excelvba.ru/code/PopupMenu
Парсинг сайта/возможно потребуется совместить Python для раскрытия всех списков
 
Высылайте на почту пример результата в файле Excel и описание, что откуда с сайта брать
Контакты в профиле
По цене - около 5000 руб
Отправка и получения данных через api с конвертацией ответа на JSON
 
Могу попробовать
от 1500 руб
От вас нужен файл Excel со всем кодом (без звёздочек!) для тестирования

Вопрос: как будет приниматься работа?
(вот исправлю я всё, у меня работает, у вас работает, а на каком-то там компе - не работает. и что, оплату возвращать?)
Лучше тогда тестировать через teamviewer на том компе, где не работает
[ Закрыто] Отправка и получения данных через api с конвертацией ответа на JSON
 
Может, не работает только у тех, у кого в пароле есть символы кириллицы?
Вы ведь строку Body не перекодируете перед отправкой..
Авторизация по методу HTTP Basic Auth, Провайдер изменил настройки, необходимо поменять их в коде.
 
Код надо переписывать «с нуля»
Браузер IE тут не нужен
Примерно так надо:

Код
Sub BASIC()
    ' Макрос с BASIC авторизацией на сайте. © 2020 ExcelVBA.ru
    Dim RequestTimeout&, wHTTP As Object, Response$, URL$, tel$, textes$
    
    tel$ = "123"
    textes$ = "text"
    
    URL$ = URLEncode("https://newbsms.tele2.ru/api/?operation=send&login=ХХХХХХХХХ&password=ХХХХХХХХ&msisdn=" & tel & "&shortcode=ХХХХ&text=" & textes)
    
    RequestTimeout& = 6        ' таймаут (в секундах) ожидания ответа от сервера
    Set wHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
    
    With wHTTP
        ' открываем соединение
        .Open "GET", URL$, True
        
        ' добавляем заголовки запроса (возьмите их из браузера)
        .SetRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/34.0.1847.131 Safari/537.36"
        .SetRequestHeader "Accept-Language", "ru-RU,ru;q=0.8,en-US;q=0.6,en;q=0.4"
        .SetRequestHeader "Content-Type", "application/x-www-form-urlencoded"
        
        ' добавляем заголовок авторизации
        .SetRequestHeader "Authorization", "Basic YTJwdGVzdF9zaWJpcjphMnB0ZXXX"
        
        .Send ' отправляем запрос
        
        If .WaitForResponse(RequestTimeout&) Then
            Response$ = .responsetext ' ответ сервера
            MsgBox Response$
        Else
            Debug.Print "Request Timeout (" & RequestTimeout & " seconds)", URL$        ' истекло время ожидания
        End If
    End With
    Set wHTTP = Nothing
End Sub

Function URLEncode(ByVal txt As String) As String
    For i = 1 To Len(txt)
        l = Mid(txt, i, 1)
        Select Case AscW(l)
            Case Is > 4095: t = "%" & Hex(AscW(l) \ 64 \ 64 + 224) & "%" & Hex(AscW(l) \ 64) & "%" & Hex(8 * 16 + AscW(l) Mod 64)
            Case Is > 127: t = "%" & Hex(AscW(l) \ 64 + 192) & "%" & Hex(8 * 16 + AscW(l) Mod 64)
            Case 32: t = "%20"
            Case Else: t = l
        End Select
        URLEncode = URLEncode & t
    Next
End Function
Как подключить «навсегда» библиотеку Microsoft Scripting Runtime?
 
Цитата
bedvit написал:
или подключайте перед выполнением вашего макроса программно
а что, так можно разве?
при открытии файла не будет выскакивать ошибка компиляции?
(а если не выскакивает - то зачем тогда подключать библиотеку программно?)

PS: а разве Excel новые файлы не по шаблону создаёт?
можно же в этом шаблоне подключить эту библиотеку, и все новые файлы будут с подключением.
Парсинг набора файлов xml из директории локального диска в базу данных MS Access на Python, Парсинг кучи Xml файлов из папки на локальном диске в базу данных MS Access на Python
 
О, цены выросли с 500 до 700 руб
Подождём еще несколько дней)

PS: какое отношение этот скрипт имеет к MS Excel?
Вставить изображение в ячейку эксель програмно, Вставить изображение в ячейку эксель програмно
 
Есть готовое решение
Контакты в профиле
Как устранить ошибку при позднем связывании?
 
А если так?
Код
    Dim HTMLDoc As Object
    Set HTMLDoc = CreateObject("htmlFile")
Как скриптом скачать файл с сети с сохранением даты создания/изменения?
 
smr801, это в некоторых форматах файлов картинок есть такие данные
(вы же изначально не уточнили, про файлы какого типа речь)
И вопрос тогда должен звучать не «как скачать файл» (ибо скачивать можно как угодно), а как потом извлечь из конкретного типа файла его метаданные (где эта дата хранится)
Как скриптом скачать файл с сети с сохранением даты создания/изменения?
 
Если речь про произвольный файл (например, текстовый) - то никак
(даты эти не хранятся в самом файле)
При скачивании с сайта, сервер выдает только файл, не сообщая ничего про дату создания
По FTP если скачивать - то там можно запросить данные по файлу
Почему не запускается браузер в экселе
 
Решение описано в этой инструкции
https://excelvba.ru/programmes/Parser/manuals/errors/compilation_error
(читайте, начиная с "Причины проблемы")
Загрузка большого json
 
Тогда макрос нужно написать
(сколько конкретики в вопросе, столько же и в ответе)
Отправка запроса к API с использованием сертификата
 
Цитата
при включенных SSL 2/3
вроде как, это не включить

Цитата
при включенном TLS 1.0
1.0 используется по умолчанию, это включать не надо
Можно включить 1.1 / 1.2, см. инструкцию:
https://excelvba.ru/programmes/Parser/manuals/errors/WinHTTP_TLS

Цитата
что требуются - это Authorization, Client-Login, Content-Type и Accept-Language
с этим проблем нет, это всё работает

Цитата
с использованием сертификата
Сертификат-то нужно?
В вашем коде ничего нет касательно сертификата
См. метод SetClientCertificate объекта WinHttpRequest

Цитата
пробовал использовать XMLHTTP2 v6.0
Это не нужно. Продолжайте использовать WinHttpRequest
Парсер, Создать парсер, который будет вытаскивать из массива текста значения по ключевым словам
 
Заказ свободен
(бюджет не устроил, вкупе со срочностью. и задания четкого нет)
Парсер, Создать парсер, который будет вытаскивать из массива текста значения по ключевым словам
 
Здравствуйте
Пишите в личку
Контакты в профиле
Корректный импорт данных с сайта
 
А вы вручную копируете с сайта?
Может, попробовать настроить в Excel веб-запрос, — тогда Excel сам всё разнесёт по столбцам, и будет всё как на сайте.
Парсинг с помощью VBA. Какими способами возможно выделять необходимые данные с HTML страницы? 
 
Вот функция для извлечения тегов на базе регулярных выражений:
https://excelvba.ru/code/html
DoEvents ... Loop не даёт открывать другие книги Эксель в процессе работы.
 
Я думаю, такой вариант тоже не очень поможет
Если книги открываются в процессе работы макроса, — наверняка нужно и как-то работать с этими книгами.
Т.е. макросу лучше не работать в бесконечном цикле.
Для часов (хотя, к чему это вообще?) лучше применить запуск макроса по расписанию, раз в секунду, по Application.OnTime
Пример кода можно найти здесь:
Как открыть ссылку макросом НЕ через IE?, Как открыть ссылку браузером по умолчанию или MS Edge?
 
Вам уже второй простой проверенный код дали, из одной строки
Дальше будете искать коды и пробовать, или перечитаете то что я вам написал, насчёт сбоя в реестре из-за кривой установки браузера?
(и у вас после решения этой проблемы все эти макросы заработают без ошибок)
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 117 След.
Наверх