[ Pobierz całość w formacie PDF ]
.Aby uruchomić rejestrator makr w tych aplikacjach, wybierz Makro z menu Narzędzia, a następnieZarejestruj nowe makro (rysunek 19.2).Rysunek 19.2.Okno dialogowerejestratora makrPo wywołaniu rejestratora makr, wpisz nazwę makra i naciśnij OK, aby rozpocząć proces rejestracji.Na ekranie widocznybędzie mały pasek narzędzi zawierający dwa przyciski.Przesuwając kursor myszy nad tymi przyciskami, możesz zobaczyć, żejest to zatrzymanie i pauzowanie rejestrowania.Dodatkowo, aby zasygnalizować, że działa rejestrator makr, przy kursorzemyszy widoczna jest mała kaseta magnetofonowa (rysunek 19.3).Rysunek 19.3.Dokument Wordaz pracującymrejestratorem makrW czasie pracy rejestratora wszystkie czynności, jakie wykonasz zostaną skonwertowane do kodu VBA.Możesz wpisywaćtekst do dokumentu, formatować go a nawet zapisywać i drukować.Gdy zakończysz czynności, które miały byćzarejestrowane, naciśnij przycisk Zatrzymaj rejestrowanie.Aby zobaczyć kod VBA, jaki został zapisany przez rejestrator,wybierz Makro z menu Narzędzia i z następnego menu Makra.Wybierz zapisane przez siebie makro i naciśnij przyciskEdytuj.Otworzy się edytor VBA, pokazując kod realizujący makro (rysunek 19.4).Rysunek 19.4.Kod VBAwygenerowany przezrejestrator makrw edytorze VBA339Rozdział 19.f& Integracja z Office 2000Rejestrator makr nie zawsze generuje optymalny kod, więc zawsze należygo przejrzeć przed użyciem w aplikacji.Dodanie konstrukcji With/ EndWith jest również dobrym pomysłem.Użycie makr automatycznychWord, Excel i PowerPoint zawierają mechanizm makr automatycznych.Mogą być one użyte do uruchamiania programu pozajściu określonych zdarzeń.Przykładowo, w Wordzie istnieją następujące makra automatyczne:u AutoExecute  jest wykonywane w czasie uruchamiania Worda;u AutoNew  jest wykonywane podczas tworzenia nowego dokumentu;u AutoOpen  jest wykonywane podczas otwierania dokumentu;u AutoClose  jest wykonywane podczas zamykania dokumentu;u AutoExit  jest wykonywane podczas zamykania Worda.Aby użyć tych makr należy za pomocą VBA utworzyć w module funkcję o nazwie odpowiedniego makra automatycznego.Przykładowo, aby utworzyć makro automatyczne AutoOpen, powinieneś utworzyć taką procedurę:Private/Public Sub AutoOpen ()' Kod wykonywany podczas otwierania dokumentuEnd SubMicrosoft FormsProgramy Office: Word, Excel i PowerPoint używają oddzielnego modułu formularzy Microsoft Forms.Niekiedy, gdyużywasz innych aplikacji, takie formularze mogą się przydać.Doświadczeni programiści Accessa nie będą mieli trudności w użyciu Microsoft Forms.Tworzenie formularza, używającMicrosoft Forms, przebiega według następującego scenariusza.Z menu Insert wybierz User Form lub naciśnij Shift+F7.Używając paska narzędzi, dodaj na formularz formanty.Napisz obsługę komunikatów formularza i formantów, używającVBA.Do formularza takiego można również dodać formanty ActiveX.Microsoft Forms są oddzielne od formularzy Accessa, Visual Basicai Outlooka.Jest to osobny pakiet.Nie można konwertować formularzyAccessa do Microsoft Forms i odwrotnieObject BrowserGdy pracujesz z różnymi aplikacjami omawianymi w tym rozdziale, nie zapominaj o użyciu narzędzia Object Browser.W poprzednim rozdziale szczegółowo omówiłem, jak go używać.Aby wywołać Object Browser, w oknie edytora VBA wybierz Object Browser z menu View lub naciśnij F2 (rysunek 19.5).340Część VI f& WspółoperatywnośćRysunek 19.5.Object Browserwyświetlającyobiekty WordaNazwy klas aplikacji OfficeAby użyć innych aplikacji Office, musisz znać nazwy klas występujących w tych aplikacjach:Aplikacja Nazwa klasyAccess.ApplicationAccessOffice.BinderBinderExcel.ApplicationExcelExcel.SheetExcel.ChartFrontPage.ApplicationFrontPageGraph.ApplicationGraphMapPoint.ApplicationMapPointOutlook.ApplicationOutlookPowerPoint.ApplicationPowerPointWord.ApplicationWordWord.DocumentPrzykład automatyzacjiPodstawy automatyzacji (przykładowo dla Worda: tworzenie lub pobieranie odwołania do Worda, użycie obiektów Worda,zwalnianie obiektu) zostały przedstawione w poprzednim rozdziale.Przykład poniższy drukujący informacje o Accessie w postaci dokumentu Worda ilustruje wszystkie wymienione kroki.Niezapomnij ustawić wcześniej odwołania do Worda.Private Sub AccessApplicationReport()Dim objWord As Word.ApplicationDoCmd [ Pobierz całość w formacie PDF ]