Погода: 8 °C
25.04−2...4пасмурно, небольшие дожди
26.04−1...8переменная облачность, без осадков
Пробки: 7 баллов
НГС.Форум /Компьютеры Интернет Связь / Программирование /

Помогите плиз

ПечатьRSSДеревом

  • Вопрос про Visual Basic. Есть задача.
    Нужно сделать так чтобы на обыкновенной вордовской или экселевской таблице со столбцами на столбцах где содержаться цифры были построены линии с точечками по краям - например от 2 в первой стороке к 1 во воторой 0 в третьей 1в четверной и так далее. Короче получился график. Значения по которым должны проходить линии известны и находятся в файле екселя.
    Вопрос - Целесообразно и как можно написать макрос для автоматического построения этого графика в виде макроса на VB.
    Если у кого есть другие варианты решения задачи с удовольствием выслушаю

  • Ответ на сообщение Помогите плиз пользователя Анонимный пользователь

    Запускаем запись макроса в Экселе. Вставляем диаграмму, смотрим код:

    Charts.Add
    ActiveChart.ChartType = xlLine
    ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("B2:M2"), PlotBy:= _
    xlRows
    ActiveChart.SeriesCollection(1).XValues = "=Лист1!R1C2:R1C13"
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Лист1"
    With ActiveChart
    .HasTitle = False
    .Axes(xlCategory, xlPrimary).HasTitle = False
    .Axes(xlValue, xlPrimary).HasTitle = False
    End With

    Вроде всё просто и всё понятно. По аналогии можно написать код, делающий это автоматически для произвольного источника данных :спок:

Записей на странице:

НГС.Форум /Компьютеры Интернет Связь / Программирование /
Перейти в форум

Модератор:
Наверх
SHKULEV MEDIA HOLDING
Подробности...
Сетевое издание «НГС.НОВОСТИ» (18+)
Зарегистрировано Федеральной службой по надзору в сфере связи, информационных технологий и массовых коммуникаций (Роскомнадзор)
Свидетельство о регистрации СМИ ЭЛ № ФС 77—84683
Учредитель: Общество с ограниченной ответственностью «ИНТЕРНЕТ ТЕХНОЛОГИИ»
Главный редактор: Малкова Марина Андреевна
Адрес редакции: 630099, Россия, Новосибирск, ул. Ленина, д. 12, 6 этаж, телефон 8 (383) 212-52-52, 8 (923) 157-00-00 (круглосуточно)
Электронный адрес редакции: ngs@sholding.ru
Контактные данные для Роскомнадзора и государственных органов: juristnsk@sholding.ru
Техподдержка: help@sholding.ru, 8 (800) 200-03-83 (доб.3)
Связаться с отделом продаж: 8 (383) 212-52-52, 8 (800) 200-03-83 (звонок с сотового бесплатный), reklama@ngs.ru
Публикации с пометкой «На правах рекламы», «Партнёрский проект», «Новости телекома», «Открытая трибуна», «Выборы-2019» и «Выборы-2020» оплачены рекламодателем. Редакция сайта не несет ответственности за достоверность информации, содержащейся в рекламных объявлениях.

Информация об ограничениях

Политика использования cookies
Политика конфиденциальности и обработки персональных данных и правила использования сайта