Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » dimbaks
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Как сделать отправку в Telegram из макроса VBA Excel, Telegram из макроса VBA Excel
 
#
05.05.2022 11:14:23
Добрый день! Возможно.
Берете символы в кодировке UTF-8, например отсюда https://apps.timwhitlock.info/emoji/tables/unicode
Только \x заменяете на %, чтобы вместо \xE2\x9D\x84 получилось %E2%9D%84
 
Перейти    
Не удается получить доступ к файлу xlsb через позднее связывание
 
#
09.12.2021 17:16:30
Цитата
написал:
переустановил бы офис. Т.е. снес бы старый полностью, а потом на чистую установил новый.
Спасибо! Помогло
 
Перейти    
Не удается получить доступ к файлу xlsb через позднее связывание
 
#
09.12.2021 14:37:07
Цитата
написал:
Так нет никакого файла, поэтому и Name нет
Открываю любой excel файл.
Код
    Dim xl As Object

    Set xl = GetObject(, "Excel.Application")

    Debug.Print xl.Workbooks.Count
    Debug.Print xl.Workbooks(1).Name
Для файлов формата xlsb ошибка на xl.Workbooks(1).Name, для xlsx ошибки нет и выводится имя файла.
 
Перейти    
Не удается получить доступ к файлу xlsb через позднее связывание
 
#
09.12.2021 14:34:04
Цитата
написал:
а может у ошибки и описание с номером есть? У меня ничего не выдает и нормально работают оба кода. Значит проблема где-то на Вашей стороне.
Run-time error '40036'
Application-definder or object-definder error
 
Перейти    
Не удается получить доступ к файлу xlsb через позднее связывание
 
#
09.12.2021 14:30:40
Цитата
написал:
Так нет никакого файла, поэтому и Name нет
Открываю любой файл формата xlsb и в атлук или word запускаю макрос
Код
    Dim xl As Object

    Set xl = GetObject(, "Excel.Application")

    Debug.Print xl.Workbooks.Count
    Debug.Print xl.Workbooks(1).Name

Здесь Debug.Print xl.Workbooks(1).Name будет ошибка. Если формат excel xlsx - ошибки нет
 
Перейти    
Не удается получить доступ к файлу xlsb через позднее связывание
 
#
09.12.2021 14:24:53
Код
    Dim xl As Object

    Set xl = GetObject(, "Excel.Application")

    Debug.Print xl.Workbooks.Count
    Debug.Print xl.Workbooks(1).Name

При одно открытом файле xlsb

код Debug.Print xl.Workbooks.Count выдает 1,

Debug.Print xl.Workbooks(1).Name - выдает ошибку
Изменено: dimbaks - 09.12.2021 14:26:24
 
Перейти    
Не удается получить доступ к файлу xlsb через позднее связывание
 
#
09.12.2021 14:15:58
Добрый день! У меня есть макрос в аутлук, который берет данные из открытого ексель-файла и переносит их в текст письма. Доступ к ексель получаю с помощью позднего связывания. Для файлов формата xlsx всё работает без проблем. Если формат файла xlsb, то макрос видит что книга открыта (xl.Workbooks.Count выдает 1), но получить какие-либо свойства открытого файла не удается (например xl.Workbooks(1).Name).
Если делать это через раннее связывание, то всё нормально.
Для наглядности прикладываю word с 2 макросами.
GetExcelAsObject - здесь переменная объявлена как Object и доступа к свойствам xlsb файлов нет .
GetExcelAsExcelApplication - здесь переменная объявлена как Excel.Application - с xlsb файлами можно работать.
Это баг/фича или я что-то делаю не так?
(офис 365)
 
Перейти    
SQL-запрос к Excel xml 2003
 
#
07.12.2014 20:20:23
Спасибо, читаю, правда пока непонятно.
С программированием сталкивался только на уровне екселя.
Обычно использую вот такую функцию

Код
Function ADOImportExcel(DbFullName As String, arSQL As String, TargetCell As Range)
    Dim objRS As Object
    
    'формируем рекордсет
    Set objRS = CreateObject("ADODB.Recordset")
    objRS.Open arSQL, _
        Join$(Array("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=", _
          DbFullName, ";Extended Properties=""Excel 8.0;"""), vbNullString)
    
    'скопируем данные
    TargetCell.CopyFromRecordset objRS
    
    ' почистим за собой
    Set objRS = Nothing
End Function

хотелось бы понять, как исправить строчку "Provider=Microsoft.Jet.OLEDB.4.0", чтобы в качестве источника использовать файлы Excel xml 2003?
 
Перейти    
SQL-запрос к Excel xml 2003
 
#
07.12.2014 17:16:59
Приветствую всей посетителей форума.
Собственно вопрос: приходится обрабатывать выгрузки, которые формируются в формате Excel xml 2003.
Какую строку подключения прописать, чтобы работать с ними с помощью sql-запросов?
 
Перейти    
Страницы: 1
Наверх