makro2

Dobra rada

Ważny jest dobór odpowiedniego typu wykresu. W prezentowanym przykładzie został wybrany wykres typu XY (Punktowy).

Sub Animacja 0

Dim x As Double Dim y As Double Dim i As Long Dim licznik As Long x = 0 y = 0

Rangę ("C6"). Select licznik = ActiveCell.FormulaR1C1 Rangę ("C2'j.Select x = ActiveCell. FormulaR1C1 Rangę ("C3").Select y = ActiveCell.FormulaR1C1 For i = 1 To licznik Rangę ("C4").Select ActiveCell.FormulaR1C1 = x Rangę ("C5").Select ActiveCell.FormulaR1C1 =y x = x + 0,01 y = y + 0,01 Next i

Rangę ("C4").Select ActiveCell.FormulaR1C1 = 0 Rangę ("C5").Select ActiveCell.FormulaR1C1 = 0

End Sub

Zauważ, że w edytorze VB dla arkusza kalkulacyjnego zadeklarowaliśmy zmienne i musieliśmy określić ich typ. Zatem z konieczności wkraczamy w omawianie struktur danych charakterystycznych dla tworzenia programów. Pojęcie typu nie jest ci obce, bowiem znasz różnice między tekstem i liczbami w arkuszu kalkulacyjnym. Tutaj w przypadku liczb trzeba dodatkowo określić, czy mają być całkowite, czy rzeczywiste (Long, Double).

Treść makropolecenia jest łatwa do interpretacji. Przed pędą odczytujemy wszystkie stałe wartości, to znaczy liczbę obliczeń i wartości początkowe argumentów funkcji SIN i COS. Dalej wypełniamy komórki C4 i C5, w który ch umieszczane są wartości argumentów x iy w kolejnych krokach powtórzeń. Ostateczne wartości funkcji SIN i COS są obliczane odpowiednimi formułami w komórkach Cl2 i Cl3.

Sposób tworzenia parametrów może być, oczywiście, inny. Ważne jest osiągnięcie w możliwie optymalny sposób zamierzonego celu.

Sprawdź czy potrafisz

? Zaprojektuj i wykonaj makropolecenie, które pozwoli na automatyczne przesuwanie odcinka równoległego do osi x z dołu do góry.

? Zaprojektuj makropolecenie przesuwające punkt po bokach dowolnego trójkąta.

382