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

Страницы: 1
Создание новой диаграммы VBA, создание формы таблицы и и вставка новой диавграммы на ее основе
 
ребята, доброго времени суток!

Не могу победить "ActiveChart.SetSourceData Source:=" при добавлении диаграммы.
строится и заполняется макросом форма, потом по этой форме строится диаграмма... и никак не могу увязать источник данных через переменные...
В общем нагородил огород...Прошу помощи Гуру в этом вопросе.
Код
ActiveChart.SetSourceData Source:=Sheets("30102").Range("A" & ActiveCell.Row & "" & lr)
Формулы в качестве источника данных диаграммы, Использование формул вместо диапазонов
 
Уважаемые форумчане. Пытался сам разобраться, но не хватает знаний...Есть файл с круговой диаграммой. Необходимо источник значений для диаграммы указать не диапазоном E21:E23, а формулой = СУММЕСЛИ(A:A;"Иванов";B:B)(чтобы не использовать промежуточные значения, а напрямую транслировать в диаграмму).  Подозреваю, что необходимо использовать именованную формулу, но к диаграмме ее не могу прикрутить...Заранее благодарю за помощь.
Построение диаграммы с помощью макроса, Обработка таблицы и построение на ее основе диаграммы
 
Уважаемые участники! Подскажите решение.
Написал макрос (через макрорекодер), который вставляет на лист диаграмму. Данные все время обновляются (раз в сутки) и макрос должен удалять старую диаграмму и на основе новых данных вставлять новую диаграмму. Так вот на этапе вставки новой диаграммы вылетает debug " ActiveSheet.Shapes("Диаграмма 1").IncrementLeft -137.25"
Понимаю, что надо имя диаграммы задать через переменную, но не соображу как. Подскажите, пжл. Заранее благодарствую.
Код
Sub Макрос1()
'
' Макрос1 Макрос
'
 
'
    Range("A3:B7").Select
    ActiveSheet.Shapes.AddChart2(216, xlBarClustered).Select
    ActiveChart.SetSourceData Source:=Range("фев.16!$A$3:$B$7")
    ActiveSheet.Shapes("Диаграмма 1").IncrementLeft -137.25 ' вот тут вылетает ошибка
    ActiveSheet.Shapes("Диаграмма 1").IncrementTop -117
    ActiveSheet.Shapes("Диаграмма 1").ScaleWidth 1.3458333333, msoFalse, _
        msoScaleFromTopLeft
    ActiveSheet.Shapes("Диаграмма 1").ScaleHeight 1.5520833333, msoFalse, _
        msoScaleFromTopLeft
     
     
End Sub
Изменено: Boch1306 - 07.03.2016 13:37:19
Условное форматирование диаграммы, Построение диаграммы по данным из таблицы и ее условное форматирование в зависимости от значений определенного столбца
 
Здравствуйте, участники форума!
Помогите, направьте на путь истинный)))
Возникла идея сделать что-то вроде монитора для рынка ценных бумаг по аналогии как тут http://stocks.investfunds.ru/market_map/ , но в excel. Помогите разобраться, если несложно, сам недопетрю…
Что мы имеем: файл excel, куда посредством DDE импортируются котировки бумаг на лист tblQuotes. На листе Portfolio представлен модельный портфель, который предполагается мониторить.
Как сделать так, чтобы круговая диаграмма подсвечивалась в зависимости от величины изменения цены (столбец F листа Portfolio) и строилась по обороту из столбца N листа Portfolio?

Аналогично на основе этих данных (изменение цены и оборот) хотелось бы получить карту рынка, как тут http://tickr.ru/MarketMap

Буду рад любым подсказкам.
Страницы: 1
Наверх