Excel-objecten vanuit Visual Basic navigeren

Vertaalde artikelen Vertaalde artikelen
Artikel ID: 147650 - Bekijk de producten waarop dit artikel van toepassing is.
Alles uitklappen | Alles samenvouwen

Op deze pagina

Samenvatting

In dit artikel wordt uitgelegd drie methoden om te navigeren en toegang Objecten van Microsoft Excel-toepassing:

  • Lange en standaard-eigenschappen
  • Aliasing gebruiken
  • Met de hoofd- en methoden van Microsoft Excel versie 5.0 objecten voor toegang tot Microsoft Excel-object

Meer informatie

Elk object in Microsoft Excel versie 5.0 al ergens de toepassing van de hiërarchie van objecten. U kunt kiezen tussen deze objecten door navigeren door de hiërarchie van de toepassing. Boven deze hiërarchie het Application-object is. Welke gebeurtenissen of acties die u aan de Application-object van invloed op de hele toepassing. Bijvoorbeeld:
   ' Close the application
   [Object].Application.Quit
				
[Object] vervangen door een variabele die naar een geldige Microsoft Excel verwijst Application-Object dat kan worden gemaakt in het volgende voorbeeld:
   ' MyObject represents [Object] and OLE1 represents an OLE control
   ' that contains an Microsoft Excel Worksheet object.
   MyObject = OLE1.Object
   Set MyObject = CreateObject("Excel.Sheet")
   Set MyObject = GetObject("C:\EXCEL\EXAMPLES\SAMPLES.XLS")
				
Het object Application bevat andere grote objecten. U kunt bijvoorbeeld de volgende code gebruiken om te verwijzen naar de collectie werkmappen momenteel in Microsoft Excel wordt geladen:
   [Object].Application.Workbooks
				
Als u één werkmap ophalen uit de collectie wilt, gebruikt u het Item methode. Als u bijvoorbeeld wilt verwijzen naar de eerste werkmap:
    [Object].Application.Workbooks.Item(1)
				
De eerste werkmap sluiten:
   [Object].Application.Workbooks.Item(1).Close
				

Toegang tot objecten met lange verwijzing of standaardeigenschappen

Elke werkmap bevat een verzameling werkbladen, elk werkblad bevat een verzameling cellen, enzovoort. (Raadpleeg de documentatie van Microsoft Excel en in het menu Help voor meer informatie over Microsoft Excel-object hiërarchie). Verwijzingen naar een bepaalde cel kunnen in code als volgt uitzien:
   ' Following refers to cell A1 on Sheet1 in the first workbook.
   ' Enter the following two lines as one, single line:
   [Object].Application.Workbooks.Item(1).
      WorkSheets.Item("Sheet1").Cells.Item(1,1)
				
Deze verwijzing kan lange en complexe; snelkoppelingen zijn echter beschikbaar. Wat de navigatie-operator (.) is fundamenteel voor object geslaagde programmering.

Snelkoppelingen

Alle objecten hebben een standaardeigenschap en methode. Voor de collecties, de Standaard is de methode Item. Voor de meeste objecten is de eigenschap naam de standaardeigenschap. Dit Verdrag is geïmplementeerd om te vereenvoudigen programmeren. Het vorige voorbeeld kan bijvoorbeeld worden vereenvoudigd om:
   [Object].Application.Workbooks(1).WorkSheets("Sheet1").Cells(1,1)
				

Toegang tot objecten door Aliasing objecten

U kunt aliasing Vereenvoudig het programmeren van het object. Als u schrijft een veel code die werd manipuleren van Sheet1 bijvoorbeeld de syntaxis kan worden lange. Om dit te voorkomen, maakt een object dat verwijst naar de laagste algemene object. Dit is de aliasing genoemd. Gebruik de instructie Set maken alias:
   Dim Sheet1 as Object
   ' Alias Sheet1 to represent [Object]...WorkSheets("Sheet1")
   Set Sheet1 = [Object].Application.Workbooks(1).WorkSheets("Sheet1")
   ' Now just use the variable Sheet1 to refer to Sheet1.
   Sheet1.Cells(1,1).Value = "Title"
   Sheet1.Cells(1,2).Value = "ID"
   Sheet1.Cells(1,3).Value = "Cost"
   Sheet1.Cells(2,1).Value = "Phone"
   Sheet1.Cells(2,2).Value = 123413423
   Sheet1.Cells(2,3).Value = 89.95
				

Objecten openen met bovenliggende en toepassingsmethoden van de

De hoofd- en methoden kunt u back-up van het object gaan hiërarchie. De methode van de toepassing gaat terug naar het application-object en de bovenliggende methode gaat u één niveau van de objecthiërarchie. Alle de voorbeelden in dit artikel wordt gestart met [Object]. Als [object] een geldige Microsoft Excel-object alle instructies ook geldig zijn. Ongeacht de context van [Object].

Dit is erg handig bij het programmeren van de Microsoft Excel-object Visual Basic versie 4.0. Microsoft Excel bevat alleen de drie objecten dat kan worden gebruikt als ingang naar Microsoft Excel. Dit zijn:

  • Excel.Application
  • Excel.Sheet
  • Excel.Chart
Niet worden verward met Excel.Application.5. Wordt altijd Excel.Application Wijs de meest recente versie van Microsoft Excel. Excel.Application.5 wordt Wijs alleen Microsoft Excel versie 5.0.

Er is geen blootgestelde Workbook-object zodat er geen manier toegang tot de Werkmapobject rechtstreeks. Dit is echter geen probleem omdat het bovenliggende methode van een werkblad of grafiek object retourneert Workbook-object. De volgende voorbeeldcode illustreert dit punt.

Opmerking: oleExcel is een OLE-besturingselement dat een object Excel.Sheet bevat.
   ' Declare object references:
   Dim Xlapp As object
   Dim XLWkb As object
   Dim XLWks As object
   Dim XLWksNew As object

   oleExcel.Action = 7   ' Activate OLE Object

   Set XLWks = oleExcel.Object   ' Alias Worksheet object
   Set XLWkb = XLWks.Parent      ' Alias WorkBook object
   Set Xlapp = XLWks.Application ' Alias Application object

   ' Add a new worksheet to the Workbook and name it:
   Set XLWksNew = XLWkb.Worksheets.add  ' Assign alias to new Worksheet
   XLWksNew.Name = "VB4 OLE Automation" & XLWkb.Worksheets.count

   ' Make the 3rd Worksheet of the Workbook active:
   XLWkb.Worksheets(3).Activate

   ' Display the dialog for InsertPicture:
   Xlapp.dialogs(342).[Show]  ' xlDialogInsertPicture = 342
				

Referenties

Office Development Kit, geïntegreerde oplossingen voor programmeren

Eigenschappen

Artikel ID: 147650 - Laatste beoordeling: maandag 16 juli 2012 - Wijziging: 4.0
De informatie in dit artikel is van toepassing op:
  • Microsoft Visual Basic 4.0 Professional Edition
  • Microsoft Excel 5.0 Standard Edition
Trefwoorden: 
kb16bitonly kbhowto kbprogramming kbmt KB147650 KbMtnl
Automatisch vertaald artikel
BELANGRIJK: Dit artikel is vertaald door de vertaalmachine software van Microsoft in plaats van door een professionele vertaler. Microsoft biedt u professioneel vertaalde artikelen en artikelen vertaald door de vertaalmachine, zodat u toegang heeft tot al onze knowledge base artikelen in uw eigen taal. Artikelen vertaald door de vertaalmachine zijn niet altijd perfect vertaald. Deze artikelen kunnen fouten bevatten in de vocabulaire, zinsopbouw en grammatica en kunnen lijken op hoe een anderstalige de taal spreekt en schrijft. Microsoft is niet verantwoordelijk voor onnauwkeurigheden, fouten en schade ontstaan door een incorrecte vertaling van de content of het gebruik ervan door onze klanten. Microsoft past continue de kwaliteit van de vertaalmachine software aan door deze te updaten.
De Engelstalige versie van dit artikel is de volgende: 147650
Vrijwaring inhoud KB-artikelen over niet langer ondersteunde producten
Dit artikel heeft betrekking op producten waarvoor Microsoft geen ondersteuning meer biedt. Daarom wordt dit artikel alleen in de huidige vorm aangeboden en wordt het niet meer bijgewerkt.

Geef ons feedback

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com