Excel, Access, VBA ....

Funkcja statystyczna Excela ILE.LICZB() ilość komórek zawierających liczby w danym zakresie arkusza.
W kodzie VBA funkcja ILE.LICZB() występuje jako funkcja arkuszowa COUNT().

Pakiet Microsoft Office jest oprogramowaniem szeroko dostępnym, choć nie bezpłatnym. Nawet wersja do użytku domowego, w zależności od sklepu i aktualnej promocji jednak kosztuje ok.300zł. Licencja dla małych firm jest jeszcze droższa. Dla niektórych może być to spory wydatek. Czy da się to obejść? Pomijam oczywiście korzystanie z wersji pirackich.
Można i to całkiem skutecznie, choć oczywiście w ograniczonym zakresie. Takim rozwiązaniem jest wolne oprogramowanie OpenOffice:

Oprogramowanie w firmie i nie tylko

W dodatku - w znacznej części jest kompatybilne z pakietem Microsoftu. Można w nim nawet tworzyć prezentacje. Trzeba tylko odzwyczaić się od nawyku otwierania i zapisywania dokumentów zgodnie z domyślnymi ustawieniami.
Może szkoda, że OpenOffice jest tak mało rozpowszechniony? Być może wynika to z faktu, że korzystając na co dzień z MO, trudno się ograniczyć do wersji okrojonej?
Ja sama też korzystam z pełnego pakietu, ale u mnie to życie i prowadzenie własnej firmy informatycznej wymusza taką konieczność. 

Z okazji Światowego Dnia Książki, w dnaich 23-25 kwietnia ceny ksiażek w ksiegarniach grupy wydawniczje Helion obniżone o 20%. Jest to świetna okazja, aby zdecydować się na którąś z pozycji również z literatury informatycznej.
Może warto skorzystać?

Promocja

Funkcja statystyczna Excela ILE.NIEPUSTYCH() wyszukje w ilość niepustych komórek w danym zakresie arkusza.
W kodzie VBA funkcja ILE.NIEPUSTYCH() występuje jako funkcja arkuszowa COUNTA().

Funkcja statystyczna Excela ŚREDNIA.GEOMETRYCZNA() wyznacza wartość średniej geometrycznej z kilku liczb lub zakresu liczb. Ignoruje wartości puste i tekstowe.
Matematycznie średnia geometryczna n liczb to funkcja będąca pierwiastkiem n-tego stopnia z iloczynu tych liczb:

   _{n ______________} 
 √a₁*a₂*a₃*...a_n

W kodzie VBA funkcja ŚREDNIA.GOMETRYCZNA() występuje jako funkcja arkuszowa GEOMEAN().

Funkcja statystyczna Excela MEDIANA() wyznacza wartość mediany z kilku liczb lub zakresu liczb. Ignoruje wartości puste i tekstowe.
Matematycznie jest to funkcja wyznaczająca ze zbioru liczb taką, której wartość jest pośrodku. Tyle samo liczb z tego zbioru jest od niej większych i tyle samo - mniejszych.
W jaki sposób wyznaczyć medianę? Ustawiay liczby w kolejności od najmniejszej do największej oraz liczymy ile ich jest. DLa nieparzystej ilości tych liczb - medianą jestta dokładnie pośrodku uporządkowanego zbioru. Jeżeli liczb jest parzysta ilość - to średnia arytmetyczna dwóch środkowych.  

Np. mamy liczby:

3, 7, 12, 4, 5

Po uporządkowaniu ich rosnąco otrzymujemy:

3, 4, 5, 7, 12

Medianą jest tu liczba 5.

Dokładając jeszcze np. 0 otrzymujemy:

0, 3, 4, 5, 7, 12

W tym przypadku medianą będzie średnia arytmetyczna liczby 4 i 5 czyli 4,5.

W kodzie VBA funkcja ŚREDNIA() występuje jako funkcja arkuszowa MEDIAN().

Funkcja statystyczna Excela ŚREDNIA() wyznacza wartość średnią z kilku liczb lub zakresu liczb. Ignoruje wartości puste i tekstowe.
Matematycznie jest funkcją wyliczającą średnią matematyczną czyli wartość sumy kilku liczb podzieloną przez ich ilość:

(a₁ + a₂ + a₃ + ... a_n ) / n

W kodzie VBA funkcja ŚREDNIA() występuje jako funkcja arkuszowa AVERAGE().

Kolejna promocja wydawnictwa Helion:

Warto zajrzeć - książki tańsze o 10%, tylko do 12 marca.

Kwerenda Accessa to jedno z najbardziej przydatnych narzędzi Accessa, o bardzo szerokim zastosowaniu. Stanowi swoistą nakładkę na tabele, pozwalając na wybieranie, filtrowanie czy zliczanie konkretnych danych.

Nową kwerendę tworzymy wybierając odpowiednią opcję z wstęgi Tworzenie.
Najprościej zacząć od Kreatora kwerend.

W kolejnym kroku wybieramy rodzaj tworzonej kwerendy

Przenosimy wszystkie lub wybrane pola do kwerendy

Na końcu pozostaje już tylko wpisać nazwę kwerendy

Kwerenda prosta została utworzona.

Problem wygląda tak: jest arkusz Excela z tabelą i potrzebne jest makro, które będzie drukowało określoną wartością jednej z komórek liczbę kopii. Jego rozwiązanie może być dobrym przykładem na ilustrację procesu nagrywania i edycji makra.

W arkuszu mamy tabelę. Wyróżniona została tu komórka I15, która ma determinować liczbę kopii wydruku. Oczywiście musi to być liczba całkowita.

Nagrywanie makra rozpoczynamy na wstędze Developer, wybierając przycisk
Zarejestruj makro.

Po naciśnięciu tego przycisku - wszystkie czynności będą rejestrowane i powtórzone po każdym uruchomieniu makra.Sam przycisk zmienia się na Zatrzymaj rejestrowanie i służy do zakończenia jego nagrywania.

Nagrywając makro do tego przykładu - ustawiłam liczbę kopii na 5. Żeby zmienić to na wartość odczytywaną z komórki I15 - przejść do edycji makra w kodzie VBA.
Na wstędze Developer - wybieramy przycisk Visual Basic.

Z lewej strony edytora odszukujemy moduł 1 - tam jest zarejestrowane nasze makro:

Dwukrotne kliknięcie w moduł powoduje jego otwarcie

Widać tu zapisane w kodzie VBA makro. Kluczowa w zapisie jest jest liczba 5 - taka ilość kopii była początkowo ustawiona i właśnie w tym miejscu konieczna jest zmiana.
Z Makra1 skopiowałam funkcję wywołującą drukowanie (uwaga: w zależności od drukarki i ustawienia pozostałych parametrów wydruku może się nieco różnić) . Stworzyłam nowe makro Druk, w którym wstawiłąm skopiowany fragment, nieco go zmieniając.
Tam, gdzie byla liczba 5 - czyli liczba kopii ustawiona podczas nagrywania makra - wstawiłam wartośc zmiennej IleKopii. W moim przypadku - zmienna ta odwołuje się do komórki I15, ale można wstawić tu dowolną inna komórkę. Ważne, aby była to liczba naturalna.

Teraz pozostaje już tylko zapisanie pliku - jako skoroszytu z obsługą makr - rozszerzenie
xlsm.

Oczywiście pozostaje jeszcze kwestia jak uruchamiać makro. To zagadnienie opisane jest tu:
Uruchamianie makra

A całość w formie tutorialu jest tu:

Przykładowe makro