Excel – kurs zaawansowany

 

Klawisze

1 pole:

Prawy róg -    

a)      Gdy liczby
          z Ctrl    - przeciąganie - wyliczanie z krokiem 1
               (np. 11, 12, 13…)

                    bez Ctrl  - przeciąganie – kopiowanie (np. 11, 11, …)

b)      gdy np. poniedziałek lub maj 

        z Ctrl – poniedziałek lub maj - kopiowanie (odwrotnie niż wyżej)

      - bez Ctrl - wtorek, środa lub maj, czerwiec– kolejne dni lub miesiace

 

2 pola zaznaczone - z Ctrl   - kopiowanie naprzemienne

                    bez Ctrl - wyliczanie z odpowiednim krokiem

 

 

=Suma(A2:A9;B@:B9) - można wskazywać kursorem

 

Suma.Jeżeli(Zakres;Kryteria;Suma_zakres);

np. Suma.Jeżeli(a1:a4;">16000";b1:b4)

    Suma.Jeżeli(f2:f6;f8;e2:e6)

    f2:f6 -> 7%, 22%, 0%, 22%

    f6 -> 22%

     e2:e6 -> 1000, 2000, 400, ...

  - sumuje wartości dla danego procentu VAT, tu 22%

 

Zabezpieczenie:

Menu Narzędzia, Zabezpieczenie

      -"-       Odbezpieczenie

 

Normalnie komórki zaryglowane, nie pozwalają na wprowadzenie danych.

Można usunąć opcję Zarygluj - zaznaczyć zakres, prawy przycisk myszy,

Przekładka Ochrona, usunąć zarygluj - w stanie odbezpieczenia.

Po zabezpieczeniu można wprowadzać wartości.

Polecenie Zabezpiecz arkusz i polecenie Odbezpiecz arkusz

(menu Narzędzia, podmenu Zabezpieczenie)

 

Polecenie Zabezpiecz arkusz

Zapobiega zmianom w komórkach arkuszy i arkuszach makr

Microsoft Excel wersja 4.0, elementach wykresu, obiektach graficznych

w arkuszu lub arkuszu wykresowym, kodzie modułu Visual Basic, lub

elementów arkusza dialogowego.

Przed użyciem tego polecenia do zaryglowania arkusza, można zablokować

lub odblokować zakresy komórek arkusza i obiekty graficzne.

Hasło

Umożliwia przypisanie hasła tak, że użytkownicy muszą znać hasło, by usunąć zabezpieczenie

arkusza.

Zawartość

Zabezpiecza komórki arkuszy roboczych i arkuszy makr w programie Microsoft Excel wersja 4.0,

oraz zabezpiecza elementy wykresów. To pole wyboru nie pojawia się, jeœli arkusz aktywny jest

arkuszem dialogowym lub modułem Visual Basic.

Obiekty

 

Polecenie Zabezpiecz skoroszyt

Zapobiega zmianom w układzie i sposobie wyświetlania skoroszytu.

Hasło

Umożliwia przypisanie hasła tak, że użytkownicy muszą znać hasło, by usunąć zabezpieczenie

skoroszytu.

Okna

Zabezpiecza okna przed przesuwaniem lub zmianą rozmiaru.

Ikony zmniejszania i zwiększania, pole menu Sterowanie, i granice wyznaczające rozmiary

okna są ukryte.

Układ

Zapobiega zmianom w układzie skoroszytu tak, że arkusze nie mogą być usuwane,

przemieszczane, ukrywane, odkrywane lub mieć zmieniane nazwy, a także nie można

wprowadzać nowych arkuszy.

Uwaga  Ten stopień zabezpieczenia zapobiega szeregu rodzajom działań, w których wyniku

powstałby nowy arkusz w skoroszycie.

Polecenie Odbezpiecz skoroszyt

Usuwa zabezpieczenie z aktywnego skoroszytu.

Hasło

Jeśli przypisano hasło, gdy zabezpieczano skoroszyt, należy wprowadzić takie samo hasło, by

usunąć zabezpieczenie.

Rozdział 39, "Zabezpieczanie skoroszytu"

Zabezpiecza obiekty graficzne w arkuszach i wykresach przed przemieszczeniem, edytowaniem,

zmianą rozmiaru lub usunięciem. To pole wyboru nie pojawia się, jeśli arkusz aktywny jest

arkuszem dialogowym lub modułem Visual Basic.

Scenariusze

Zapobiega zmianom w określeniu scenariuszy w arkuszu roboczym.

 

Ukrywanie arkusza:

Menu Format, Arkusz, Ukryj

                     Odkryj

 

LICZBA.CAŁK

Funkcja obcina liczbę do liczby całkowitej usuwając jej część ułamkową.

Składnia

LICZBA.CAŁK(liczba, liczba_cyfr )

Liczba    jest liczbą, która ma być obcięta.

Liczba_cyfr     jest liczbą określającą dokładność obcinania.
Domyślnie wartością argumentu 

liczba_cyfr  jest zero.

Uwagi

Funkcje LICZBA.CAŁK i ZAOKR.DO.CAŁK są podobne w tym, że obydwie obliczają wartości

całkowite.LICZBA.CAŁK usuwa ułamkową część liczby,  ZAOKR.DO.CAŁK zaokrągla liczby w dół do

najbliższej liczby całkowitej względem ułamkowej części liczby.
Funkcje  ZAOKR.DO.CAŁK i LICZBA.CAŁK są różne tylko w przypadku liczb ujemnych: 
LICZBA.CAŁK(-4.3) podaje w wyniku -4,
a

ZAOKR.DO.CAŁK(-4.3) podaje w wyniku -5, ponieważ -5 jest liczbą mniejszą.

Przykłady

LICZBA.CAŁK(8,9) jest równe 8

LICZBA.CAŁK(-8,9) jest równe -8

LICZBA.CAŁK(PI()) jest równe 3

Funkcje pokrewne

ZAOKR.W.GÓRĘ    Zaokrągla liczbę do najbliższej liczby całkowitej lub do najbliższej wielokrotnoœci

znaczenia

ZAOKR.W.DÓŁ       Zaokrągla liczbę w dół, w stronę zera.

ZAOKR.DO.CAŁK  Zaokrągla liczbę w dół do najbliższej liczby całkowitej.

MOD  Podaje w wyniku resztę z dzielenia.

ZAOKR         Zaokrągla liczbę do wybranej liczby cyfr.

 

Lista Funkcje matematyczne i trygonometryczne

 

Prz. Liczba.Całk(A16/10)  -> gdy A16=73 to wynik = 7

 

MOD(A16;10)  - gdy A16=73 to wynik 6

 

Złącz.Teksty(a18;B18;" zł") - przykł. łączenia tekstów

 

Odwoływanie się do innego arkusza, np.

='Rachunek uproszczony'!.A14

 

Startup - automatyczne umieszczanie arkusza

 

Narzędzia - Szukaj wyniku

np.

PMT(A4/12;A5;Q6)

 

PMT

Podaje w wyniku sumę płatnoœci za pożyczkę w oparciu o stałe płatnoœci i stałą stopę procentową.

Składnia

PMT(Stopa  ; lpr ; pv ; fv ; typ )

Dokładniejszy opis argumentów funkcji  PMT znajduje się w opisie funkcji PV.

Stopa     jest stopą procentową w danym okresie.

Lpr    jest całkowitą liczbą płatności w czasie pożyczki.

Pv    jest aktualną wartością - całkowitą sumą jaką seria przyszłych płatności jest warta.

Fv    jest przyszłą wartością lub poziomem finansowym, do którego zmierza się po dokonaniu ostatniej płatności.
Jeśli argument jest pominięty, to jako jego wartość przyjmuje się 0 (przyszła wartość pożyczki na przykład wynosi 0)..

 

Typ     Jest to cyfra 0 lub 1 wskazująca, kiedy płatność ma miejsce.

Wartość typ  
Płatność przypada na 0 lub jest pominięty   koniec okresu

1          początek okresu

Uwagi

 Płatności obliczane przez  PMT zawierają podstawę a odsetki nie zawierają podatków, czy innych opłat związanych z pożyczką

Należy się upewnić, czy dobrze została zrozumiana treść dotycząca argumentów stopa  i lpr.

Jeśli dokonuje się miesięcznej spłaty czteroletniej pożyczki oprocentowanej na 12% rocznie, to  stopa  wynosi 12%/12, zaś  lpr 4*12.
Jeśli dokonuje się rocznych spłat tej samej pożyczki to. stopa wynosi 12%, a  lpr 4.

 

Wskazówka    Aby uzyskać całkowitą sumę płatną po okresie trwania pożyczki należy pomnożyć

wynik  PMT przez lpr.

 

Przykłady

Następująca formuła makro oblicza miesięczną kwotę spłaty pożyczki w wysokości 10 000 dolarów

oprocentowaną na 8% rocznie, która musi być spłacona w ciągu 10 miesięcy:

PMT(8%/12; 10; 10 000) jest równe -$1037,03

Dla tej samej pożyczki, jeśli płatnosci przypadają na początek okresu spłata wynosi:

PMT(8%/12; 10; 10 000; 0; 1) jest równe -$1030,16

Poniższa formuła makro oblicza sumę, jaką trzeba zapłacić miesięcznie, jeśli pożyczka 5000 dolarów

na 12% ma być spłacona w ciągu pięciu miesięcy:

PMT(12%/12; 5; -5000) jest równe $1030.20

 

Załóżmy, że suma 50 000 dolarów ma być zaoszczędzona w ciągu 18 lat dzięki odkładaniu co rok stałej

kwoty i przyjęciu założenia, że można zarobić 6% odsetek od oszczędności, można wtedy użyć funkcji 

PMT aby określić, ile można zaoszczędzić co miesiąc.:

PMT(6%/12; 18*12; 0; 50000) jest równe -$129,08

Jeśli co miesiąc wpłaca się 129,08 dolarów na rachunek oprocentowany na 6%,
to po 18 latach uzyska się 50 000 dolarów.

 

Funkcje pokrewne

FV      Podaje w wyniku przyszłą wartość lokaty

IPMT Podaje w wyniku odsetki od lokaty w podanym okresie

NPER Podaje w wyniku liczbę okresów dla żądanej wartości lokaty

PPMT            Podaje w wyniku płatności od lokaty w podanym okresie

PV      Podaje w wyniku obecną wartość lokaty

RATE            Podaje w wyniku stopę procentową dla rentowności lokaty

 

Lista Funkcje finansowe

 

       Bank A  21% w skali roku 

       Bank B    20,00%           w skali roku, kapitał w skali miesiąca      

 

Kwota wyjściowa 10000zł = C2

Bank B:

Oproc. m-c = 20%/12=B2/12=1,667=B4

I  mc  C2*(1+B4)=B5

II mc  B5*(1+$B$4)

III mc B6*(1+$B$4)

Itd. do 12 m ca

Inaczej: C2*(1+B4)^12

Bank A

D16=C2*(1+D2)

 

  A         B                          C

  Banknoty

14        B14=Kwota

16  200   Liczba.Całk(B14/A16)      MOD(B14;A16)

17  100   Liczba.Całk(C16/A17)      MOD(C16;A17) 

itd.

 

Oprocentowania

A1 25%

A2 24 mce

A3 15000zł

raty=-PMT(A1/12;A2;A3)=-PMT(25%/12;24;15000)

 

Rozszerzenie możliwości Excell'a

Analysis Tool Pack - generator liczb pseudolosowych, autoregresja,

inne obl. statystyczne

 

Przenoszenie formuły - wzory są aktualne (adresy się nie zmieniają),

przy kopiowaniu nie!.

 

 

TABLICE

            A

1     22% oproc. roczne

2     24  miesiące (raty)

3    15000 pożyczka

 

  -PMT(a1/12;a2;a3)  20%  30%  40%

  1000

  2000

  3000

Dane, Tabela, Wiersz komórki wejśc : A1 (procenty)

              Kolumna komórki wejść: A3 (pożyczka)

 

Wprowadzanie wzoru do tablicy:

zaznaczyć obszar, wprowadzić wzór, wcisnąć  CTRL SHIFT ENTER

np.

            F     G

1       1     =PIERWIASTEK(F1:F3)

2          4

3       9

 

 

 

Linie siatki - Narzędzia, Opcje, Widok, Linia siatki

Pole tekstu - prostokąt z liniami w menu górnym, wskazujemy naroża

 

Serie danych:  Zaznaczyć obszar, Edycja, Wypełnienie, Serie danych

 

 

BAZA DANYCH

 

Rekord - zbiór wszystkich pól jednego wiersza, które wzajemnie wchodzą

ze sobą w relację.

W Excelu 255 pól.

Obecnie określa się relacje między bazami.

Wszystkie bazy relacyjne, poza kartotekami.

TAB - przechodzenie między polami

 

Formularz - do wprowadzania i oglądania wyników

 Kryteria - Enter

 

Autofiltr

 Dane  Filtr  Autofiltr

Lista rozwijalna: [wszystkie], [specjalne], pola, [puste], [Niepuste]

 

Np. Ile osób posiada wykształcenie wyższe:

Dane: Filtr Autofiltr  pole wykształcenie - suwak na wyzsze

 

Ile osób ma pensje>700zł i samochód Tak

AutoFiltr,

 Pensja specjalne - > 700

 Samochód   Tak

 

Osoby < 25 lat i (lub - w komputerze) powyżej 50 lat             

Autofiltr, wiek, specjalne

   < 25

             lub

   > 50

 

Kobiety z samochodem

Autofiltr,  płeć K,  Samochód Tak  -  Logiczne i

 

Kobiety lub osoby z samochodem - nie ma takiej możliwoœci

w Autofiltrze - jest tylko operator i

 

Autofiltr - do prostych operacji

 

SORTOWANIE

 

A  Z

Z  A   - sortowanie tylko kolumny

 

Z Menu:

Dane  Sortuj 

Sortuj wg pola: rosnąco, malejąco

Następnie wg pola

Następnie wg pola

Opcje:

 Porządkuj pierwszego klucza:

                             Normalny,  z listy

Dodanie listy:

Narzędzia  Opcje  Listy  Dodaj   Pozycja listy -

                                                 wpisać  poz. i Enter,

np.  Podstawowe

     średnie

     wyższe

 

Sortowanie w wierszu

Np.  Ola  Ala Tomek

Zaznaczamy obszar, Dane, Sortuj,  Opcje,   Kierunek  Lewo prawo

 

 

Filtr zaawansowany

Przygotować zestawienie kryteriów np. ponad listą

Np.

     A                B

1  samochód    płeć

2    tak k

 

Wskazać komórkę listy

Dane  Filtr zaawansowany

Czynność:  Filtruj listę w miejscu (domyślnie)

               Kopiuj w inne miejsce

  Zakres listy: (sam podaje dobry)

  Zakres kryterium: np. A1:B2  (wskazać obszar myszą) 

 

Dane Filtr Pokaż wszystko - wyjście z filtrowania

 

Inne przykłady:

Nr_wiersza   Pola listy

            samochód   płeć  pensja

  1       tak            k     >500    - warunek i bo w jednej linii

 

            samochód   płeć  pensja

  1       tak                       - warunek lub bo w różnych liniach

  2                 k     

                                     >500

 

wykształcenie wyższe lub  (m i wiwk>29)

  wykształcenie  płeć  wiek

1   wyższe

2                 m     >29

 

F5 - przechodzenie między arkuszami, obszarami...

 

 

Oprocentowanie

10% - 30%  w skali roku - odsetki (na rok)

6 mcy do 24 mcy - ilość_mcy

stawka do kapitalizacji (wpłata do banku) - Kwota_wyjść -  10000zł

 

Kwota_z_oprocent = Kwota_wyjść * (1+odsetki/12)^ilość_mcy

     A

1    20%

2    6

3    10000

 

               A3*(1+A1/12)^A2      10%   20%  30%

                6

                    12

                        24

W narożu wzór, wskazujemy obszar, Dane, Tabela,

Wierszowa komórka wejściowa

Kolumnowa komórka wejściowa

 

Tablice (Tabela) dobre dla 2 zadań o 2 zmiennych

 

 

Porównanie raty stałej i zmiennej

            A

1       20%

2       12 rat

3       10000zł

 

Spłaty stałe

5  -PMT(A1/12;A2;A3)=926,35 - opłata stała ("równe raty - spłaty")

6   12*926,35=11116,14zł - suma wpłat przy równych wpłatach

 

8  =średnia(E13:E24)=923,61

9  =Suma(E13:E14)=110833,33

10 =A8*Ile.Liczb(E13:E24) 

 

Spłaty zmienne

 

      A               B                     C                     D         E

    Miesiąc Pozost.do_spłaty Odsetki         Raty   Spłata

13  styczeń  10000  C13=B13*A1/12  D13=Jeżeli(B13>A3/12;A3/12;B13)

                                               E13=jeżeli(B13>0;C13+D13;"")

14   luty     =B13-D13                                 

 

-------------------------------------------------------------------

 

ARKUSZ z Huty

Metoda  =SUMA($B4:B4)

 

Filtr zaawansowane

 

Nagłówki pól na górze

Warunki dla kryterium na dole

Zaznaczyć obszar bazy danych

Np.

(imię A i wiek>25) lub (samochód i wyższe)

Imię  wiek  samochód  wykształcenie

A* (lub A)    >25

              tak       wyższe

 

Dane  Filtr  Zaawans.

Zakres listy - baza

Zakres kryterium - wskazać

 

Zadanie - przenieść wyniki filtrowania do innego arkusza

Arkusz3

Baza Filtr zaawansowane

Czynnoœć: Kopiuj w inne miejsce

Przejść do arkusza: Baza danych, wskazać obszar bazy,

potem warunki kryterium

Kopiuj do: A1 w Arkusz3 (wskazać A1)

Można wstawić LP, automatycznie ponumerować.

 

Przykład

samochód lub (ukończ 25 rok życia) lub (wyższe i kobieta)

samochód  wiek  wykształcenie  płeć

 tak

          >25

                   wyższe       k

 

 

Ukrycie kolumn - zaznaczenie kolumny, prawy klawisz myszy, ukryj.

Odkryj - zaznaczenie sąsiednich kolumn, odkryj

 

Zabezpieczenie skoroszytu - pozwala odkryć.

 

Zabezpieczenie arkusza - nie pozwala odkryć.

Np. Uwagi - zabezpieczone na hasło - można edytować, nie można

odkryć.

 

Hasło - min. 6 znaków, 2 cyfry - np. cd12az

 

Zaznaczenie kilku arkuszy - zaznaczyć arkusz, przytrzymać Shift,

zaznaczyć ostatni arkusz z grupy.
Usunięcie grupy zaznaczenia arkuszy

- prawy klawisz myszy, usuń.

 

Przesuwanie arkuszy - wskazujemy myszą, przytrzymujemy, przesuwamy.

 

Przesuwanie arkuszy z innych plików do plików

np. Plik  Nowy  Arkusz1 - zmiana nazwy na Analiza

- skopiować ten arkusz do Baza.XLS:

 Prawy klawisz myszy na ANaliza,

 Przesun lub Kopiuj (otwarty musi być plik Baza.xls), przed Arkusz1

- klikamy Arkusz1, utwórz kopię

 

Menu Okno - przejść do innego pliku

 

 

Nazwa komórek - w polu nazwy - klikamy i wpisujemy nazwę, np. Cena

Przykład

Klikamy w A2 - w polu nazwy piszemy Cena

        w B2 -   -"-                Ilość

w C2 piszemy formułę: =Cena*Ilość

 

 

MAKROPOLECENIA

 

Wstaw Makro Moduł

Kartka edytora

 

Przykład:

'Makro wyświetlające okienko

Sub Okienko()  'procedura bez parametrów

    MsgBox ("Dzień dobry")

End Sub

 

Arkusz2 - uruchom makro

Narzędzia Makro  Nazwa/adres makra  Wybieramy "Okienko" Uruchom

 

Na dole obok arkuszy pojawił się Moduł1

 

By przejść do edycji klikamy na Moduł1 lub

Narzędzia Makro Nazwa Edytuj

 

Opis MsgBox:

 

MsgBox(tekst,przyciski,TytułOkna,HelpFile)

    przyciski np. Tak/Nie      specjalny edytor pomocy do HelpFile

 

Displays a message in a dialog box, waits for the user to choose

a button, and returns a value indicating which button the user has chosen.

Syntaktyka:  MsgBox(prompt[,buttons][,title][,helpfile,context])

Elements:

The MsgBox function syntax has these named-argument parts:

Part     Description

prompt            String expression displayed as the message in the dialog box.

 

The maximum length of prompt is approximately 1024 characters, depending

on the width of the characters used.  If prompt consists of more than one

line, be sure to include a carriage return (character code 13)

or carriage return linefeed (character code 10) between each line.

buttons            Numeric expression that is the sum of values specifying

the number and type of buttons to display, the icon style to use,

the identity of the default button, and the modality.  If omitted,

the default value for buttons is 0. title String expression displayed

 in the title bar of the dialog box.  If you omit title, nothing is

placed in the title bar.

 

helpfile            String expression that identifies the Help file to use

to provide context-sensitive Help for the dialog box.

If helpfile is provided, context must also be provided.

context            Numeric expression that is the Help context number the Help

author assigned to the appropriate Help topic.

If context is provided, helpfile must also be provided.

 

The buttons named argument has these values:

Constant         Value  Description

vbOKOnly      0          Display OK button only.

vbOKCancel   1          Display OK and Cancel buttons.

vbAbortRetryIgnore  2          Display Abort, Retry, and Ignore buttons.

vbYesNoCancel         3          Display Yes, No, and Cancel buttons.

vbYesNo        4          Display Yes and No buttons.

vbRetryCancel           5          Display Retry and Cancel buttons.

vbCritical        16        Display Critical Message icon.

vbQuestion     32        Display Warning Query icon.

vbExclamation           48        Display Warning Message icon.

vbInformation            64        Display Information Message icon.

vbDefaultButton1      0          First button is default.

vbDefaultButton2      256      Second button is default.

vbDefaultButton3      512      Third button is default.

vbApplicationModal  0          Application modal; the user

must respond to the message box before continuing work in

the current application.

vbSystemModal         4096    System modal; all applications

are suspended until the user responds to the message box.

 

The first group of values (0-5) describes the number and type

of buttons displayed in the dialog box; the second group

(16, 32, 48, 64) describes the icon style; the third group

(0, 256, 512) determines which button is the default, and the

fourth group (0, 4096) determines the modality of the message

box.  When adding numbers to create a final value for the

argument buttons, use only one number from each group. 

 

Note   These constants are specified by Visual Basic.  As a result,

the names can be used anywhere in your code in place of the actual values.

 

Return Values

Constant         Value  Button Selected

vbOK  1          OK

vbCancel         2          Cancel

vbAbort          3          Abort

vbRetry           4          Retry

vbIgnore         5          Ignore

vbYes  6          Yes

vbNo   7          No

 

Remarks

When both helpfile and context are provided, a Help button

is automatically added to the dialog box.

If the dialog box displays a Cancel button, pressing the ESC key

has the same effect as choosing Cancel.  If the dialog box contains

a Help button, context-sensitive Help is provided for the dialog box. 

However, no value is returned until one of the other buttons is chosen.

 

 

Przykład

MsgBox Function Example

The example uses the MsgBox function to display a critical-error message in a dialog box with

Yes and No buttons.  The No button is specified as the default response.  The value returned by

the MsgBox function depends on the button chosen by the user.  For purposes of this example,

assume that DEMO.HLP is a Help file that contains a topic with context number equal to 1000.

 

 

Msg = "Do you want to continue ?"  ' Define message.

Style = vbYesNo + vbCritical + vbDefaultButton2 ' Define buttons.

Title = "MsgBox Demonstration"      ' Define title.

Help = "DEMO.HLP"           ' Define help file.

Ctxt = 1000    ' Define topic context.

' Display message.

Response = MsgBox(Msg, Style, Title, Help, Ctxt)

If Response = vbYES Then   ' User chose Yes button.

            MyString = "Yes"       ' Perform some action.

 Else    ' User chose No button.

            MyString = "No"        ' Perform some action.

End If

 

 

 

Makro do wypełniania komórek kolorem

 

Arkusz2

Narzędzia  Zarejestruj makro  Nazwa makra: Wypełniacz

Operacje rejestrowania  Wybieramy kolor  Zatrzymaj makro

(lub Narzędzia Zarejestruj makro Zatrzymaj)

Pojawił się kolejny moduł, np. Moduł2

Po kliknięciu na Moduł2 wyświetla się program

 

 '

' Wypełniacz2 Makro

' Makro dn. 96-12-08 zarejestrował(a) KR

'

'

Sub Wypełniacz2()

    With Selection.Interior

        .ColorIndex = 19

        .Pattern = xlSolid

    End With

End Sub

 

 

Edytujemy program, uzupełniając o dodatkowe elementy

 

' Wypełniacz Makro

' Makro dn. 96-12-03 zarejestrował(a) Ja i Ty

Sub Wypełniacz()

    Application.ScreenUpdating = False

    imie = InputBox("Podaj swoje imię")

    tekst = "Podaj mi " & imie & " ilość powtórzeń"

    zmiany = InputBox(tekst)   

    For n = 1 To zmiany

        With Selection.Interior

            .ColorIndex = 15

            .Pattern = xlSolid

        End With

     Selection.Offset(1, 1).Select ' 1 wiersz, 1 kolumna

    Next   

End Sub

 

 

----------------------------------------------------------------

 

SUMY POŚREDNIE

 

Zadanie 1 : Arkusz Baza

Średnia pensja osób z wykształceniem wyższym, średnim, podstawowym

 

1)  Dane SORTUJ  Opcje  Porządek sortowania góra dół

    Lista posiada tytuł w I wierszu,  Sortuj wg wykształcenia

2) Dane  SUMY POŒREDNIE

   Dla każdej zmiany w Wykształcenie  Użyj funkcji Srednia,

   Dodaj sumę pośrednią do Pensja

 Wyniki:

 Po lewej stronie na górze:  1  2  3  - średnia dla całej bazy,

 wg wykształcenia, wyświetlona nazwiska i średnia wg wykształcenia.

3) Usuwanie sum pośrednich:  Dane  Sumy pośrednie  Usuń wszystko

 

Zadanie 2:  średnia kobiet i mężczyzn

Sortowanie: płeć

Sumy pośrednie: Dla każdej zmiany w płeć, użyj funkcji średnia, Pensja

 

Zadanie 3:  Wypisać ilość osób posiadających i nie posiadających samochodu

1) Sortuj - wg Samochód,  wpisać NIE w puste miejsca, skopiować w dół

2) Sumy pośrednie,  samochód,  funkcja Licznik

 

Zad. 4:  Sumy pośrednie dla osób posiadających samochód i najniższą pensję ?

 

Zad. 5:  średnia pensja dla kobiet posiadających samochód i pozostałych

1) Definiujemy kolejne pole, np. Warunek, a poniżej np. w polu H1

   (pole danych) piszemy wzór:

   =JEŻELI(ORAZ(D11="tak";E11="k");"T";"N")

3) Sortujemy wg warunek1

4) Sumy pośrednie - Dla każdej zmiany w  Warunek, Funkcja średnia, Pensja

 

Zad. 6:

I.   Kobiety i wiek >25        (  ORAZ(płeć="k";wiek>25) -> "1"

II.  mężczyźni z samochodami   (  ORAZ(płeć="m";samochód="tak") -> "2"

III. pozostali                  -> "3"

1) Pole Warunek2

   w polu poniżej piszemy wzór:

   JEŻELI(ORAZ(E35="k";C35>25);"1";JEżELI(ORAZ(E35="m";D35="tak");"2";"3"))

 

------------------------------------------------------------------------

 

MODUŁY DOTYCZĄCE KOMEND DOS'a

 

Wstaw  Makro  Moduł,  piszemy program

1. Założenie katalogu:

Sub Nowy()

    MkDir Path:="c:\nowy" 'mkdir - funkcja VB, path - dowolna zmienna

    MsgBox ("Stworzylem katalog c:\NOWY")

End Sub

 

|> - uruchom makro - procedurę z modułu

 

Gdy jest w jednym module kilka procedur, to należy ustawić kursor w polu

procedury i kliknąć |> (trójkąt)

 

--------------------------------------------------------------------------

ALT TAB - trzymać ALT i puścić gdy przełączymy się na potrzebną aplikację.

CTRL ESC - aplikacje do wyboru

ALT ESC  - cykliczne przełączanie się między aplikacjami

--------------------------------------------------------------------------

 

Inne programy - w Moduł3

-------------------------

Sub Nowy()  ' zakłada katalog

    MkDir Path:="c:\nowy" 'mkdir - funkcja VB, path - dowolna zmienna

    MsgBox ("Stworzylem katalog C:\NOWY")

End Sub

   

Sub usun()          ' usuwa katalog

    RmDir Path:="c:\nowy" 'mkdir - funkcja VB, path - dowolna zmienna

    MsgBox ("Skasowałem katalog C:\NOWY")

End Sub

  

Sub Katalog()  ' zakłada katalog

     a = "c:\jeden" 'mkdir - funkcja VB, path - dowolna zmienna

     MkDir a

     tekst = "Stworzyłem katalog  " & a

    MsgBox (tekst)

End Sub

 

Sub Katalog1() ' zakłada podkatalog o podanej nazwie

     a = "C:\jeden" 'mkdir - funkcja VB, path - dowolna zmienna

     b = InputBox("Podaj podkatalog katalogu C:\NOWY ")

     c = a & "\" & b

     MkDir c

     tekst = "Stworzylem podkatalog  " & c

    MsgBox (tekst)

End Sub

 

Sub usun1() ' usuwa plik

     Kill "C:\jeden\a.txt"

     MsgBox ("Skasowałem plik c:\jeden\a.txt")

End Sub

 

Sub auto_open() ' automatycznie uruchamiane przy otwieraniu pliku

 a = "c:\wirus"

 MkDir a

 MsgBox ("Zawirusowałem ten komputer wirusem KILL")

End Sub

 

Sub auto_close()  ' automat. uruchamiane przy zamykaniu pliku

a = "c:\wirus"

RmDir a

MsgBox ("Usunąłem katalog C:\wirus.")

End Sub

 

----------------------------------------------------

 

Transpozycja - np. macierzy

Kopiuj

Wklej specjalnie - transpozycja

----------------------------------------------------

 

Program Easy Case - generator kodu - wykonuje schemat blokowy

 

Pisanie indeksów górnych lub dolnych - Format komórki (lub Ctrl 1),

Indeks górny lub dolny (wstawić x)