Clase Application (Excel VBA)

La clase Application representa la aplicación completa Microsoft Excel.

Temas

Algunos procedimientos de esta clase se han agrupado en temas y se describen en páginas temáticas separadas

Cell with its procedures ActiveCell, CellDragAndDrop, Cells, EditDirectlyInCell, LargeOperationCellThousandCount y ThisCell
Print with its procedures ActivePrinter y PrintCommunication
DDE with its procedures DDEAppReturnCode, DDEExecute, DDEInitiate, DDEPoke, DDERequest y DDETerminate
Enable with its procedures EnableAutoComplete, EnableCancelKey, EnableCheckFileExtensions, EnableEvents, EnableLargeOperationAlert, EnableLivePreview, EnableMacroAnimations y EnableSound
Name with its procedures GetOpenFilename, GetSaveAsFilename, OrganizationName, UserName y WarnOnFunctionNameConflict
Email with its procedures MailLogoff, MailLogon, MailSession y MailSystem

Métodos

Otros Métodos

ActivateMicrosoftApp - Activa una aplicación de Microsoft.

AddCustomList - Agrega una lista personalizada para Autorrelleno y para ordenación personalizados.

Calculate - Calcula todos los libros abiertos, una hoja de cálculo específica de un libro o un rango determinado de celdas de una hoja, como se muestra en la tabla siguiente:.

CalculateFull - Fuerza un cálculo completo de los datos en todos los libros abiertos.

CalculateFullRebuild - Para todos los libros abiertos, fuerza un cálculo completo de los datos y vuelve a establecer las dependencias.

CalculateUntilAsyncQueriesDone - Devuelve todas las consultas pendientes a los orígenes de datos OLEDB y OLAP.

CentimetersToPoints - Convierte una medida de centímetros a puntos (un punto equivale a 0,035 centímetros).

CheckAbort - Detiene el proceso de actualización en una aplicación de Microsoft Excel.

CheckSpelling - Comprueba la ortografía de un sola palabra.

ConvertFormula - Convierte las referencias a celdas de una fórmula entre los estilos de referencia A1 y F1C1, entre referencias absolutas y relativas o ambas.

DeleteCustomList - Elimina una lista personalizada.

DisplayXMLSourcePane - Abre el panel de tareas Origen XML y muestra la asignación XML especificada por el argumento XmlMap.

DoubleClick - Equivale a hacer doble clic en la celda activa.

Evaluate - Convierte un nombre de Microsoft Excel en un objeto o un valor.

FindFile - Muestra el cuadro de diálogo Abrir.

GetCustomListContents - Devuelve el número de la lista personalizada (una matriz de cadenas de caracteres).

GetCustomListNum - Devuelve el número de la lista personalizada correspondiente a una matriz de cadenas.

GetPhonetic - Devuelve el texto fonético en japonés de la cadena de texto especificada.

Goto - Selecciona cualquier rango o procedimiento de Visual Basic en cualquier libro y activa ese libro si todavía no está activo.

Help - Muestra un tema de Ayuda.

InchesToPoints - Convierte una medida de pulgadas a puntos.

InputBox - Muestra un cuadro de diálogo para la entrada del usuario.

Intersect - Devuelve un objeto Range que representa la intersección rectangular de dos o más rangos.

MacroOptions - Corresponde a las opciones del cuadro de diálogo Opciones de macro.

OnKey - Ejecuta un procedimiento especificado cuando se presiona una tecla o combinación de teclas concreta.

OnRepeat - Establece el elemento REPEAT y el nombre del procedimiento que se ejecutará si se elige el comando REPEAT después de ejecutar el procedimiento que establece esta propiedad.

OnTime - Programa la ejecución de un procedimiento a una hora especificada, ya sea a una hora específica o después del transcurso de un período de tiempo específico.

OnUndo - Establece el texto del comando Undo y el nombre del procedimiento que se ejecuta si se elige el comando Undo después de ejecutar el procedimiento que establece esta propiedad.

Quit - Sale de Microsoft Excel.

RecordMacro - Graba código si está activada la grabadora de macros.

RegisterXLL - Carga un recurso de código XLL y registra automáticamente las funciones y comandos que contiene.

Repeat - Repite la última acción efectuada en la interfaz del usuario.

Run - Ejecuta una macro o llama a una función.

SendKeys - Envía pulsaciones de teclas a la aplicación activa.

SharePointVersion - Devuelve el número de versión de las instancias de SharePoint Foundation que se ejecutan en el sitio para la dirección URL especificada.

Undo - Cancela la última acción de la interfaz de usuario.

Union - Devuelve la unión de dos o más rangos.

Volatile - Marca como volátil una función definida por el usuario.

Wait - Pausa una macro en ejecución hasta un momento especificado.

Propiedades

ActiveChart Devuelve un objeto Chart que representa el gráfico activo (ya sea un gráfico incrustado o una hoja de gráficos).

Dim chrActiveChart As Chart
Set chrActiveChart = ActiveChart

ActiveEncryptionSession Devuelve un Long que representa la sesión de cifrado asociada al documento activo.

Dim lngActiveEncryptionSession As Long
lngActiveEncryptionSession = Application.ActiveEncryptionSession

ActiveProtectedViewWindow Devuelve un objeto ProtectedViewWindow que representa la ventana de Vista protegida activa (la ventana superior).

Dim pvwActiveProtectedViewWindow As ProtectedViewWindow
Set pvwActiveProtectedViewWindow = Application.ActiveProtectedViewWindow

ActiveSheet Devuelve un objeto que representa la hoja activa (la hoja de la parte superior) en el libro activo o en la ventana o libro especificados.

Dim wsActiveSheet As Worksheet
Set wsActiveSheet = ActiveSheet

ActiveWindow Devuelve un objeto Window que representa la ventana de Excel activa (la ventana superior).

Dim wndActiveWindow As Window
Set wndActiveWindow = ActiveWindow

ActiveWorkbook Devuelve un objeto Workbook que representa el libro de la ventana activa (la ventana superior).

Dim wbActiveWorkbook As Workbook
Set wbActiveWorkbook = ActiveWorkbook

AddIns Devuelve una colección AddIns que representa todas las macros automáticas enumeradas en el cuadro de diálogo Complementos (comandoComplementos en la ficha programador ).

Dim aisAddIns As AddIns
Set aisAddIns = AddIns

AddIns2 Devuelve una colección AddIns2 que representa todos los complementos que están actualmente disponibles o abiertos en Microsoft Excel, independientemente de si están instalados.

Dim ai2AddIns2 As AddIns2
Set ai2AddIns2 = Application.AddIns2

AlertBeforeOverwriting True si Microsoft Excel muestra un mensaje antes de sobrescribir el contenido de las celdas no vacías durante una operación de edición con arrastrar y colocar.

Application.AlertBeforeOverwriting = True

AltStartupPath Devuelve o establece el nombre de la carpeta de inicio alternativa.

Application.AltStartupPath =

AlwaysUseClearType Devuelve o establece un valor Boolean que representa si se debe usar ClearType para mostrar las fuentes en el menú, en la cinta de opciones y en el texto de los cuadros de diálogo.

Application.AlwaysUseClearType = True

ArbitraryXMLSupportAvailable Devuelve un valor Boolean que indica si están disponibles las características XML en Microsoft Excel.

Dim booArbitraryXMLSupportAvailable As Boolean
booArbitraryXMLSupportAvailable = Application.ArbitraryXMLSupportAvailable

AskToUpdateLinks True si Microsoft Excel solicita al usuario que actualice los vínculos al abrir archivos con vínculos.

Application.AskToUpdateLinks = True

Assistance Devuelve un objeto IAssistance para Microsoft Excel que representa el visor de ayuda de Microsoft Office.

Dim iaeAssistance As Office.IAssistance
Set iaeAssistance = Application.Assistance

AutoCorrect Devuelve un objeto AutoCorrect que representa los atributos de Autocorrección de Microsoft Excel.

Dim actAutoCorrect As AutoCorrect
Set actAutoCorrect = Application.AutoCorrect

AutoFormatAsYouTypeReplaceHyperlinks True (valor predeterminado) si Microsoft Excel aplica el formato automáticamente a los hipervínculos mientras se escribe.

Application.AutoFormatAsYouTypeReplaceHyperlinks = True

AutomationSecurity Devuelve o establece una constante MsoAutomationSecurity que representa el modo de seguridad que utiliza Microsoft Excel al abrir archivos mediante programación.

Application.AutomationSecurity = msoAutomationSecurityForceDisable

AutoPercentEntry True si las entradas en las celdas con formato de porcentaje no se multiplican automáticamente el 100 en cuanto se especifican.

Application.AutoPercentEntry = True

AutoRecover Devuelve un objeto autorecover , que realiza una copia de seguridad de todos los formatos de archivo en un intervalo de tiempo.

Dim arrAutoRecover As AutoRecover
Set arrAutoRecover = Application.AutoRecover

Build Devuelve el número de versión de Microsoft Excel.

Dim lngBuild As Long
lngBuild = Application.Build

CalculateBeforeSave True si se calculan los libros antes de guardarlos en el disco ( si la propiedad Calculation se establece en xlManual).

Application.CalculateBeforeSave = True

Calculation Devuelve o establece un valor XlCalculation que representa el modo de cálculo.

Application.Calculation = xlCalculationAutomatic

CalculationInterruptKey Establece o devuelve una constante XlCalculationInterruptKey que especifica la tecla que puede interrumpir a Microsoft Excel al realizar cálculos.

Application.CalculationInterruptKey = xlAnyKey

CalculationState Devuelve una constante XlCalculationState que indica el estado de cálculo de la aplicación, para los cálculos que se realizan en Microsoft Excel.

Dim xcsCalculationState As XlCalculationState
xcsCalculationState = Application.CalculationState

CalculationVersion Devuelve un número cuyos últimos cuatro dígitos son el número de la versión auxiliar del motor de cálculo, y los demás dígitos (a la izquierda) son el número de la versión principal de Microsoft Excel.

Dim lngCalculationVersion As Long
lngCalculationVersion = Application.CalculationVersion

Caller Devuelve información sobre el modo en que se ha llamado a Visual Basic (para obtener más información, consulte la sección Notas).

Dim objCaller As Object
Set objCaller = Application.Caller

CanPlaySounds Esta propiedad no debe ser usada.

Dim booCanPlaySounds As Boolean
booCanPlaySounds = Application.CanPlaySounds

CanRecordSounds Esta propiedad no debe ser usada.

Dim booCanRecordSounds As Boolean
booCanRecordSounds = Application.CanRecordSounds

Caption Devuelve o establece un valor String que representa el nombre que aparece en la barra de título de la ventana principal de Microsoft Excel.

Application.Caption =

ChartDataPointTrack True hace que todos los gráficos de los documentos recién creados utilicen el comportamiento de seguimiento de referencias de celda.

Application.ChartDataPointTrack = True

Charts Devuelve una colección Sheets que representa todas las hojas de gráficos del libro activo.

Dim shtsCharts As Sheets
Set shtsCharts = Charts

ClipboardFormats Devuelve los formatos que están en el Portapapeles, en forma de una matriz de valores numéricos.

Dim varClipboardFormats As Variant
varClipboardFormats = Application.ClipboardFormats

ClusterConnector Devuelve o establece el nombre del conector de clúster de sistemas de alto rendimiento (HPC) que se usa para ejecutar funciones definidas por el usuario en complementos XLL.

Application.ClusterConnector =

Columns Devuelve un objeto Range que representa todas las columnas de la hoja de cálculo activa.

Dim rngColumns As Range
Set rngColumns = Columns

COMAddIns Devuelve la colección COMAddIns para Microsoft Excel, que representa los complementos com instalados actualmente.

Dim comsCOMAddIns As Office.COMAddIns
Set comsCOMAddIns = Application.COMAddIns

CommandBars Devuelve un objeto CommandBars que representa las barras de comandos de Microsoft Excel.

Dim cbsCommandBars As Office.CommandBars
Set cbsCommandBars = CommandBars

ConstrainNumeric True si el reconocimiento de escritura a mano está limitado a números y signos de puntuación.

Application.ConstrainNumeric = True

ControlCharacters True si Microsoft Excel muestra caracteres de control para idiomas con dirección de escritura de derecha a izquierda.

Application.ControlCharacters = True

CopyObjectsWithCells True si los objetos se cortan, copian, extraen y ordenan con celdas.

Application.CopyObjectsWithCells = True

Cursor Devuelve o establece el aspecto del puntero del mouse en Microsoft Excel.

Application.Cursor = xlDefault

CursorMovement Devuelve o establece un valor que indica si se utiliza un cursor visual o un cursor lógico.

Application.CursorMovement =

CustomListCount Devuelve el número de listas personalizadas que se han definido (incluye las listas integradas).

Dim lngCustomListCount As Long
lngCustomListCount = Application.CustomListCount

CutCopyMode Devuelve o establece el estado del modo Cortar o Copiar.

Application.CutCopyMode = xlCopy

DataEntryMode Devuelve o establece el modo de entrada de datos, tal como se muestra en la siguiente tabla.

Application.DataEntryMode = xlOff

DecimalSeparator Establece o devuelve el carácter utilizado como separador decimal como una String.

Application.DecimalSeparator = "."

DefaultFilePath Devuelve o establece la ruta de acceso predeterminada utilizada por Microsoft Excel para abrir archivos.

Application.DefaultFilePath =

DefaultPivotTableLayoutOptions

Dim dptsDefaultPivotTableLayoutOptions As DefaultPivotTableLayoutOptions
Set dptsDefaultPivotTableLayoutOptions = Application.DefaultPivotTableLayoutOptions

DefaultSaveFormat Devuelve o establece el formato predeterminado con el que se guardan los archivos.

Application.DefaultSaveFormat = xlWorkbook

DefaultSheetDirection Devuelve o establece la dirección predeterminada en la que Microsoft Excel muestra las ventanas y hojas de cálculo nuevas.

Application.DefaultSheetDirection = xlContext

DefaultWebOptions Devuelve el objeto DefaultWebOptions que contiene los atributos de nivel de aplicación global usados por Microsoft Excel cuando se guarda un documento como una página web o se abre una página web.

Dim dwosDefaultWebOptions As DefaultWebOptions
Set dwosDefaultWebOptions = Application.DefaultWebOptions

DeferAsyncQueries Obtiene o establece si las consultas asincrónicas a orígenes de datos OLAP se ejecutan cuando el código de VBA calcula una hoja de cálculo.

Application.DeferAsyncQueries = True

Dialogs Devuelve una colección Dialogs que representa todos los cuadros de diálogo integrados.

Dim dlgsDialogs As Dialogs
Set dlgsDialogs = Application.Dialogs

DisplayAlerts True si Microsoft Excel muestra alertas y mensajes determinados mientras se ejecuta una macro.

Application.DisplayAlerts = True

DisplayClipboardWindow Devuelve True si es posible mostrar el Portapapeles de Microsoft Office.

Application.DisplayClipboardWindow = True

DisplayCommentIndicator Devuelve o establece el modo en el que se muestran comentarios e indicadores.

Application.DisplayCommentIndicator = xlCommentAndIndicator

DisplayDocumentActionTaskPane Se establece en true para mostrar el panel de tareas acciones de documentos ; se establece en false para ocultar el panel de tareas acciones de documentos .

Application.DisplayDocumentActionTaskPane = True

DisplayFormulaAutoComplete Obtiene o establece si se debe mostrar una lista de las funciones y nombres definidos relevantes al generar fórmulas de celdas.

Application.DisplayFormulaAutoComplete = True

DisplayFormulaBar True si está visible la barra de fórmulas.

Application.DisplayFormulaBar = True

DisplayFullScreen True si Microsoft Excel está en el modo de pantalla completa.

Application.DisplayFullScreen = True

DisplayFunctionToolTips True si se puede mostrar al función de información sobre herramientas.

Application.DisplayFunctionToolTips = True

DisplayInsertOptions True si se debe mostrar el botón Opciones de inserción.

Application.DisplayInsertOptions = True

DisplayNoteIndicator True si en las celdas que contienen notas se muestran sugerencias de celda y contienen indicadores de notas (pequeños puntos en la esquina superior derecha).

Application.DisplayNoteIndicator = True

DisplayPasteOptions True si se puede mostrar el botón Opciones de pegado.

Application.DisplayPasteOptions = True

DisplayRecentFiles True si en la interfaz de usuario se muestra la lista de archivos usados recientemente.

Application.DisplayRecentFiles = True

DisplayScrollBars True si las barras de desplazamiento están visibles en todos los libros.

Application.DisplayScrollBars = True

DisplayStatusBar Es True si se muestra la barra de estado.

Application.DisplayStatusBar = True

ErrorCheckingOptions Devuelve un objeto ErrorCheckingOptions , que representa las opciones de comprobación de errores de una aplicación.

Dim ecosErrorCheckingOptions As ErrorCheckingOptions
Set ecosErrorCheckingOptions = Application.ErrorCheckingOptions

ExtendList True si Microsoft Excel extiende automáticamente el formato y las fórmulas de los nuevos datos que se agregan a una lista.

Application.ExtendList = True

FeatureInstall Devuelve o establece un valor (constante) que especifica cómo Microsoft Excel controla las llamadas a métodos y propiedades que requieren características que aún no están instaladas.

Application.FeatureInstall = msoFeatureInstallOnDemandWithUI

FileConverters Devuelve información sobre los convertidores de archivos instalados.

Dim strFileConverters As String
strFileConverters = Application.FileConverters

FileDialog Devuelve un objeto FileDialog que representa una instancia del cuadro de diálogo de archivo.

Dim fdgFileDialog As Office.FileDialog
Set fdgFileDialog = Application.FileDialog(fileDialogType:=msoFileDialogOpen)

FileExportConverters Devuelve una colección FileExportConverters que representa todos los convertidores de archivos para guardar archivos disponibles en Microsoft Excel.

Dim fecsFileExportConverters As FileExportConverters
Set fecsFileExportConverters = Application.FileExportConverters

FileValidation Devuelve o establece cómo validará Excel los archivos antes de abrirlos.

Application.FileValidation =

FileValidationPivot Devuelve o establece cómo valida Excel el contenido de las memorias caché de datos para los informes de tabla dinámica.

Application.FileValidationPivot = xlFileValidationPivotDefault

FindFormat

Application.FindFormat =

FixedDecimal Todos los datos que se especifiquen después de establecer esta propiedad en true tendrán el formato del número de lugares decimales establecidos por la propiedad FixedDecimalPlaces .

Application.FixedDecimal = True

FixedDecimalPlaces Devuelve o establece el número de posiciones decimales fijadas cuando la propiedad FixedDecimal se establece en true.

Application.FixedDecimalPlaces = 4

FlashFill True indica que la característica de relleno flash de Excel está habilitada y activa.

Application.FlashFill = True

FlashFillMode True si está habilitada la característica de relleno rápido.

Application.FlashFillMode = True

FormulaBarHeight Permite al usuario especificar en líneas el alto de la barra de fórmulas.

Application.FormulaBarHeight =

GenerateGetPivotData Devuelve True cuando Microsoft Excel puede obtener datos de un informe de tabla dinámica.

Application.GenerateGetPivotData = True

GenerateTableRefs La propiedad GenerateTableRefs determina si se utiliza el método de notación tradicional o el nuevo método estructurado de notación de referencias al hacer referencia a tablas dentro de fórmulas.

Application.GenerateTableRefs = xlGenerateTableRefA1

Height Devuelve o establece un valor de tipo Double que representa el alto, en puntos, de la ventana principal de la aplicación.

Application.Height =

HighQualityModeForGraphics Devuelve o establece si Excel usa el modo de alta calidad para imprimir gráficos.

Application.HighQualityModeForGraphics = True

Hinstance Devuelve un identificador para la instancia de Excel representada por el objeto Application .

Dim lngHinstance As Long
lngHinstance = Application.Hinstance

HinstancePtr Devuelve un identificador para la instancia de Excel representada por el objeto Application especificado.

Dim lprHinstancePtr As LongPtr
lprHinstancePtr = Application.HinstancePtr

Hwnd Devuelve un valor Long que indica el identificador de ventana superior de la ventana de Microsoft Excel.

Dim lngHwnd As Long
lngHwnd = Application.Hwnd

IgnoreRemoteRequests True si se hace caso omiso de las solicitudes remotas del DDE.

Application.IgnoreRemoteRequests = True

Interactive True si Microsoft Excel está en modo interactivo; Esta propiedad suele ser true.

Application.Interactive = True

International Devuelve información sobre la configuración internacional y el país o región actual.

Dim varInternational As Variant
varInternational = Application.International(xlDecimalSeparator)

IsSandboxed Devuelve true si el libro especificado está abierto en una ventana de vista protegida.

Dim booIsSandboxed As Boolean
booIsSandboxed = Application.IsSandboxed

Iteration True si Microsoft Excel utiliza la iteración para resolver las referencias circulares.

Application.Iteration = True

LanguageSettings Devuelve el objeto LanguageSettings , que contiene información sobre la configuración de idioma en Microsoft Excel.

Dim lssLanguageSettings As Office.LanguageSettings
Set lssLanguageSettings = Application.LanguageSettings

Left Devuelve o establece un valor de tipo Double que representa la distancia, en puntos, desde el borde izquierdo de la pantalla hasta el borde izquierdo de la ventana principal de Microsoft Excel.

Application.Left =

LibraryPath Devuelve la ruta la carpeta Library, sin incluir el separador final.

Dim strLibraryPath As String
strLibraryPath = Application.LibraryPath

MapPaperSize True si los documentos cuyo formato está establecido en el tamaño de papel estándar de otro país o región (por ejemplo, Carta) de modo que se impriman correctamente en el tamaño de papel estándar del país o región del usuario (por ejemplo, A4).

Application.MapPaperSize = True

MathCoprocessorAvailable True si se dispone de un coprocesador matemático.

Dim booMathCoprocessorAvailable As Boolean
booMathCoprocessorAvailable = Application.MathCoprocessorAvailable

MaxChange Devuelve o establece el cambio máximo entre cada iteración cuando Microsoft Excel resuelve referencias circulares.

Application.MaxChange =

MaxIterations Devuelve o establece el número máximo de iteraciones que puede usar Microsoft Excel para resolver una referencia circular.

Application.MaxIterations =

MeasurementUnit Especifica la unidad de medida usada en la aplicación.

Application.MeasurementUnit =

MergeInstances True para combinar varias instancias de la aplicación en una sola instancia.

Application.MergeInstances = True

MouseAvailable True si hay un mouse disponible.

Dim booMouseAvailable As Boolean
booMouseAvailable = Application.MouseAvailable

MoveAfterReturn True si la celda activa se mueve en cuanto se presiona la tecla entrar (retorno).

Application.MoveAfterReturn = True

MoveAfterReturnDirection Devuelve o establece la dirección en la que se mueve la celda activa cuando el usuario presiona la tecla entrar.

Application.MoveAfterReturnDirection = xlDown

MultiThreadedCalculation Devuelve un objeto MultiThreadedCalculation que controla la configuración de actualización de varios subprocesos.

Dim mtcMultiThreadedCalculation As MultiThreadedCalculation
Set mtcMultiThreadedCalculation = Application.MultiThreadedCalculation

Name Devuelve un valor de tipo String que representa el nombre del objeto.

Dim strName As String
strName = Application.Name

Names Devuelve una colección names que representa todos los nombres del libro activo.

Dim nmsNames As Names
Set nmsNames = Names

NetworkTemplatesPath Devuelve la ruta de red en la que están almacenadas las plantillas.

Dim strNetworkTemplatesPath As String
strNetworkTemplatesPath = Application.NetworkTemplatesPath

NewWorkbook

Dim nfeNewWorkbook As Office.NewFile
Set nfeNewWorkbook = Application.NewWorkbook

ODBCErrors Devuelve una colección ODBCErrors que contiene todos los errores de ODBC generados por la operación de informe de tabla dinámica o de tabla de consulta más reciente.

Dim odbsODBCErrors As ODBCErrors
Set odbsODBCErrors = Application.ODBCErrors

ODBCTimeout Devuelve o establece el tiempo límite de la consulta de ODBC, en segundos.

Application.ODBCTimeout = 15

OLEDBErrors Devuelve la colección OLEDBErrors , que representa la información de error devuelta por la consulta de OLE DB más reciente.

Dim olesOLEDBErrors As OLEDBErrors
Set olesOLEDBErrors = Application.OLEDBErrors

OnWindow Devuelve o establece el nombre del procedimiento que se ejecutará cada vez que se active una ventana.

Application.OnWindow =

OperatingSystem Devuelve el nombre y el número de versión del sistema operativo actual.

Dim strOperatingSystem As String
strOperatingSystem = Application.OperatingSystem

Parent Devuelve el objeto primario del objeto especificado.

Dim appParent As Application
Set appParent = Parent

Path Devuelve un valor de tipo String que representa la ruta de acceso completa de la aplicación, con excepción del separador final y el nombre de la aplicación.

Dim strPath As String
strPath = Application.Path

PathSeparator Devuelve el carácter separador de\ruta de acceso ().

Dim strPathSeparator As String
strPathSeparator = Application.PathSeparator

PivotTableSelection True si los informes de tabla dinámica utilizan selección estructurada.

Application.PivotTableSelection = True

PreviousSelections Devuelve una matriz con los cuatro últimos rangos o nombres seleccionados.

Dim varPreviousSelections As Variant
varPreviousSelections = Application.PreviousSelections

ProductCode Devuelve el identificador único global (GUID) de Microsoft Excel.

Dim strProductCode As String
strProductCode = Application.ProductCode

PromptForSummaryInfo True si Microsoft Excel solicita la información de resumen la primera vez que se guardan los archivos.

Application.PromptForSummaryInfo = True

ProtectedViewWindows Devuelve una colección ProtectedViewWindows que representa todas las ventanas Vista protegida que hay abiertas en la aplicación.

Dim pvwsProtectedViewWindows As ProtectedViewWindows
Set pvwsProtectedViewWindows = Application.ProtectedViewWindows

QuickAnalysis Devuelve un objeto QuickAnalysis que representa las opciones de análisis rápido de la aplicación.

Dim qasQuickAnalysis As QuickAnalysis
Set qasQuickAnalysis = Application.QuickAnalysis

Range Devuelve un objeto Range que representa una celda o un rango de celdas.

Dim strCell1 As String: strCell1 = 
Dim rngRange As Range
Set rngRange = Range(Cell1:=strCell1)

Ready Devuelve True cuando la aplicación Microsoft Excel está preparada; False cuando no lo está.

Dim booReady As Boolean
booReady = Application.Ready

RecentFiles Devuelve una colección RecentFiles que representa la lista de archivos usados recientemente.

Dim rfsRecentFiles As RecentFiles
Set rfsRecentFiles = Application.RecentFiles

RecordRelative True si se registran las macros mediante referencias relativas; False si la grabación es absoluta.

Dim booRecordRelative As Boolean
booRecordRelative = Application.RecordRelative

ReferenceStyle Devuelve o establece si Microsoft Excel debe mostrar las referencias a las celdas y los encabezados de filas y columnas con el estilo de referencia A1 o F1C1.

Application.ReferenceStyle = xlA1

RegisteredFunctions Devuelve información acerca de las funciones de las bibliotecas de vínculos dinámicos (DLL) o los recursos de código registrados mediante las funciones de macro REGISTER o REGISTER.

Dim varRegisteredFunctions As Variant
varRegisteredFunctions = Application.RegisteredFunctions

ReplaceFormat

Application.ReplaceFormat =

RollZoom True si el IntelliMouse acerca o aleja, en lugar de desplazarse.

Application.RollZoom = True

Rows Devuelve un objeto Range que representa todas las filas de la hoja de cálculo activa.

Dim rngRows As Range
Set rngRows = Rows

RTD Devuelve un objeto RTD .

Dim As Variant
Application.RTD

ScreenUpdating True si la actualización de pantallas está activada.

Application.ScreenUpdating = True

Selection Devuelve el objeto seleccionado actualmente en la hoja de cálculo activa para un objeto Application .

Dim objSelection As Object
Set objSelection = Selection

Sheets Devuelve una colección Sheets que representa todas las hojas del libro activo.

Dim shtsSheets As Sheets
Set shtsSheets = Sheets

SheetsInNewWorkbook Devuelve o establece el número de hojas de cálculo que Microsoft Excel insertará automáticamente en los libros nuevos.

Application.SheetsInNewWorkbook = 3

ShowChartTipNames True si en los gráficos se muestran los nombres de las sugerencias del gráfico.

Application.ShowChartTipNames = True

ShowChartTipValues True si en los gráficos se muestran valores de las sugerencias del gráfico.

Application.ShowChartTipValues = True

ShowConvertToDataType

Application.ShowConvertToDataType = True

ShowDevTools Devuelve o establece un valor Boolean que representa si se muestra la ficha Programador en la cinta de opciones.

Application.ShowDevTools = True

ShowMenuFloaties Devuelve o establece un valor Boolean que representa si se deben mostrar las Minibarras de herramientas cuando el usuario haga clic con el botón secundario en la ventana del libro.

Application.ShowMenuFloaties = True

ShowQuickAnalysis Controla si se muestra la interfaz de usuario contextual de análisis rápido en la selección.

Application.ShowQuickAnalysis = True

ShowSelectionFloaties Devuelve o establece un valor Boolean que representa si se deben mostrar las Minibarras de herramientas cuando el usuario seleccione texto.

Application.ShowSelectionFloaties = True

ShowStartupDialog Devuelve True (el valor predeterminado es False) cuando para una aplicación Microsoft Excel aparece el panel de tareas Nuevo libro.

Application.ShowStartupDialog = True

ShowToolTips True si está activada la información sobre herramientas.

Application.ShowToolTips = True

SmartArtColors Devuelve el conjunto de estilos de SmartArtColors que están cargados actualmente en la aplicación.

Dim sacsSmartArtColors As Office.SmartArtColors
Set sacsSmartArtColors = Application.SmartArtColors

SmartArtLayouts Devuelve el conjunto de SmartArtLayouts que están cargados actualmente en la aplicación.

Dim salsSmartArtLayouts As Office.SmartArtLayouts
Set salsSmartArtLayouts = Application.SmartArtLayouts

SmartArtQuickStyles Devuelve el conjunto de SmartArtQuickStyles que están cargados actualmente en la aplicación.

Dim saqsSmartArtQuickStyles As Office.SmartArtQuickStyles
Set saqsSmartArtQuickStyles = Application.SmartArtQuickStyles

Speech Devuelve un objeto Speech .

Dim spcSpeech As Speech
Set spcSpeech = Application.Speech

SpellingOptions Devuelve un objeto SpellingOptions que representa las opciones de ortografía de la aplicación.

Dim sosSpellingOptions As SpellingOptions
Set sosSpellingOptions = Application.SpellingOptions

StandardFont Devuelve o establece el nombre de la fuente estándar.

Application.StandardFont = "Arial"

StandardFontSize Devuelve o establece el tamaño de fuente estándar en puntos.

Application.StandardFontSize = 12

StartupPath Devuelve la ruta completa de la carpeta de inicio, sin incluir el separador final.

Dim strStartupPath As String
strStartupPath = Application.StartupPath

StatusBar Devuelve o configura el texto de la barra de estado.

Application.StatusBar =

TemplatesPath Devuelve la ruta local en la que están almacenadas las plantillas.

Dim strTemplatesPath As String
strTemplatesPath = Application.TemplatesPath

ThisWorkbook Devuelve un objeto Workbook que representa el libro en el que se está ejecutando el código de la macro actual.

Dim wbThisWorkbook As Workbook
Set wbThisWorkbook = ThisWorkbook

ThousandsSeparator Establece o devuelve el carácter utilizado como separador de miles como un valor de tipo String.

Application.ThousandsSeparator = ","

Top Devuelve o establece un valor de tipo Double que representa la distancia, en puntos, desde el borde superior de la pantalla hasta el borde superior de la ventana principal de Microsoft Excel.

Application.Top =

TransitionMenuKey Devuelve o establece el menú de Microsoft Excel o la tecla de ayuda, /que suele ser.

Application.TransitionMenuKey =

TransitionMenuKeyAction Devuelve o establece la acción que se realiza al presionar la tecla de menú de Microsoft Excel.

Application.TransitionMenuKeyAction =

TransitionNavigKeys True si las teclas de desplazamiento de transición están activadas.

Application.TransitionNavigKeys = True

UsableHeight Devuelve el alto máximo del espacio que puede ocupar una ventana en el área de ventana de la aplicación, en puntos.

Dim dblUsableHeight As Double
dblUsableHeight = Application.UsableHeight

UsableWidth Devuelve el ancho máximo del espacio que puede ocupar una ventana en el área de ventana de la aplicación, en puntos.

Dim dblUsableWidth As Double
dblUsableWidth = Application.UsableWidth

UseClusterConnector Devuelve o establece si Excel permite que las funciones definidas por el usuario en los complementos XLL se ejecuten en un clúster de cálculo.

Application.UseClusterConnector = True

UsedObjects Devuelve un objeto UsedObjects que representa los objetos asignados en un libro.

Dim uosUsedObjects As UsedObjects
Set uosUsedObjects = Application.UsedObjects

UserControl True si la aplicación está visible o si fue creada o iniciada por el usuario.

Application.UserControl = True

UserLibraryPath Devuelve la ruta de acceso a la ubicación en el equipo del usuario donde están instalados los complementos COM.

Dim strUserLibraryPath As String
strUserLibraryPath = Application.UserLibraryPath

UseSystemSeparators True (valor predeterminado) si los separadores del sistema de Microsoft Excel están habilitados.

Application.UseSystemSeparators = True

Value Devuelve un valor de tipo String que representa el nombre de la aplicación.

Dim strValue As String
strValue = Application.Value

VBE Devuelve un objeto VBE que representa el Editor de Visual Basic.

Dim vbeVBE As VBIDE.VBE
Set vbeVBE = Application.VBE

Version Devuelve un valor de tipo String que representa el número de versión de Microsoft Excel.

Dim strVersion As String
strVersion = Application.Version

Visible Devuelve o establece un valor Boolean que determina si el objeto es visible.

Application.Visible = True

Watches Devuelve un objeto Watches que representa un rango del que se realiza un seguimiento cuando se actualiza la hoja de cálculo.

Dim wtcsWatches As Watches
Set wtcsWatches = Application.Watches

Width Devuelve o establece un valor de tipo Double que representa la distancia, en puntos, desde el borde izquierdo hasta el borde derecho de la ventana de la aplicación.

Application.Width = 300

Windows Devuelve una colección Windows que representa todas las ventanas de todos los libros.

Dim wndsWindows As Windows
Set wndsWindows = Windows

WindowsForPens True si el equipo ejecuta Microsoft Windows para Pen Computing.

Dim booWindowsForPens As Boolean
booWindowsForPens = Application.WindowsForPens

WindowState Devuelve o establece el estado de la ventana.

Application.WindowState = xlMaximized

Workbooks Devuelve una colección Workbooks que representa todos los libros abiertos.

Dim wrksWorkbooks As Workbooks
Set wrksWorkbooks = Workbooks

WorksheetFunction Devuelve el objeto WorksheetFunction .

Dim wfnWorksheetFunction As WorksheetFunction
Set wfnWorksheetFunction = WorksheetFunction

Worksheets Para un objeto Application , devuelve una colección Sheets que representa todas las hojas de cálculo del libro activo.

Dim shtsWorksheets As Sheets
Set shtsWorksheets = Worksheets