Разделы презентаций


Informatyka i ekonometria

Cele prezentacji: Poznanie zagadnień:Funkcja VBAInstrukcja warunkowa If i instrukcja wyboru Select Case.

Слайды и текст этой презентации

Слайд 1Akademia Górniczo- Hutnicza im. Stanisława Staszica w Krakowie Wydział: Zarządzania Kierunek:

Informatyka i ekonometria
Paulina Królczyk

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

Слайд 2Cele prezentacji:
Poznanie zagadnień:
Funkcja VBA
Instrukcja warunkowa If i instrukcja wyboru Select

Case.

Cele prezentacji:	Poznanie zagadnień:Funkcja VBAInstrukcja warunkowa If i instrukcja wyboru Select Case.

Слайд 3Polecenia do wykonania:
1. W edytorze VBA, w nowym module napisałam

funkcję VBA o nagłówku:
 
Function lata_pracy(data As Date) As Integer
 
zwracającą wartość

ilości przepracowanych lat obliczanych na podstawie różnicy lat pomiędzy rokiem bieżącym a rokiem, w którym pracownik został zatrudniony. Wykorzystałam funkcję Visual Basica Year(….) w arkuszu kalkulacyjnym i użyłam tej funkcji w odpowiedniej formule umieszczonej w kolumnie o nagłówku lata pracy.
 


Polecenia do wykonania:1. W edytorze VBA, w nowym module napisałam funkcję VBA o nagłówku: 	Function lata_pracy(data As Date)

Слайд 42. Napisałam funkcję VBA o podobnym nagłówku lecz nazwie lata_pracy1,

która zwraca wartość ilości faktycznie przepracowanych lat obliczanych za pomocą

funkcji WorksheetFunction.YearFrac. Zapoznałam się w pomocy Visual Basic z opisem tej funkcji. Użyłam funkcji Int do zaokrąglenia do części całkowitej wartości zwracanej przez funkcję YearFrac. W arkuszu kalkulacyjnym w kolumnie o nagłówku lata pracy zamień wywołanie funkcji lata_pracy na lata_pracy1.




2. Napisałam funkcję VBA o podobnym nagłówku lecz nazwie lata_pracy1, która zwraca wartość ilości faktycznie przepracowanych lat

Слайд 5 3. Napisałam funkcję VBA o nagłówku:
Function Wysługa(lata As Integer, pensja

As Currency) As Currency
której wynikiem jest wartość wysługi lat obliczonej

wg formuły z treści zadania. W tym celu wykorzystałam składnię instrukcji If zastosowaną w przykładowej funkcji Podatek. Zastosowałam funkcję Wysługa w formule umieszczonej w kolumnie o nagłówku wysługa. Jako jeden argumentów przyjmij wartości znajdujące się w kolumnie lata pracy.





3. Napisałam funkcję VBA o nagłówku:	Function Wysługa(lata As Integer, pensja As Currency) As Currency	której wynikiem jest wartość

Слайд 6 4. Napisałam funkcję VBA o nagłówku:
Function Wysługa1(data As Date,

pensja As Currency) As Currency, wyznaczającą podobnie jak poprzednia wysługę

lat. Wywołałam funkcję lata_pracy1 wewnątrz tej funkcji, w celu wyznacznie lat pracy na podstawie argumentu data. . Ponadto zastosowałam zamiast instrukcji If instrukcję Select Case wzorując się na przykładzie funkcji podatek1. Wywołałam tę funkcję w arkuszu w nowej kolumnie o nagłówku wysługa1.

4. Napisałam funkcję VBA o nagłówku: 	Function Wysługa1(data As Date, pensja As Currency) As Currency, wyznaczającą podobnie

Обратная связь

Если не удалось найти и скачать доклад-презентацию, Вы можете заказать его на нашем сайте. Мы постараемся найти нужный Вам материал и отправим по электронной почте. Не стесняйтесь обращаться к нам, если у вас возникли вопросы или пожелания:

Email: Нажмите что бы посмотреть 

Что такое TheSlide.ru?

Это сайт презентации, докладов, проектов в PowerPoint. Здесь удобно  хранить и делиться своими презентациями с другими пользователями.


Для правообладателей

Яндекс.Метрика