Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
getElementsByClassName в IE и HTMLDocument
 
Следующая конструкция
Код
objIE.document.getElementsByClassName("search-result-item")(0).getElementsByClassName("sale-price")(0)
при использовании IE находит нужный блок в html-коде страницы, но если использовать HTMLDocument, то
Код
html.getElementsByClassName("search-result-item")(0).getElementsByClassName("sale-price")(0)
перестаёт находить нужный объект (empty), причем
Код
html.getElementsByClassName("search-result-item")(0)
работает.

Собственно, знает ли кто, почему эта штука не работает, в чем отличие от IE, и как это исправить?
Накопление часов в формате [ч]:мм:сс
 
Здравствуйте.

Есть ячейки с данными вида чч:мм:сс (21:03:58).
При установки формата ячейки [ч]:мм:сс, если часов больше 24, то добавляется дата, то есть:
68:09:45 становится 02.01.1900  20:09:45
Как справится с этой проблемой? Ведь [ч] в формате должно накапливать часы, а не переводить в сутки и добавлять дату.
Изменено: kavaka08 - 07.06.2017 12:00:36
Получить ячейки, вмещающиеся на лист А4
 
Здравствуйте.

Формирую отчёт из разных сводных таблиц с помощью VBA, который в дальнейшем необходимо распечатать.
В силу того, что таблицы в отчёте имеют динамический размер по высоте(строки), хочу получить соотношение между текущими ячейками (учитывая их размер) и их печатью на листы А4, чтобы при печати таблицу не разрезало пополам на разные листы.
Другими словами: если таблицы маленькие, т.е. не выходят за ячейки-границы А4 = печать на одном листе, если таблицы большие = печать каждой на разном.

Так вот, каким образом можно получить размер листа А4, с текущими установками принтера, в ячейках?
Фильтр для нескольких сводных из разных источников по одинаковым данным
 
Здравствуйте.
Есть две сводные по плановым расходам и фактическим, наименования точек совпадают. Есть ли возможность сделать один фильтр сразу для обеих сводных, которые созданы по разным источникам? Может как-то через vba подцеплять значения фильтра одной сводной и применять к фильтру другой?
Изменено: kavaka08 - 27.04.2017 11:07:24
Фильтр для сводной, состоящей из нескольких таблиц
 
Здравствуйте.
Сделал сводную из нескольких таблиц импортированных из access и для одного общего столбца создал связь. Значения из нескольких таблиц выводится для одинаковых элементов, но, применяя фильтр от одной таблице ко всей сводной, фильтруются только значения из той же таблицы (логично).
Можно ли как-то распространить фильтр по столбцу одной таблицы на значения обеих в сводной?
Изменено: kavaka08 - 20.04.2017 14:48:47
Сводная по нескольким различным таблицам
 
Здравствуйте.

Допустим, есть 2 таблицы в access:
Дата продажМагазин Количество проданного товара
01.04.17 A 15
01.04.17 B 23
01.04.17 C 10
02.04.17 A 11
02.04.17 B 15

Дата выгрузкиМагазин Выгруженный товар
01.04.17 A 20
01.04.17 C 13
02.04.17 A 17
02.04.17 B 9
02.04.17 C 11
Я объединил названия магазинов через ключ и импортировал для сводной, но сводная работает корректно только с итогами, если же в столбцы поставить даты, чтобы увидеть промежуточные значения, то возникают проблемы, т.е.
если в столбцы поставить Даты продаж, то и разделятся по датам будут только продажи, а количество выгрузок записывает в каждую дату значение из итога
и наоборот

01.04.17 02.04.17 Итог
A Продажи 15 11 26
Выгрузки 20 17 37
B Продажи 38 38 38
Выгрузки 9 9 9
C Продажи 10 0 10
Выгрузки 24 24 24
Как я понимаю, даты от одной таблицы не работают к другой. Каким образом можно объединить даты, чтобы сводная могла корректно разбивать значения обеих таблиц?
Обновление ячейки (двойной клик) в VBA
 
После применения к датам  .NumberFormat()  значения в ячейках не обновляются. Если после кликнуть 2 раза вручную по ячейке, то формат обновляется. Пробовал Cell.Formula = Cell.Formula через цикл - эффекта нет.
Как справиться с этой бедой? Тем более если ячеек более N тысяч, то если вдруг такой перебор и сработал бы, это сильно замедлило работу алгоритма.
Изменено: kavaka08 - 04.04.2017 16:33:01
Run-time error при обработке XML
 
Есть следующий макрос:
Код
Sub exchange_rates()
    Set xmlList = CreateObject("Microsoft.XMLDOM")
    url = "http://www.cbr.ru/scripts/XML_daily.asp?date_req=22.03.2017"
    
    xmlList.Load (url)
    
    MsgBox xmlList.SelectSingleNode("/ValCurs/Valute[@ID=""R01235""]/Value").Text
End Sub
Получаю XML с ЦБ с курсом рубля относительно других валют и достаю оттуда курс доллара, но при попытке обработать данные вылетает ошибка


Если прогонять скрипт пошагово, то всё работает.
Пробовал вставлять задержку через sleep и wait между загрузкой и обработкой, но не помогает.
При этом если засунуть туда MsgBox, то всё работает, но это не выход, когда нужно будет обработать таким образом 1000+ дат.

UPD: Нужно было отключить асинхронную загрузку
Изменено: kavaka08 - 24.03.2017 19:30:14
Страницы: 1
Наверх