[ Pobierz całość w formacie PDF ]
.Formatowanie dokumentów ExcelaExcel posiada szerokie mo¿liwoœci formatowania.Poni¿sze przyk³adyprzedstawiaj¹ sposób w jaki nale¿y formatowaæ nag³Ã³wki kolumn danych i w jakisposób wywo³ywaæ metodê AutoFit:' Formatowanie nag³Ã³wków kolumnWith objWorkSheet.' Pogrubienie nag³Ã³wków kolumn.Cells(1, 1).Font.Bold = True.Cells(1, 2).Font.Bold = TrueEnd With' Formatowanie danych w arkuszuWith objWorkSheet.ColumnsWith.Item(2).NumberFormat = "0.00".AutoFitEnd With' U¿ycie metody AutoFit do formatowania danych.Item(1).AutoFitEnd WithTworzenie wykresówU¿yj rejestratora makr, aby szybko utworzyæ kod automatyzacji.U¿yj kreatorawykre­sów do wybrania odpowiedniego wykresu.Poni¿szy przyk³ad tworzy ró¿netypy wykresów.' Tworzenie wykresu ko³owegoobjChart.ChartWizard Source:=objSheet.Cells(1, 1).CurrentRegion, _Gallery:=xlPie, Format:=4, PlotBy:=xlColumns, _CategoryLabels:=1, SeriesLabels:=1, HasLegend:=2, _Title:="Sprzeda¿ (Wykres ko³owy)"' Tworzenie wykresu kolumnowegoWith ObjChart.ActiveChart.ChartType = xlColumnClustered.SetSourceData Source:=_Sheets("5 najlepszych produktów").Range("Al:B6"), _PlotBy:=xl0olumnsEnd With' Tworzenie wykresu pierœcieniowegoWith ObjChart.ActiveChart.ChartType = xlDoughnut.SetSourceData Source:=_Sheets("5 najlepszych produktów").Range("Al:B6"), _PlotBy:=xlColumns.Location Where:=xlLocationAsNewSheet, Name:="Wykres pierœcieniowy".HasLegend = True.ChartTitle.Characters.Text = "Sprzeda¿ (wykres pierœcieniowy"End WithProgram korzystaj¹cy z automatyzacji mo¿e tworzyæ w Excelu wykresy takie jakpoka­zany na rysunku 19.10.U¿ycie w³aœciwoœci ParentExcel zawiera obiekt aplikacji oraz obiekt reprezentuj¹cy arkusz.Mo¿esz dostaæsiê do wszystkich obiektów Excela przez w³aœciwoœci tych obiektów wysokiegopoziomu.Ge­neralnie, kod automatyzacji rozpoczyna pracê od tych obiektów ischodzi w dó³ hie­rarchii obiektów.W Excelu program mo¿e rozpocz¹æ pracê odobiektu aplikacji, a na­stêpnie przenieœæ siê do obiektu zeszytu i dalej doarkuszy i komórek.Gdy odwo³ujesz siê do obiektu w hierarchii obiektów aplikacji, mo¿esz przesuwaæsiê w obu kierunkach.Rysunek 19.10.Tworzenie wykresów w ExceluAby przesun¹æ siê w górê hierarchii, u¿ywamy w³aœciwoœci Parent.Przyk³adowo,gdy pracujesz z arkuszem, mo¿esz odwo³aæ siê do zeszytu, który zawiera tenarkusz poprzez w³aœciwoœæ Parent.Fragment programu ilustruj¹cy tê technikêza­mieszczony jest poni¿ej.Private Sub ParentPropertyDemo()Dim objExcel As Excel.ApplicationDim objWorkBook as Excel.WorkBook' Utworzenie obiektu ExcelaSet objExcel = New Excel.Application' Otwarcie pliku Excela' Upewnij siê, ¿e przyk³adowy plik znajduje siê w podanym kataloguobjExcel.Workbooks.Open _("C:\Automation\Sales by Country Data.xls")' Ustaw zmienn¹ objWork na aktywny zeszytSet objWorkBook = objExcel.ActiveWorkBook' Pobierz nazwê zeszytu z objWorkBook ("Sales by Country")MsgBox objWorkBook.Name' Pobierz nazwê z obiektu aplikacji, u¿ywaj¹c w³aœciwoœci Parent' ("Microsoft Excel").MsgBox objWorkBook.Parent.Name' Maksymalizuj oknoobjExcel.WindowState = xlMaximized' Poka¿ Excela u¿ytkownikowiobjExcel.Visible = True' Zakoñcz aplikacjê u¿ywaj¹c metody Quit'objExcel.Quit' Zwolnij obiekt aplikacjiSet objExcel = NothingEnd SubW przyk³adzie tym otwierany jest zeszyt Excela.Poprzez w³aœciwoœæ Parentobiektu reprezentuj¹cego zeszyt odwo³ujemy siê w górê hierarchii do obiektuaplikacji Excel.Automatyzacja PowerPointW tej czêœci opisane s¹ specyficzne dla PowerPoint zagadnienia oraz przyk³adyau­tomatyzacji.Model obiektów PowerPointPowerPoint zawiera ponad 85 obiektów dostêpnych poprzez VBA.Zajrzyj do „Obiekty Microsoft PowerPoint” w pomocy do PowerPoint.Zamieszczonyjest tam diagram obiektów PowerPoint.W tabeli 19.4 zestawione zosta³y czêsto u¿ywane obiekty PowerPoint.Obiekty,które maj¹ tak¿e kolekcje, zakoñczone s¹ liter¹ (s).Tabela 19.4.Obiekty PowerPointObiekt PowerPointOpisActionSetting(s)Ustawienia opisuj¹ce sposób reakcji rysunków lub obszaru tekstu na manipulacjemyszk¹ w czasie pokazuAnimationsetting(s)Ustawienia animacji rysunków w czasie pokazuApplicationCa³a aplikacja PowerPointCellKomórka w tabeliCellRangeZbiór komórek we wierszu lub kolumnie tabeliColorScheme(s)Schemat kolorów dla slajdu.Column(s)Kolumna tabeliDefaultWebOptionsUstawienia dla publikacji i zapisywania jako strony WWWDocumentWindow(s)Okno dokumentuPane(s)Fragment okna dokumentówPresentation(s)Otwarta prezentacja dostêpna przez numer lub nazwêRow(s)Wiersz tabeliSelectionZaznaczenie w dokumencieShapeRangeZbiór kszta³tów w dokumencieSlideRangeZbiór slajdówSlideShowwindow(s)Okno, w którym odbywa siê pokazTableTabela na slajdzieTextRangeTekst do³¹czony do kszta³tuWebOptionsUstawienia nadpisuj¹ce DefaultWebOptionsPrzyk³ady automatyzacji PowerPointPoni¿sze przyk³ady przedstawiaj¹ przyk³ady u¿ycia specyficznych w³aœciwoœci imetod obiektów PowerPoint (rysunek 19.11)Dodanie slajduDo dodania slajdu do prezentacji u¿ywana jest metoda Add [ Pobierz caÅ‚ość w formacie PDF ]

zanotowane.pl

doc.pisz.pl

pdf.pisz.pl

listy-do-eda.opx.pl