Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Basic / VBA


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Basic/VBA

Выпуск № 690
от 14.01.2008, 18:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 263, Экспертов: 41
В номере:Вопросов: 2, Ответов: 3

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 117514: Уважаемые Эксперты, Вопрос по VBA Exel. Например у меня есть таблица, могу ли в скрипте прописать, что бы на основе этой таблице создавался график? если точнее мне надо, имея данные о товарах, количестве сделать диаграмма. гра...
Вопрос № 117603: Здравствуйте эксперты! У меня вот какой вопрос: есть БД в Акцессе, люди с ней работают и там копятся данные. Допустим я изменил/добавил/удалил что-то в этой БД у себя дома. Как мне эту обновленную БДу поставить тем людям без потери и...

Вопрос № 117.514
Уважаемые Эксперты,

Вопрос по VBA Exel.
Например у меня есть таблица, могу ли в скрипте прописать, что бы на основе этой таблице создавался график?

если точнее мне надо, имея данные о товарах, количестве сделать диаграмма. график.

Если можно, скажите какие функцие используются для создания разных графиков.

Спасибо за внимание
Отправлен: 08.01.2008, 18:07
Вопрос задал: yazzer (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Ualife
Здравствуйте, Соколов Виктор Васильевич!
В офисе есть замечательная вещь - запись макросов (Сервис -> Макрос -> Начать запись).
Вот у вас есть таблица - включаем запись макросов, в меню выбираем "Вставка -> Диаграмма" и настраиваем ету диаграмму. Когда вы закончили с диаграммой, выполните "Сервис -> Макрос -> Остановить запись". Теперь у вас есть код, который можно отредактировать. Желаю удачи!
---------
Нет границ - есть лишь препятствия!
Ответ отправил: Ualife (статус: 5-ый класс)
Ответ отправлен: 08.01.2008, 19:15
Оценка за ответ: 4

Отвечает: Черников Игорь Владимирович
Здравствуйте, yazzer!
Charts.Add 'Создаём график
ActiveChart.ChartType = xlLineMarkers 'Линейного типа, xlColumnClustered - гистограмма, а всего их 73
ActiveChart.SetSourceData Source:=Sheets("Все").Range("D2:D30"), PlotBy:=xlColumns 'значения из ячеек с D2 по D30
ActiveChart.SeriesCollection(1).XValues = "=Все!R2C3:R30C3" 'подписи по оси Х из ячеек с С2 по С30 листа "Все"
ActiveChart.SeriesCollection(1).Name = "=Все!R1C4" 'Имя графика из ячейки D1 листа "Все"
ActiveChart.Location Where:=xlLocationAsObject, Name:="Все" 'Разместить график на листе "Все"
With ActiveChart
.HasAxis(xlCategory, xlPrimary) = True
.HasAxis(xlValue, xlPrimary) = True
End With
ActiveChart.Axes(xlCategory, xlPrimary).CategoryType = xlAutomatic
With ActiveChart.Axes(xlCategory)
.HasMajorGridlines = True
.HasMinorGridlines = False
End With
With ActiveChart.Axes(xlValue)
.HasMajorGridlines = True
.HasMinorGridlines = False
End With
ActiveChart.HasLegend = True
ActiveChart.Legend.Select
Selection.Position = xlRight
ActiveChart.HasDataTable = False
---------
От каждого по способностям, каждому по труду
Ответ отправил: Черников Игорь Владимирович (статус: 10-ый класс)
Ответ отправлен: 10.01.2008, 19:27
Оценка за ответ: 5
Комментарий оценки:
Полностью соответвутсвует поставленному вопросу. Правда, одно пожелание, чуть больше коментарий к коду и как то их разделить для читабельности


Вопрос № 117.603
Здравствуйте эксперты!

У меня вот какой вопрос: есть БД в Акцессе, люди с ней работают и там копятся данные.
Допустим я изменил/добавил/удалил что-то в этой БД у себя дома. Как мне эту обновленную
БДу поставить тем людям без потери их данных. Может непонятно написал, просто не профи еще,
не владею всеми терминами.
Заранее спасибо.
Отправлен: 09.01.2008, 12:24
Вопрос задал: Муратов Радик Анатольевич (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Тесленко Евгений Алексеевич
Здравствуйте, Муратов Радик Анатольевич!
Изучите раздел документации Access - "Создание реплицированной базы данных"
Евгений.
Ответ отправил: Тесленко Евгений Алексеевич (статус: Студент)
Ответ отправлен: 09.01.2008, 21:23


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.69 от 06.01.2008
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное