Alkalmazások létrehozása MS Excel
- Family munkalapokat.
- objektum munkalap
- példa
Object munkalapot és családi munkalapok.
Az Excel munkalap objektumot hierarchia után azonnal a tárgy és a munkafüzet jelent munkalap.
MS Excel lehetővé teszi, hogy működik több különböző típusú lemezek:
• munkalapok tartalmazó sejteket. Ezeket a lapokat benyújtott tárgy munkalapot.
• Chart tartalmazó lapokat chart. Ezek az ívek benyújtott objektum diagram.
• Object Properties munkalapok
• Alkalmazás - nélküli használata esetén a tárgy selejtezőn, ez a tulajdonság adja vissza egy objektum alkalmazás. amely a Microsoft Excel alkalmazást.
• Amikor a használt tárgy selejtezőn, az ingatlan vissza az Application objektum, amely a szerző ezt a tárgyat (akkor használja ezt a tulajdonságot a tárgy Automation OLE, hogy visszaküldi a kérelmet az alany).
• Csak olvasható.
• Count - Visszaadja egy Long érték. amely az objektumok száma a gyűjteményben (azaz, a lapok számát és diagramok).
• Creator - Visszaadja egy 32 bites egész szám, amely azt jelzi, az alkalmazás, melynek célja létrejött. Csak olvasható Long.
• HPageBreaks - Visszaadja gyűjteménye HPageBreaks, amely a vízszintes oldaltörés a lapon. Csak olvasható.
• munkalapok (1). HPageBreaks
• Elem - Visszaadja egy objektumot a gyűjtemény
• munkalapok (1) .Item (Index)
• Paraméterek: Index - az index nevét vagy tárgy.
• Példa: a következő két sor egyenértékű
VPageBreaks - Visszaadja gyűjteménye VPageBreaks. amely a függőleges oldaltörés a lapon. Csak olvasható.
Munkalapok (1). VPageBreaks
Ez a példa azt mutatja, az összes teljes képernyős és nyomtatható a függőleges oldaltörés.
For Each pb a munkalapok (1) .VPageBreaks
Ha pb.Extent = xlPageBreakFull Aztán
cFull = cFull + 1
cPartial = cPartial + 1
MsgBox cFull „Nagyítás Oldaltörések” cPartial _
„Oldaltörések nyomtatható terület”
Látható - Meghatározza, hogy a tárgy
A lehetséges opciók. Valse és True
Munkalapok (1) .Visible = True
Szülő - Visszaadja a szülő az adott objektumot. csak olvasható
Módszerek munkalapok család.
Add - létrehoz egy új munkalapot.
objWorkSheets.Add (előtt, után, gróf, típus)
Paraméter előtt - jelzi a lap, amely előtt egy új munkalapra kerül.
Paraméter után - jelzi a lemez, ami után teszik közzé az új munkáját. Ha az előtt és után érvek elhagyjuk, akkor az új lap kerül, amíg az aktív lapot.
Paraméter Count - a lapok számát kell hozzá, az alapértelmezett érték az 1
Tour lehetőség - azt jelzi, hogy milyen típusú a hozzáadott lapot. Az érvényes értékek: xlWorksheet (alapértelmezett), xlExcel4MacroSheet és hlEhsel4 IntlMacroSheet.
Például: helyezzen be egy új lapot az aktív lap az aktív munkafüzet.
ActiveWorkbook. Munkalapok. hozzáad
Törlés - törli a munkalapon.
Mielőtt - lemez, amely elé a másolt lap.
Miután - lemez, ami után kerül a másolt lap.
Nem adhatja meg előtt. ha megadjuk után, és fordítva. Ha nem adja meg, vagy előtt. kisebb vagy után, az Excel a Microsoft hoz létre egy új munkafüzetet, amely tartalmazza a másolt lap
Ez a példa példányban Munka1, forgalomba másolatát után Sheet3.
FillAcrossSheets - másolja a kijelölt tartomány ugyanazon a területen az összes többi munkalapot a gyűjtemény.
Munkalapok ( «Munkalap1»). FillAcrossSheets (Range, Type)
Tartomány - A tartomány a másolni kívánt munkalapra a gyűjteményben. A tartományban kell lennie munkalapon belül a gyűjtemény.
Típus - Meghatározza a másolat tartományban.
Ez a példa kitölti a tartomány A1: C5 Munka1, Sheet5, és Sheet7 tartalommal az azonos tartományban Munka1.
X = Array ( «Munka1», «Sheet5», «Sheet7»)
Lemezek (x) .FillAcrossSheets _
Munkalapok ( «Munkalap1») Tartomány ( «A1: C5»).
Áthelyezés - A lap egy másik helyre a munkafüzetben.
Munkalapok ( «Munkalap1»). Mozgás (előtt, után)
Mielőtt lapos, ami elé kerül ki a matricát.
Miután - lapot, amely után kerül matricát.
Nem adhatja meg előtt, ha megadja után, és fordítva. Ha nem adja meg az előtt, vagy után. Excel Microsoft hoz létre egy új munkafüzetet, amely tartalmazza az áthelyezett lap.
Ez a példa mozog Sheet1 után Sheet3 az aktív munkafüzet.
Munkalapok ( «Munkalap1») Mozgás után :. = munkalapok ( «Sheet3»)
Nyomat - Nyomtatványok objektumot.
Munkalapok ( «Munkalap1»). Kinyomtatás (From, To, másol, megtekintése, ActivePrinter, PrintToFile, leválogatás, PrToFileName, IgnorePrintAreas)
Tól - a oldal számát a nyomtatás megkezdéséhez. Ha ez a paraméter nincs megadva, az első oldal.
To - száma az elmúlt kinyomtatott oldal. Ha ez az opció ki van hagyva, a nyomtatott oldaltól az utolsóig.
Másolat - példányszámot kell nyomtatni. Ha nincs megadva, egy példányt nyomtatott.
ActivePrinter - nevét adja meg az aktív nyomtató.
PrintToFile - Igaz, hogy nyomtatni egy fájlt. Ha PrToFileName nincs megadva, az Excel a Microsoft kéri a felhasználót, hogy a kimeneti fájl nevét.
Sorba rendezés - Igaz, hogy többpéldányos.
PrToFileName - Ha az értéke igaz A PrintToFile, ez a paraméter határozza meg a fájl nevét, hogy a nyomtatni kívánt.
IgnorePrintAreas - Igaz, hogy figyelmen kívül hagyja a nyomtatást és a teljes objektum.
Ez a példa kinyomtatja az aktív munkalapon.
Munkalapok ( «Munkalap1»). PrintPreview (EnableChanges)
Kiválasztás - Kiválasztja objektumot.
Munkalapok ( «Munka1" ). Select (Replace)
Cserélje - (használt lemezek esetében). Igaz. hogy a jelenlegi válogatott a megadott objektumot. Hamis. kiterjeszteni a jelenlegi kiválasztási, hogy tartalmazza a korábban kijelölt objektumok és a tárgy (a kiválasztás több objektum).
Név - visszaadja a munkalap neve.
Példa: az első lap a munkafüzet neve „urok1”
Látható - igaz (a munkalap jelenik meg a képernyőn), hamis (a munkalap nem látja, hogy el van rejtve, de ez is megjelenik a képernyőn a parancs formátuma ® Sheet ® kijelző (Format Sheet Show) és xlVeryHidden (munkalap .. rejtett, és akkor megjelenik a képernyőn csak programozott).
StandardHeight - visszaadja a standard magassága az összes sorban a munkalap.
Példa: Beállítja a standard magassága 3stroki.
ActiveCell - visszaadja az aktív cella az aktív munkalap.
Metszet - visszaadja a tartományban, amely a kereszteződésekben a számos zenekarban.
Intersect (tartomány 1, rabge 2, ...)
Példa: Egy kijelölt tartomány kereszteződés 1: D 3 és C 3: D 4, azaz a C tartomány 3: D 3.
Union - visszaadja egy sor, hogy az unió a több zenekarban.
Union (rangeI. Tartomány 2.)
Példa: az unió a két sáv a kiválasztott A 1: B 2 és C 3: D 4.
Aktiválás - aktiválja munkalap.
Protect - védi a munkalap bármely felülvizsgálatát.
Protect (jelszó, DrawingObjects, tartalma, forgatókönyvek, UserInterfaceOnly)
Jelszó Többsoros használható jelszó védőlap
DrawingObjects elfogadható értékek. igaz (a grafika védett) és hamis (a grafikák nem védett) tagjai által elkészített alapértelmezett érték a false.
Tartalom - Az érvényes értékek. igaz (védett cella) és hamis (a sejtek nem védett). Az alapértelmezett érték true.
Forgatókönyvek - Lehetséges értékek. igaz (szkriptek védett) és hamis (szkriptek nem védett) tagjai által elkészített alapértelmezett érték a true.
UserInterfaceOnly - Érvényes értékek: true (a lap védve van a változások a felhasználó által, de nem a VBA szubrutin) és hamis (a lap védve van a változások mind a felhasználó és VBA rutinok.). Az alapértelmezett érték a false.
A példát a teljes védelmet aktív munkalap izschmeneny bármely részét a felhasználó:
ActiveSheet.Protect Jelszó: = "titkos", DrawingObjects: = true, Tartalom: = true, Forgatókönyvek: = true
Védelem - védőcsoportját munkalapot.
Jelszó - A string használható a jelszót, hogy megvédje a lapot
Eltávolítjuk az aktív munkalap
ActiveSheet. unprotect Jelszó: = "Secret"
Mozgás - mozgás a lap egy másik helyre a munkafüzetben.
Move (Mielőtt. Miután)
Mielőtt - lap a munkafüzet, amely ki előtte a
Miután - lapot, amely be van helyezve, miután a
Ugyanakkor lehetséges, hogy csak az egyik érv.
Példa Sheet1 aktív dolgozó kigi mozog, mielőtt Munka3 ugyanazon rabocheyknigi:
Munkalapok ( "Munkalap1") Mozgatás előtt :. = munkalapok ( "Sheet 3")
Értékeljük - átalakítja az expressziós egy objektum vagy érték. Beírásakor képletek és sejtek a párbeszédpanelek.
MsgBox CStr (Value) „kiadja az olvasott érték a párbeszédablakban
Ezt követően meg kell, hogy adja meg a beviteli mező mellett párbeszédablakban minden aritmetikai kifejezés, mint az A * A 3 4. Az eljárás kiszámítja az értékét ez a kifejezés, és megjeleníti a párbeszédablak.
feature = InputBox ( „adja meg a cella nevét”)
értéke = kiértékelése (funkció)
MsgBox CStr (érték)
Ahhoz, hogy hozzon létre egy eseményt eljárást külön lemezt, válassza ki a listából a Project ablakban, majd az Általános területen választani munkalapon. Ezután menj a lista leírások és jelölje meg a rendezvény, amely szükséges, hogy hozzon létre egy eljárást.
Számolja után történik a számítás lesz az összes munkalapot.
Változás - után következik a felhasználó megváltoztatja a tartalmát a munka lista.Protsedura Change esemény feldolgozása cellában egy paraméter Cél. kotryj egy objektum tartomány. tartalmazó módosított sejt.
Megjegyzés: Az esemény nem fordul elő. ha a sejt változások eredményeként az átalakítás. valamint a sejtek eltávolítását.
SelectionChange - minden alkalommal elosztása a következő változást a munkalapon. Változás esetén eljárás tartalmaz egy paramétert Cél. kotryj egy objektum tartomány. tartalmazó szelektált sejtek.
BeforeClose amikor bezárja a munkafüzetet
BeforePrint nyomtatás előtt rabocheyknigi
BeforeSave mielőtt menti a munkafüzetet
Kikapcsolása, amikor a munkafüzetet elveszti fókusz
NewSheet pridobavlenii új lemez
Nyitott a nyitó rabocheyknigi
SheetActivate aktiválása után bármely munkalap
SheetDeactivate kogdarabochy lemez középpontjában reryaet
Probléma: van egy tábla, akkor át kell menni a sejteket, és ha már nincs egy szabványos, az egész szöveget másolni egy másik lapot.
Ez a szkript fut végig a sejtek a tábla mérete 10x10, egy sejt (1, 2) egy bizonyos értéket, ami összehasonlítva a tartalmát minden vizsgált sejtben, ha megfelel, akkor az egész sort, ahol ez a sejt, szükség van recopy egy új lapot eredményt. Így az új lemez jön létre egy új táblát, amely csak a szükséges sorokat nekünk.
Dim i As Integer
Dim j As Integer
Dim k As Integer
On Error Resume Next
Állítsa NewSheet = Worksheets.Add