![...](/f/f713dfe4df2df3b47e51d8b8cf819e7f.jpg)
Microsoft Excel е една от най-мощните налични програми за електронни таблици и е полезна за огромно разнообразие от дейности от финансов анализ до научни проекти. Повечето хора обаче смятат, че Excel е ограничен до манипулиране на мрежи от формули, т.е. традиционна функционалност на електронни таблици. Но скриптовете на Visual Basic на Excel улесняват дори повече от това. С VB можете да нарисувате всяка форма, която харесвате в електронната таблица, и да ги използвате за създаване на чертежи, диаграми и други графики, които да ви помогнат да визуализирате вашата електронна таблица.
Етап 1
Отворете Microsoft Excel. Ако имате Excel 2007 или по-нова версия, отидете на раздела „Изглед“ на лентата и щракнете върху „Макроси“; в противен случай щракнете върху менюто "Инструменти" и изберете "Макроси". Диалоговият прозорец Macro трябва да се появи.
Видео на деня
Стъпка 2
Въведете име на макрос и щракнете върху „Създаване“. Това трябва да отвори редактора на приложения на Visual Basic с нова празна подпрограма, показана на екрана.
Стъпка 3
Определете координатите X и Y, които искате да използвате за началото и края на вашия вектор. Горният ляв ъгъл на електронната таблица е в (0, 0), а X и Y се увеличават, когато вървите съответно надясно и надолу. Поставете тези стойности в променливи, както следва:
начало_x = 0 начало_y = 0 край_x = 100 край_y = 100
Тези стойности ще начертаят диагонална линия в горния ляв ъгъл на електронната таблица. Може да се наложи да експериментирате с различни числа, за да получите линията точно там, където искате.
Стъпка 4
Добавете код, за да начертаете самата линия:
линия = Sheet1.Shapes. AddLine (start_x, start_y, end_x, end_y)
Стъпка 5
Добавете код, за да добавите стрелка към края на реда, за да изглежда като вектор:
линия. линия. EndArrowheadStyle = MsoArrowheadStyle.msoArrowheadTriangle
Стъпка 6
Затворете редактора на Visual Basic и отворете диалоговия прозорец Макрос (вижте Стъпка 1). Щракнете върху вашия макрос и щракнете върху „Изпълни“. Трябва да видите вашата линия да се появи.
Бакшиш
Можете да използвате променливата "line", създадена в стъпка 4, за да промените други свойства на вашия вектор. Например, за да промените цвета на линията на зелен, можете да напишете „линия. линия. ForeColor. RGB = RGB(0, 255, 0)"