-
Cómo determinar si existe una hoja de cálculo Utilizando Excel.Application
-
VBA es un lenguaje de programación y automatización macro desarrollado por Microsoft que se incluye y se utiliza en algunos de los principales productos de Microsoft incluyendo, Microsoft Office. VBA se ajusta a la Microsoft COM (Component Object Model), en la que se ve y se rompe programas como Excel en objetos para los programadores para interactuar y manipular el programa. El objeto de aplicación se considera el objeto más alto en el modelo de objetos de Microsoft Excel. Representa la aplicación Excel sí mismo. Todos los otros objetos, tales como: libros de trabajo, hojas de trabajo y las células están por debajo de él. La creación de un programa para probar si existe una cierta hoja de cálculo del libro es sencillo una vez que inicia una llamada al objeto Application de Excel.
Instrucciones
1 Abra Microsoft Excel.
2 Haga clic en "Herramientas", "Macro" y haga clic en "Visual Basic". Esto abrirá el entorno de programación VBA.
3 Haga clic en "Insertar" y "módulo". Ahora se encuentra en un módulo de código de programación.
Escribe o copia y pega el siguiente código:
WorksheetExists función (_
FullPathToWorkbook como secuencia, _
WorksheetName As String _
) As Boolean
Dim objExcel como objeto
Dim objWorksheet como objeto
Establecer objExcel = CreateObject ( "Excel.Application")
objExcel.Workbooks.Open "c: \ Book1.xls"
Para Cada objWorksheet En objExcel.ActiveWorkbook.Worksheets
If objWorksheet.Name = "Sheet3" Then
WorksheetExists = True
MsgBox ( "Hoja de trabajo existe")
Para Salir
Terminara si
Siguiente objWorksheet
SaveChanges objExcel.ActiveWorkbook.Close: = False
Establecer objExcel = Nada
End Function