Jakiś czas temu pisałem dla klienta mini aplikację, która miała za zadanie prowadzenie ewidencji umów. W skrócie: gdy pracownik pozyskał klienta to wprowadzał do formularza dane. Następnie makro sprawdzało różne warunki, generowało różne raporty i wstawiało do arkusza odpowiednie dane. Każdy pracownik miał swoją własną pulę numerów umów. Numer umowy miał następujący schemat: Akronimem pracownika… Dowiedz się więcej »
Czasami chcemy zwrócić nazwę aktualnego miesiąca. Pierwsza myśl, jaka przychodzi mi do głowy to prosta instrukcja Select Case: Jest jednak prostszy sposób.
Wielokrotnie podczas programowania potrzeba zwrócić numer miesiąca (niekoniecznie aktualnego) jako liczbę rzymską. Po co? Otóż czasami np. wygenerowany numer zamówienia ma w sobie zawarty miesiąc. I klientka zażyczyła sobie, aby miesiąc nie był jako numer miesiąca, tylko była to liczba rzymska. Pierwsza moja myśl była następująca: Instrukcja Select Case jest bardzo wygodna, gdyż w przypadku… Dowiedz się więcej »
Czasami chcemy usunąć wszystkie hiperłącza w aktywnym arkuszu. Do napisania tej notki zainspirował mnie wpis z mojego drugiego bloga: Walidacja adresów e-mail w Excelu. Podczas wklejania adresów e-mail do arkusza czasami Excel mi automatycznie tworzył z adresów e-mail hiperłącza. A ja tego nie chciałem. Wiem, można w ustawieniach autokorekty wyłączyć automatyczne tworzenie hiperłączy ale załóżmy,… Dowiedz się więcej »
Podczas pisania makr gdy robię coś na szybko i potrzebuję pobrać jakąś informację od użytkownika to używam instrukcji InputBox. Oto prosty przykład: Niestety, ale owe okienko nie wygląda zbyt okazale Tutaj mała uwaga: funkcja InputBox zwraca wartość typu String. Jeśli zwróci pusty ciąg znaków, to znaczy, że użytkownik kliknął w przycisk Anuluj (Cancel). W tym… Dowiedz się więcej »
Czasami w VBA potrzebowałem zamienić numer kolumny na jej nazwę. Przykładowo pierwsza kolumna ma etykietę A, druga kolumna to B a dziesiąta to J. Tak wiem, czasami można się odwoływać podając numer kolumny np. jeśli chcę coś wpisać do kolumny J10 to mogę napisać: albo Ale czasem jest tak, że np. w zmiennej typu Long… Dowiedz się więcej »
Chcesz zrobić komuś psikusa? Ukryj mu wstążkę. I to całkowicie!
Dawniej, gdy chciałem odczytać zawartość kilku kolejnych komórek do tablicy to deklarowałem tablicę dynamiczną. Za pomocą instrukcji ReDim zmieniałem rozmiar tablicy a następnie za pomocą pętli for odczytywałem po kolei po jednej komórce do tej tablicy. Oto przykładowy kod: Ponieważ nie wiem ile wierszy może być zapisanych w kolumnie A to skorzystałem z dodatkowej funkcji,… Dowiedz się więcej »
Czasami chcemy na pasku stanu pokazać jakiś komunikat. Przykładowo nasza aplikacja przetwarza dane (co może trwać np. kilkadziesiąt sekund) i chcemy wyświetlić informację, aby użytkownik się nie niecierpliwił. Albo być może co jakiś czas chcemy pokazać procent zaawansowania wykonanej operacji. Teraz pojawia się pytanie, jak taki tekst umieścić.
Załóżmy, że w kolumnie A mam np. listę adresów e-mail, na które chcę wysłać wiadomość. Pojawia się pytanie: jak szybko sprawdzić ile mam adresów e-mail. Oto prosta funkcja, która dla danej kolumny zwraca numer ostatniego wiersza: