VBA is een automatiserings -en macro- programmeertaal ontwikkeld door Microsoft dat wordt opgenomen en gebruikt in een aantal van de kern producten van Microsoft , waaronder Microsoft Office . VBA voldoet aan de Microsoft COM ( Component Object Model ) , waarbij het uitzicht en breekt programma's zoals Excel in objecten voor programmeurs om te communiceren en te manipuleren het programma . De Application-object wordt beschouwd als de hoogste object in de Microsoft Excel- objectmodel . Het vertegenwoordigt de Excel- applicatie zelf . Alle andere objecten zoals : werkboek , werkbladen en cellen eronder . Het maken van een programma om te testen of een bepaald werkblad bestaat in uw werkmap is simpel als je eenmaal een oproep om de Excel- object Application initiëren . Instructies
1 Open Microsoft Excel . Kopen van 2 Klik op 'Extra ', ' Macro ' en klik op ' Visual Basic . " Dit zal de VBA programmeeromgeving openen.
3 Klik op ' Invoegen ', ' Module . " Je bent nu in een programmeercode module Typ of kopieer
en plak de volgende code : . Functie WorksheetExists
( _ FullPathToWorkbook als Koord
, _
WorksheetName als Koord _
) zoals Van Boole Dim objExcel als Voorwerp
Dim objWorksheet als Voorwerp
Stel objExcel = CreateObject
( " Excel.Application " ) objExcel.Workbooks.Open
" c: \\ Book1.xls "
voor Elke objWorksheet In objExcel.ActiveWorkbook.Worksheets
Als objWorksheet.Name = " Sheet3 " dan WorksheetExists
= True MsgBox
( " Worksheet bestaan " ) Exit
Voor End
Als
Volgende objWorksheet
objExcel.ActiveWorkbook.Close SaveChanges : = False Set
objExcel = Nothing
End Function
|
