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

Страницы: 1
Перевод Dictionary в таблицу, Как преобразовать словарь в таблицу на листе
 
Уважаемые коллеги, вечер добрый.
Помогите пожалуйста с преобразованием словаря в обычную таблицу на листе.
Источник данных:
Веб сервис - POST запрос - получаю JSON.
его я могу распарсить в R и ручками привести к таблице (муторно и лень),
распарсил в KNIME, перевел в XML, далее через XPATH (не совсем удобно для конечного пользователя - нужно делать веб морду)
Хочу в excel.

Сам источник представляет собой 18 столбцов-списков, по одному документу/записи  могут быть 5 значений в списке номер 3 и 7 значений в списке 8 и т.д.
глубина списка динамическая величина.

Огромное спасибо EducatedFool за совет на просторах форума по считыванию ResponseBodyвместо RespinseText для борьбы с кодировкой.
Получил в excel JSON, распарсил его через CDataset.xlsm (уже обсуждался на форуме) - на выходе Dictionary с child.

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

пример JSON {Имя:Иванов; Фамилия : Петров; Любимый цвет : {цвет1:красный; цвет2:синий}
аля словарь
                     Имя: Иванов
                     Фамилия: Петров
                     Любимый цвет
                     Любимый цвет - child(1) цвет1 = красный
                     Любимый цвет - child(2) цвет2 = синий

Как хочу
Имя       Фамилия  Любимый цвет
Иванов Петров       красный
                                синий

Прошу прощения, может быть непонятно объяснил, давно к vba не подступал - забыл уж многое.
VBA изменение группы выделенных листов
 
Уважаемые коллеги, добрый день.
Не могу найти решение следующего вопроса - нужны знания гуру теории excel:
Макросом генерирую выгрузки одинаковых по своей структуре листов, собираю в одну книгу,  далее мне нужно вставить два столбца с формулами. Столбцы добавляются на всех выделенных листах, но формула - только на активном. (При изменении формулы макросом выделение группы не слетает)    
Код
Sheets(2).Activate
For I = ActiveWorkbook.Sheets.Count To 2 Step -1 'выделил нужные листы
    Sheets(I).Select (False)
Next
Columns("AH:AI").Select : Selection.Insert Shift:=xlToRight 'вставил столбцы
Range("AH4").FormulaR1C1 = "=SUMIFS(R[-1]C19:R[-1]C30,R2C[-15]:R2C[-4],"">=""&DATE(YEAR(NOW()),1,1)&"""",R2C[-15]:R2C[-4],""<""&NOW()&"""")" 'вставил формулу

как вариант  - перебор листов, но хотелось бы избежать этого.
Код
Sub AllWorkSheets()
Dim Arr() As String 
Dim I As Long 
ReDim Arr(Worksheets.Count) :Arr(0) = Worksheets.Count
For I = 1 To Worksheets.Count : Arr(I) = Worksheets(I).Name :Next I
For I = 1 To Arr(0) : Sheets(Arr(I)).Select  : Application.Run "personal.xls!MarkCells" :Next I 
End Sub
Подскажите пожалуйста, как можно вставить формулу макросом на группу выделенных листов без перебора (возможно ли это)
OLAP CubeCellValue, помогите найти
 
Добрый день. Мучаюсь с оптимизацией работы excel + olap cube. Обычные сводные в excel - не работают.
В сети есть информация, что когда-то существовала надстройка Excel 2002 Add-in: OLAP CubeCellValue. В сети ее сейчас нет. Может у кого-нибудь есть?
Так же буду рад любым другим надстройкам для работы с olap.
Сейчас делаю все через ADOMD, но его на каждую машину надо устанавливать, ищу обходные пути.
цвет кнопки
 
добрый день, товарищи, подскажите пожалуйста как изменить цвет кнопки для макроса. Где то видел надстройку по созданию кнопок - там цветные были. Как это сделать?
есть ли буквы в строке?
 
Товарищи, доброе утро. подскажите как решить такой вопрос. Есть столбец (формат текстовый)  
номер удостоверения личности    
в основном это серия и номер паспорта в формате  "01 23 456789" , но  
иногда попадаются загран. паспорта и паспорта граждан других стран и военные билеты.  
Стоит задача - вычленить эти паспорта.  
С международным просто - если len(trim(range(A"" & i & ""))) >12    
У военников и паспортов В серии - буквы.  
например "СК 12356"    
 
Вопрос - как определить что в строке есть буквы?
формат 2й оси X
 
Здравствуйте, подскажите, пожалуйста, как можно задать формат второй оси X.  
пример прилагаю. первая ось - время - отображается нормально, но нужна ось даты, а то не понятно в каком дне появилась та или иная величина.  
Офис 2003 - желательно через vba.
детский mp3 плеер
 
Здравствуйте, просьба помочь с реализацией следующей идеи.  
Идея: Для маленького ребенка надо создать dvd с детскими сказками (которые раньше были на пластинках)/ dvd купил, сказки скачал/. Хочется создать красивую менюшку - плеер с картинками - для каждой сказки своя кнопка, при нажатии которой воспроизводится нужная директория /картинки скачал, mp3_player.xls скачал/.  Предполагается реализовать все в excel как форма со скрытием окошек excel, которая запускается через скомпилированый в exe батник запуска формы.  
 
Есть ли у кого примеры красивых форм, удобных для данных целей (большая картинка + кнопки, можно даже с слайдшоу). А то руки не оттуда растут и красиво рисовать не умею.    
 
Может у кого то уже есть наработки для меню mp3????  
 
p.s: если модераторы посчитают эту тему оффтопом, то можете удалить.
создание надстройки
 
Товарищи, ткните носом в ссылку на эту тему. поиск мало помогает.  
Нужно создать надстройку с 2 кнопками для запуска 2 макросов.    
Офис 2007.  
для себя всегда кнопы макросов выводил на панель, а тут отделу налогооблажения надо было конвертер xls в xml. - для них нужна надстройка.
Навигация по листам/книгам - открытый код
 
Доброго времени суток, выкладываю последнюю версию программы для навигации в excel.  
Реализованы следующие возможности:  
открытие/закрытие книги; добавление/удаление листа, копирование/вставка листа;  
сортировка листов, удобное перемещение по листам/книгам.  
возможна навигация кнопками на форме, мышью, стрелками на клавиатуре.  
Полностью открытый код - с комментариями. (начало обсуждений было вот тут http://www.planetaexcel.ru/forum.php?thread_id=1037)  
 
Что лишнего? и чего бы добавить???
Страницы: 1
Наверх