Come determinare se un foglio esiste Utilizzando Excel.Application

September 5

VBA è un linguaggio di programmazione e di automazione macro sviluppata da Microsoft che è incluso e utilizzato in alcuni dei principali prodotti di Microsoft tra cui Microsoft Office. VBA è conforme alla Microsoft COM (Component Object Model), in cui si vede e si rompe programmi come Excel in oggetti per i programmatori di interagire e manipolare il programma. L'oggetto Application è considerato il più alto oggetto nel modello di oggetti di Microsoft Excel. Esso rappresenta l'applicazione Excel stesso. Tutti gli altri oggetti, quali: cartella di lavoro, fogli di lavoro e le cellule sono al di sotto di esso. Creazione di un programma per verificare se un determinato foglio di lavoro esiste nella cartella di lavoro è semplice una volta che si avvia una chiamata all'oggetto Application di Excel.

istruzione

1 Aprire Microsoft Excel.

2 Fai clic su "Strumenti", "Macro" e poi cliccare su "Visual Basic". Si aprirà l'ambiente di programmazione VBA.

3 Fai clic su "Inserisci", "Modulo". Si è ora in un modulo di codice di programmazione.

Digitare o copiare e incollare il seguente codice:

WorksheetExists funzione (_

FullPathToWorkbook As String, _

WorksheetName As String _

) Come booleano

Dim objExcel As Object

Dim objWorksheet As Object

Set objExcel = CreateObject ( "Excel.Application")

objExcel.Workbooks.Open "C: \ Book1.xls"

Per ogni objWorksheet In objExcel.ActiveWorkbook.Worksheets

If objWorksheet.Name = "Sheet3" Then

WorksheetExists = True

MsgBox ( "foglio di lavoro esiste")

Exit For

Finisci se

Successivo objWorksheet

SaveChanges objExcel.ActiveWorkbook.Close: = False

Set objExcel = Nothing

End Function