Jak rysować linie X w VBA Excel

Visual Basic for Applications pomaga w formatowaniu, wyświetlaniu, analizowaniu i manipulowaniu danymi w Excelu. VBA może używać pisanego kodu, aby automatycznie wykonywać powtarzalne zadania, które byłyby trudne lub niemożliwe do wykonania ręcznie, w tym kilka operacji matematycznych na tysiącach kolumn w różnych skoroszytach. Jedna funkcja arkusza kalkulacyjnego Excel pozwala komórkom mieć granice reprezentowane przez proste lub przekątne, które można wykorzystać do rysowania linii X wewnątrz komórek.

Podstawy VBA

W programie Excel arkusze, komórki i zakresy komórek są znane jako "obiekty" i mają właściwości, którymi można manipulować, na przykład kolor. Kod VBA, który sprawia, że ​​obiekty wykonują zadania nazywa się makrem i jest napisany przy użyciu edytora Visual Basic znajdującego się pod zakładką dewelopera, pod "Plik", wybierz "Opcje" i "Opcje programu Excel". Po lewej stronie okna dialogowego, musisz wybrać "Dostosuj wstążki", "Polecenia", a następnie "Popularne polecenia". Po wybraniu opcji "Dostosuj wstążkę" i "Główny" zaznacz pole wyboru Deweloper i kliknij "OK", pojawi się karta Deweloper. Makro zaczyna się od "sub", co jest skrótem od podprogramu, a kończy się na "koniec sub." Musisz go zapisać z rozszerzeniem .xlsm.

Polecenia VBA

Format polecenia polega na zapisaniu obiektu i jego właściwości lub metody, oddzielonych kropką. Obiekt Range jest używany z "Selection" i "Select", aby przygotować komórkę lub grupę komórek do działania. Na przykład polecenie "Zakres (" A1 "). Wartość = 3" wybiera komórkę 1 i przypisuje jej wartość 3. Aby wybrać komórki A6 i C6, a wszystko pomiędzy, należy wpisać "Zakres (" A6: C6 ").Wybierz."

Właściwości obramowania

Granice mogą zawierać grubą lub cienką linię ciągłą lub linie przerywane, domyślnie w kolorze czarnym. Linia ukośna jest granicą wewnętrzną, przechodzącą w tył lub w przód, gdzie polecenie to "xlDiagonalDown" lub "xlDiagonalUp". Polecenie rysowania ukośnych ukośników w przód i tył to "Selection.Borders (Diagonal Command) .LineStyle = xlContinuous", gdzie xlContinuous oznacza ciągłe linie.

Rysowanie X linii

Aby narysować linie X, musisz utworzyć ukośne ukośniki w przód iw tył w każdej interesującej komórce. Możesz ćwiczyć rysowanie ich w trzech komórkach, otwierając okno skryptu, rozpoczynając i nazywając nowy sub, a następnie wpisując skrypt, aby wybrać komórki, w których będą rysowane linie X, takie jak "Sub drawDiagonal ()" w jednej linii i "Zakres (" A6: C6 "). Wybierz" poniżej ". Aby polecić skryptowi rysowanie ukośników naprzód i wstecz w każdej z zaznaczonych komórek, musisz napisać "Selection.Borders (xlDiagonalDown) .LineStyle = xlContinuous" i "Selection.Borders (xlDiagonalUp) .LineStyle = xlContinuous" poniżej. Wpisanie "End Sub" zamyka podprogram. Po kliknięciu "Makra" na zakładce Deweloper, a następnie "Uruchom", linie X pojawią się w komórkach A6, B6 i C6.