Clase Pane - un panel de una ventana (Excel VBA)

La clase Pane representa un panel de una ventana. Para usar una variable de clase Pane, primero debe ser instanciado, por ejemplo

Dim pan as Pane
Set pan = ActiveWindow.ActivePane

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Pane en una colección.

Dim pan As Pane
For Each pan In Application.Panes
	
Next pan

Activate

Activa el panel.

Si el panel no está en la ventana activa, también se activará la ventana a la que pertenezca el panel. No es posible activar un panel inmovilizado.

Dim booActivate As Boolean
booActivate = ActiveWindow.ActivePane.Activate()

Index

Devuelve un valor de tipo Long que representa el número de índice del objeto dentro de una colección de objetos similares.

Dim lngIndex As Long
lngIndex = ActiveWindow.ActivePane.Index

LargeScroll

Desplaza el contenido de la ventana por páginas.

Si se especifican ambos, Down y up , el contenido de la ventana se desplaza según la diferencia de los argumentos. Si se especifican a la vez ToLeft y ToRight, el contenido de la ventana se desplaza según la diferencia de ambos argumentos. Todos los argumentos pueden ser números negativos.

LargeScroll (Down, Up, ToRight, ToLeft)

ActiveWindow.ActivePane.LargeScroll

Arguments

Optional arguments

Los siguientes argumentos son opcionales

Down (Long) - Número de páginas hacia abajo que se desplazará el contenido.

Up (Long) - Número de páginas hacia arriba que se desplazará el contenido.

ToRight (Long) - Número de páginas hacia la derecha que se desplazará el contenido.

ToLeft (Long) - Número de páginas hacia la izquierda que se desplazará el contenido.

PointsToScreenPixelsX

Devuelve o establece un punto de píxel en la pantalla.

PointsToScreenPixelsX (Points)

Points: Ubicación del píxel en la pantalla.

Dim lngPoints As Long: lngPoints = 
Dim lngPointsToScreenPixelsX As Long
lngPointsToScreenPixelsX = ActiveWindow.ActivePane.PointsToScreenPixelsX(Points:=lngPoints)

PointsToScreenPixelsY

Devuelve o establece la ubicación del píxel en la pantalla.

PointsToScreenPixelsY (Points)

Points: Ubicación del punto inicial.

Dim lngPoints As Long: lngPoints = 
Dim lngPointsToScreenPixelsY As Long
lngPointsToScreenPixelsY = ActiveWindow.ActivePane.PointsToScreenPixelsY(Points:=lngPoints)

ScrollColumn

Devuelve o establece el número de la columna situada más a la izquierda en el panel o ventana.

Si la ventana está dividida, la propiedad ScrollColumn del objeto Window hace referencia a la sección superior izquierda. Si los paneles están inmovilizados, la propiedad ScrollColumn del objeto Window excluye las áreas inmovilizadas.

ActiveWindow.ActivePane.ScrollColumn =

ScrollIntoView

Desplaza la ventana del documento para mostrar el contenido de un área rectangular especificada en la esquina superior izquierda o en la esquina inferior derecha de la ventana o panel de documento (según el valor del argumento Start).

El argumento Start es útil para orientar la presentación de la pantalla cuando el rectángulo es más grande que la ventana o panel del documento.

ScrollIntoView (Left, Top, Width, Height, Start)

ActiveWindow.ScrollIntoView _ 
 Left:=50, Top:=20, _ 
 Width:=100, Height:=200

Arguments

Estos son los argumentos con nombre :

Left (Long) - Posición horizontal del rectángulo (en puntos) desde el borde izquierdo de la ventana o panel del documento.

Top (Long) - Posición vertical del rectángulo (en puntos) desde la parte superior de la ventana o panel del documento.

Width (Long) - Ancho del rectángulo, en puntos.

Height (Long) - Alto del rectángulo, en puntos.

Optional arguments

Los siguientes argumentos son opcionales

Start (Boolean) - Si es True, la esquina superior izquierda del rectángulo se muestra en la esquina superior izquierda de la ventana o panel del documento.

ScrollRow

Devuelve o establece el número de la fila que aparece en la parte superior del panel o la ventana.

Si la ventana está dividida, la propiedad ScrollRow del objeto Window hace referencia a la sección superior izquierda. Si los paneles están inmovilizados, la propiedad ScrollRow del objeto Window excluye las áreas inmovilizadas.

Worksheets("Sheet1").Activate 
ActiveWindow.ScrollRow = 10

SmallScroll

Desplaza el contenido de la ventana por filas o columnas.

Si se especifican ambos, Down y up , el contenido de la ventana se desplaza según la diferencia de los argumentos. Si se especifican ambos, ToLeft y ToRight , el contenido de la ventana se desplazará según la diferencia de los argumentos. Todos los argumentos pueden ser números negativos.

SmallScroll (Down, Up, ToRight, ToLeft)

ActiveWindow.ActivePane.SmallScroll

Arguments

Optional arguments

Los siguientes argumentos son opcionales

Down (Long) - Número de filas hacia abajo que se desplazará el contenido.

Up (Long) - Número de filas hacia arriba que se desplazará el contenido.

ToRight (Long) - Número de columnas hacia la derecha que se desplazará el contenido.

ToLeft (Long) - Número de columnas para desplazar el contenido hacia la izquierda.

VisibleRange

Devuelve un objeto Range que representa el rango de celdas que están visibles en la ventana o panel.

Dim rngVisibleRange As Range
Set rngVisibleRange = ActiveWindow.ActivePane.VisibleRange