Programowanie VBA: podstawy Visual Basic

Każda lekcja będzie składać się z krótkiego wstępu i wytłumaczenia teoretycznego na czym polega funkcja, jej konstrukcja i logika działania. W pierwszej części przedstawimy ogólne wprowadzenie do tematu, pokażemy jak uruchomić makro oraz jak pobrać w ogóle dodatek VBA itp.

Z lekcji dowiesz się:

• Jak pobrać dodatek VBA?

• Jak uruchomić odpowiednie makro?

• Jak napisać pierwszy program?

Jeżeli w arkuszu kalkulacyjnym, nie mamy dodatku VBA, należy go zainstalować, na szczęście jest to bardzo proste. Wybieramy opcje Excela (Rys. 1).

(Rys. 1)

Następnie przechodzimy do okna dialogowego i wybieramy dodatki (Rys. 2).

(Rys. 2)

Następnie przechodzimy dalej i zaznaczany Analisys ToolPak - Vba. Zatwierdzamy przez OK i wszystko już działa (Rys. 3) i (Rys. 4).

(Rys. 3)

(Rys. 4)

Cała praca w VBA, odbywa się w zakładce deweloper, gdzie znajdują się wszystkie niezbędne narzędzia do pisania makr (Rys. 5).

(Rys. 5)

Należy wybrać ikonę Visual Basic i okno dialogowe, gdzie można przystąpić do pisania pierwszych kodów.

Pierwszym krokiem jest utworzenie nowego modułu, w którym trzeba zapisywać kod. W tym celu klikamy prawym przyciskiem myszy w widoczny folder Microsoft Excel Objects, następnie insert i module (Rys. 6).

(Rys. 6)

Teraz można rozpocząć pisanie pierwszego kodu.

Przykład 1

Na początek napiszemy program, który po uruchomieniu wyświetla okno dialogowe z napisem „Mój pierwszy program”:

Sub Przycisk() – początkowa konstrukcja każdego programu. Ważne, żeby nazwa programu była jednolita np. Przycisk 1 jest wpisem niepoprawnym, należy w tym miejscu połączyć oba człony podkreślnikiem tzn. Przycisk_1.

MsgBox („Mój pierwszy program”) - funkcja msgbox, służy do wyświetlania informacji, które zostaną w niej zawarte.

End Sub – końcowa konstrukcja każdego programu.

Pełny kod przedstawia rysunek 7.

(Rys. 7)

Następnie z zakładki developer z karty wstaw - wstawimy przycisk, którego uruchomienie spowoduje uruchomienie naszego programu (Rys. 8).

Aby zmienić tekst widoczny na przycisku klikamy prawym przyciskiem myszy i wybieramy opcję edytuj tekst. Możemy również przypisać makro, w takiej sytuacji należy wybrać Przypisz makro i następnie wskazać nazwę odpowiedniego makra (Rys. 8).

(Rys. 8)

Przykład 2

Naszym zadaniem jest napisanie programu, który pokoloruje na żółto fragment arkusza. Wykorzystamy dwa sposoby odwołania się do wartości arkusza kalkulacyjnego:

Cells(w,k) – odwołanie bezpośrednio do komórki, gdzie w oznacza wiersz, a k kolumnę.

Cells(1,1) – komórka A1.

Range(”A1:A1”) – odwołanie do wskazanego zakresu.

Range (”A2:C2”) - odwołanie do komórek A2, B2, C2.

Sub Program1()

Cells(1, 1).Interior.ColorIndex = 6 – odwołanie się do komórki A1, i pokolorowanie jej na kolor żółty, dzięki instrukcji Inetrior.ColorIndex, gdzie cyfra oznacza konkretny kolor. Nie należy uczyć się nazw kolorów, są one dostępne w Internecie.

Cells(1, 2).Interior.ColorIndex = 6 – odwołanie do komórki B1.

Cells(1, 3).Interior.ColorIndex = 6 – odwołanie do komórki C1.

Range("A2:C2").Interior.ColorIndex = 6 – odwołanie do komórek A2, B2, C2.

End Sub

Pełny kod (Rys. 9).

(Rys. 9)

Następnie dodajemy przycisk, który umożliwia uruchomienie programu, analogicznie jak w poprzednim przykładzie.

Może się zdarzyć, że Excel na którym pracujemy, nie będzie zapisany formacie, który obsługuje makra. Należy wtedy zapisać skoroszyt z odpowiednim rozszerzeniem tzn. Skoroszyt programu Excel z obsługą makr (Rys. 10).

(Rys. 10)

Polecamy także:

• Programowanie VBA: konstrukcja warunkowa If Else

• Programowanie VBA: konstrukcja Select Case