Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Все остальное / Krolczyk Paulina / paulina_krolczyk_makra_cw4.ppt
Скачиваний:
24
Добавлен:
26.03.2015
Размер:
181.76 Кб
Скачать

Akademia Górniczo- Hutnicza im. Stanisława Staszica w Krakowie Wydział: Zarządzania Kierunek: Informatyka i ekonometria

Paulina Królczyk

Ćwiczenie 4, cel:

• Poznanie zagadnień z serii Pętla for.

Zadanie 1

Projektuję makro, które zamienia cyklicznie wartości w komórkach od A1 do A20 wg następującego schematu:

Przepisuje w edytorze VBA projekt makra poniżej, zastępując instrukcje ujęte

w nawiasy klamrowe instrukcją pętli For.

Zadanie 2

Piszę makro, które zamienia cyklicznie wartości w komórkach od A1 do A20 wg następującego schematu:

Wykorzystuję do tego instrukcjię For z frazą Step.

Zadanie 3

Piszę makro, które zamienia wartości w komórkach od A1 do A20 wg następującego schematu:

A1 ↔A20, A2 ↔A19, A3 ↔A18 itd. aż do

A10 ↔A11

Modyfikuję makro w taki sposób, aby zamieniało na podobnej zasadzie wartości w komórkach zakresu zaznaczonego w Excelu, tzn. pierwszą z ostatnią, druga z przedostatnią itd. Związanie zmiennej x typu Range z wybranym zakresem komórek w arkuszu realizuje się instrukcjami:

Ilość komórek w zakresie określa wyrażenie x.Count.

Zadanie 4

Za pomocą formuły =sin(wiersz()) wypełniam komórki w zakresie D1:D30.

Następnie piszę w edytorze VBA makro, które koloruje na czerwono wartości dodatnie a na niebiesko wartości ujmemne.

Czerwony kolor tła wprowadzam w komórce [D1]

wpisując: [D1].Interior.ColorIndex = 3

Niebieski natomiast:

[D1].Interior.ColorIndex = 5

Piszę makro, które zlicza wartości ujemne i wartości dodatnie.

Wyznaczam za pomocą makra wartość minimalną i maksymalną.

Соседние файлы в папке Krolczyk Paulina