Створення гістограми у VBA
У наступному посібнику буде описано, як створити гістограму за допомогою VBA.
Кроки:
1. Увійдіть у вікно проекту VBA, клацнувши правою кнопкою миші на назві аркуша та вибравши “Переглянути код” або вибравши “ALT, F11”.
2. Праворуч клацніть правою кнопкою миші назву вашого проекту та виберіть вставний «модуль».
3. Скопіюйте та вставте такий код у новий щойно створений модуль:
Sub MakeChart () Dim myRange As Range Set myRange = Application.InputBox _ (Підказка: = "Вибрати вхідні дані діаграми", Тип: = 8) Діаграми. Додати ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Джерело: = myRange, _ PlotBy xlColumns ActiveChart.Location Де: = xlLocationAsNewSheet End Sub
4. Натисніть кнопку зберегти.
5. Натисніть на маленьку піктограму Excel у верхньому правому куті під меню «Файл», щоб вийти з вікна проекту VBA та повернутися до Excel.
6. Далі запустіть макрос, натиснувши “Alt F8”, щоб відкрити список наявних макросів, і вибравши “MakeChart”.
конт
конт
конт
конт
конт
конт
